fork download
  1. set x [split "Hello there Bob!"]
  2. set i 0
  3. foreach y $x {
  4. puts "$y \n"
  5. incr i
  6. }
  7. puts $i
Success #stdin #stdout 0.03s 5272KB
stdin
Standard input is empty
stdout
Hello 

there 

Bob! 

3