set命令

set - 读写变量

语法:
set varName ?value?

描述:
返回变量varName的value的值,如果value被指定则将该值赋予varName,如果varName之前未被赋值，则将该值赋予varName
如果varName中存在(),则其被识别为数组元素，没有的话被认为是一个普通变量

举例:
1)将随机数存在变量r中
set r [expr rand()]

2)将短消息存在数组元素中
set anAry(msg) "Hello, World!"
另一种方式:
set elemName "msg"
set anAry($elemName) "Hello, World!"

3)将vb1的值赋予out
set in0 "small random"
set in1 "large random"
set vbl in[expr {rand() >= 0.5}]
set out [set $vbl]