Tcl Split Command