RosettaCodeData/Task/Tokenize-a-string/FutureBasic/tokenize-a-string.basic

12 lines
263 B
Plaintext

window 1, @"Tokenize a string"
void local fn DoIt
CFStringRef string = @"Hello,How,Are,You,Today"
CFArrayRef tokens = fn StringComponentsSeparatedByString( string, @"," )
print fn ArrayComponentsJoinedByString( tokens, @"." )
end fn
fn DoIt
HandleEvents