运行 Tcl 脚本将打开一个空白窗口

Question

我有一个名为perm.tcl的tcl脚本，我正在尝试在Windows机器上运行此脚本。

package require Tk
proc invert list {
  set length [llength $list]
  return $length
}
invert {1 2 3 4}

每当我尝试在命令提示符下使用

tclsh perm.tcl

将打开一个标题为"perm"的空白 activeTCL 窗口，其中没有文本或任何内容。在这种情况下，它应该简单地输出数字 4，但我只得到一个小的灰色窗口。我知道这个过程有效，因为当我在 tclsh 命令提示符下煞费苦心地写出来时，我得到了所需的结果 4。请帮忙

Answer 1

这是因为

您正在导入Tk包。执行此操作时，它会自动创建一个窗口。如果您不需要任何窗口，请不要导入Tk 。