Tokenize a string: Difference between revisions
Content added Content deleted
| Line 421: | Line 421: | ||
puts [join [set words [split "Hello,How,Are,You,Today" ,]] .] |
puts [join [set words [split "Hello,How,Are,You,Today" ,]] .] |
||
=={{header|UnixPipes}}== |
|||
rtoken() { |
|||
(IFS=\ read A B ; echo $A; test -n "$B" && (echo $B | token) ) |
|||
} |
|||
tokens() { |
|||
IFS=, read A ; echo $A | rtoken |
|||
} |
|||
echo "Hello,How,Are,You" | tokens |
|||