如何在 Tcl 中将列表解包为变量？

Question

在Python中我可以写这样的东西：

my_list = [4, 7, "test"]
a, b, c = my_list

之后a是4，b是7和c 是 "test" 因为最后一行进行了解包操作。我可以做类似 Tcl 中最后一行的事情吗？为了更清楚地说明，我想要这样的东西：（

set my_list {4 7 test}
setfromlist $mylist a b c

即 setfromlist 将是我正在寻找的命令。）

Answer 1

您想要 lassign：

% lassign
wrong # args: should be "lassign list ?varName ...?"
% lassign {1 2 3} a b c
% set a
1
% set b
2
% set c
3

如果您使用旧版本的 Tcl（没有 lassign），您可以使用 foreach 来获得相同的结果

foreach {a b c} {1 2 3} {break}