#usage do runall.tcl 1ms set ROOT_PATH [pwd] for {set NUMBER 3} { $NUMBER < 14} {incr NUMBER} { set CASE_NUMBER [format "%03d" $NUMBER] puts ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>$CASE_NUMBER start>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>" catch {do runone.tcl -n $CASE_NUMBER -t $1} result quit -sim cd ${ROOT_PATH} puts "<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<$CASE_NUMBER end<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<" }