append命令

append ---- 追加变量

语法:
append varName ?value value value ...?

将所有的value追加到变量varName。如果varName不存在，则对varName进行赋值。
set var 0
for {set i 1} {$i<=10} {incr i} {
   append var "," $i
}
puts $var
# Prints 0,1,2,3,4,5,6,7,8,9,10