RosettaCodeData/Task/Tokenize-a-string/TXR/tokenize-a-string-2.txr

@(next :list "Hello,How,Are,You,Today")
@(coll)@(maybe)@token,@(or)@token@(end)@(end)
@(output)
@(rep)@token.@(last)@token@(end)
@(end)