咨询：tclsh使用输入重定向时无输出的解决办法

你猜的没错，tclsh确实会区分交互式和非交互式会话：

• 交互式模式下，执行命令后会自动把返回值输出到stdout
• 非交互式模式（管道/文件输入脚本）下，仅执行脚本逻辑，不会自动回显返回值

要强制在非交互式会话中打印输出，有几种可行的方法：

• 显式使用puts输出结果
  把set命令的返回值通过puts主动输出，比如：

  echo "puts [set x 2]" | tclsh > output.txt
  

  或者拆分写法：

  echo "set x 2; puts \$x" | tclsh > output.txt
  

  这样就能让结果被写入output.txt。

• 强制开启交互式模式
  使用tclsh的-interactive参数，强制让会话以交互式模式运行，即使是管道输入也会自动打印返回值：

  echo "set x 2" | tclsh -interactive > output.txt
  

  注意：这种方式可能会额外输出交互式提示符（比如%），如果不需要这类内容，建议用第一种方法更干净。

• 通过脚本文件执行
  创建一个Tcl脚本文件（比如test.tcl），内容如下：

  set x 2
  puts $x
  

  然后执行脚本：

  tclsh test.tcl > output.txt
  

  这种方式适合复杂逻辑，也能确保输出可控。

内容的提问来源于stack exchange，提问作者Sam Liu