巩固foreach命令

Question

foreach old_cellname $old_cell_full_name {
echo $old_cellname >> origin.txt}
foreach origin $cell_origin {
echo $origin >> origin.txt} 
foreach new_cellname $new_cell_full_name {
echo $new_cellname >> origin.txt}

使用上面的代码，我可以将origin.txt中的输出作为旧单元格名称，后跟原始数字后跟新单元格名称。但我希望我的输出为行，即旧单元格名称的来源和新单元格名称。是否可以进行这些更改？任何帮助都非常感谢。

Answer 1

如果列表长度相同且合理匹配，当然可以。只需使用多列表foreach：

foreach old $old_cell_full_name origin $cell_origin new $new_cell_full_name {
    # echo isn't a standard Tcl command, but I guess this ought to work
    echo "$old\t$origin\t$new" >> origin.txt
}

我认为以制表符分隔的方式可以。它非常方便，因为它可以让您轻松地将数据导入电子表格。如果您更喜欢逗号，请使用,代替\t。