Anonymous user
Tokenize a string: Difference between revisions
Adding MUMPS example
(Added Snobol4) |
(Adding MUMPS example) |
||
Line 634:
IO.Put("\n");
END Tokenize.</lang>
=={{header|MUMPS}}==
<lang MUMPS>TOKENS
NEW I,J,INP
SET INP="Hello,how,are,you,today"
NEW I FOR I=1:1:$LENGTH(INP,",") SET INP(I)=$PIECE(INP,",",I)
NEW J FOR J=1:1:I WRITE INP(J) WRITE:J'=I "."
KILL I,J,INP
QUIT</lang>
In use:<pre>USER>D TOKENS^ROSETTA
Hello.how.are.you.today</pre>
=={{header|Objective-C}}==
| |||