tcl loop skip
shell loop skip in progress