变量123456789101112131415161718#置换变量set a 'snow'puts $a #打印a的值#命令置换#[]内部是一个独立tcl语句set a [expr 3+4]puts $a#结果为7#转义字符puts 'a\tb'puts 'a\nb'#添加后缀puts ${a}_1#打印7_1...