如何在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

你想L将：

% 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}