tcl: split string into list

set str "a,b,c d"

set lst [split $str ","]

foreach e $lst {
    puts $e
}

see also

• split in tcl