如何在TCL中将2个变量名称连接成1个名称？

Question

我有一组变量,它是我试图搜索的字节列表.

set foo0 [list 0 1 2]
set foo1 [list 3 4 5]
set foo2 [list 6 7 8]
set fooCount 3

for { set z 0 } { $z<$fooCount} { incr z } { 
    tbf str "foo$z: foo$z"
}

我希望打印出来:

foo0: 0 1 2
foo1: 3 4 5
foo2: 6 7 8

但我得到:

foo0: foo0
foo1: foo1
foo2: foo2

我尝试将打印行更改为

tbf str "foo$z: $foo$z"

但后来我得到一个没有变量foo的错误.我也尝试将所有foo变量复制到fooList中,但我似乎也没有得到内容.

Answer 1

试试这个:

tbf str "foo$z: [set foo$z]"

该set命令返回令牌,该令牌是的值foo0,foo1并依此类推.