Question

我是TCL的新手，我想运行我的脚本而不将任何中间结果返回到屏幕（除非要求这样做）。如何在TCL中停止自动退货？让我用一个简单的例子来问我的问题

set a 10

这会将“10”返回到屏幕。我想知道如何在命令执行后停止这种自动返回。

谢谢！

Answer 1

proc main {} {
    return
}
main

tclsh test.tcl：它真的不打印任何东西。但是，只包含set a 10的脚本也不会。您需要探索运行REPL样式接口（读取，评估，打印，循环）的交互式解释器与评估脚本的非交互式解释器之间的区别。

在交互式会话中，您可以在行尾添加垃圾命令以抑制输出。例如，如果您必须阅读一个大字符串 - 为了避免将其打印到控制台，您可以使用：set data [read $filehandle]; string length $data