tcl语言中的双重替换（双重变量）

       在tcl语言中，有时候需要类似$$i这样的变量的变量或者双重变量，但是tcl是不支持$$i这样形式的变量替换的

如set b a

puts $$b  ===> $a

怎么办呢？可以使用set命令来间接实现双重替换，即

puuts [set $a]

这在网络模拟中很有用。比如我们定义了很多节点的名字，需要引用这些节点的时候，就可以使用如下的语法：

$ns attach-agent [set $node_s] $tcp($i)

其中$node_s就是节点的名字了。