set X "this is a boy "
set  Y   "zhouli "
puts  $X
puts  $Y
set  label  "the value in  Y is: " 
puts  "$label  $Y"
// 总结 :
1.     #注释
2.     tcl不支持.net中的形如int , double ,char等等类型,唯一支持的就是string类型
3.     变量:在tcl变量不需要声明就可以直接赋值
4.     取得变量的值可以在对应的变量名前面加$来取得      exmple : set  X   " 2016.8.1 ";
                                                                 puts  $X   ;
5.     tcl 区分大小写 ,切记                                                          
原文:http://www.cnblogs.com/gold-life/p/5731094.html