TCL - 如何在屏幕上打印执行exec命令期间打印的消息？

Question

假设我想通过打印运行时执行输出来执行脚本或可执行文件.

当我做:

set log [exec ./executable_file]
puts $log

然后等待很长时间然后立即打印所有内容.但我想要运行时打印.我怎样才能做到这一点？

Answer 1

不完美(因为它需要写入外部文件):

set log [exec executable_file | tee log.txt >@stdout]

输出将立即显示,同时保存为"log.txt".如果您不关心保存输出:

set log [exec executable_file >@stdout]