September 2017 Update

Task/Odd-word-problem/Zkl/odd-word-problem-1.zkl

@@ -0,0 +1,15 @@
+var [const] delim=",:;/?!@#$%^&*()_+", stop=".";
+fcn oddly(inStream){
+   inStream=inStream.walker(3);  // character iterator: string, file, etc
+   doWord:=fcn(inStream,rev,f){  // print next word forewards or reverse
+      c:=inStream.next();
+      if(not rev) c.print();
+      if(not (c==stop or delim.holds(c)))
+	 return(self.fcn(inStream,rev,'{ c.print(); f(); }));
+      if(rev){ f(); c.print(); }
+      return(c!=stop);
+   };
+   tf:=Walker.cycle(False,True);  // every other word printed backwords
+   while(doWord(inStream, tf.next(), Void)) {}
+   println();
+}

Task/Odd-word-problem/Zkl/odd-word-problem-2.zkl

@@ -0,0 +1,2 @@
+oddly("what,is,the;meaning,of:life.");
+oddly(Data(0,String,"we,are;not,in,kansas;any,more."));