Tokenize a string: Difference between revisions
Added Quackery.
m (→{{header|Mathematica}}: Saved a character) |
(Added Quackery.) |
||
Line 2,584:
END FUNCTION ' | End of function.
</lang>
=={{header|Quackery}}==
<lang Quackery> [ [] [] rot
witheach
[ dup char , = iff
[ drop nested join [] ]
else join ]
nested join ] is tokenise ( $ --> [ )
[ witheach [ echo$ say "." ] ] is display ( [ --> )
$ "Hello,How,Are,You,Today" tokenise display</lang>
{{Out}}
<pre>Hello.How.Are.You.Today.</pre>
=={{header|R}}==
| |||