如何使用 tcl 中的列表作为多个字符串的参数（而不是作为一个字符串）？

Question

具体来说，我用 : 创建一个列表

for {set i 0} {$i < $val(recv)} {incr i} {
    lappend bwList "videoBW_($i).tr"
    close $videoBW_($i)
}

，然后我想将该列表作为多个文件的参数，

exec xgraph $bwList -geometry 800x400  &

它会给我错误：
警告：无法打开文件 `videoBW_(0).tr videoBW_(1).tr videoBW_(2).tr'

因为 tcl 将整个列表读取为一个字符串而不是多个字符串。 有没有办法将列表读取为多个字符串？

编辑：

tcl8.4 的解决方案是 Brian Fenton 提供的。 但通过更改 set exec_call {xgraph $bwList -geometry 800x400} 设置 exec_call "xgraph $bwList -geometry 800x400"

基本上，如果您只在 exec 前面添加 eval ，它就可以完成工作。

  eval exec xgraph $bwList -geometry 800x400  &

Fot tcl 8.5 Bryan Oakley 提供了一个更优雅的解决方案。

Answer 1

如果您使用 tcl 8.5 或更高版本，您可以执行以下操作：

exec xgraph {*}$bwList -geometry 800x400  &

{*} 称为扩展运算符。在执行语句之前，它将列表扩展为单独的元素。

请参阅Tcl 手册页的第 5 节以获得明确的解释。

Answer 2

在 8.5 及更高版本中：

exec xgraph {*}$bwList -geometry 800x400 &

在 8.4 及之前版本中：

eval exec xgraph $bwList -geometry 800x400 &
# Or this more formally-correct version...
# eval [list exec xgraph] [lrange $bwList 0 end] [list -geometry 800x400 &]

如您所见，8.5 扩展语法有很大帮助，当您从简单的实验到生产代码时尤其如此（例如，如果您添加带有空格的标签参数到该命令行；扩展版本将正确处理它，但使用旧版本时，您将不得不正确引用所有内容，您可以看到上面非常混乱）。

Answer 3

我不完全理解“多个字符串”的意思。如果您展示对 xgraph 的最终调用应该是什么样子，这会对我有所帮助。我认为 xgraph 文件位于末尾（即在 -geometry 800x400 之后）？

无论如何，可能有帮助的是使用eval而不是直接调用exec。

set exec_call {xgraph $bwList -geometry 800x400}
set caught [catch {eval exec $exec_call} result]
if { $caught } {
 #handle the error - it is stored in $result
} else {
 #handle the success
}

Answer 4

对于 Tcl 8.4 我会这样做：

set cmd [concat [list exec xgraph] $bwList]
lappend cmd -geometry 800x400