tcl - 如何在 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 等等。