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

Question

我有一个我写的tcl脚本perm.tcl我试图在Windows机器上运行这个脚本。

package require Tk

proc invert list {
  set length [llength $list]
  return $length
}

invert {1 2 3 4}

每当我尝试使用

在命令提示符中运行此代码时

tclsh perm.tcl

打开一个空白的activetcl窗口标题为＆＃34; perm＆＃34;没有文字或任何东西。在这种情况下，它应该只输出数字4，但我只得到一个小的灰色窗口。我知道这个程序有效，因为当我在tclsh命令提示符下刻苦写出来时，我得到了理想的结果4.请帮助

Answer 1

这是因为您正在导入Tk包。当您这样做时，它会自动创建一个窗口。如果您不想要任何窗口，请不要导入Tk。