如何在TCL中将2个列表合并为键值对?

如何在TCL中将2个列表合并为键值对?,tcl,Tcl,如何将两个列表合并为键值对 两个列表中的元素数相同。 我有两个清单如下 set a "1 2 3" set b "One two three" 如何像下面的dict['1':1,'2':2,'3':3]那样进行组合foreach命令的一个容易被忽略的特性是它可以在多个列表上循环。因此,您的任务可以这样简单地完成: foreach k $a v $b {dict set d $k $v} puts $d 结果:1 1 2 2 3 3foreach命令的一

如何将两个列表合并为键值对

两个列表中的元素数相同。 我有两个清单如下

set a "1 2 3"
set b "One two three"
如何像下面的dict['1':1,'2':2,'3':3]那样进行组合

foreach命令的一个容易被忽略的特性是它可以在多个列表上循环。因此,您的任务可以这样简单地完成:

foreach k $a v $b {dict set d $k $v}
puts $d
结果:1 1 2 2 3 3

foreach命令的一个容易被忽略的特性是它可以在多个列表上循环。因此,您的任务可以这样简单地完成:

foreach k $a v $b {dict set d $k $v}
puts $d
结果:1 1 2 2 3 3