我这样做了很多次puts "$log" "blah blah blah"
,puts "blah blah blah"
一次将其放入日志文件,一次将其显示到标准输出。
它可以用一行或简单的方式完成,只需使用一个 put 或以更好的方式。
还有任何颜色代码可以用来输出彩色文本,就像tput
在 linux 中一样
如果您是自己调用输出的人,请创建一个过程并改为调用它。
proc log2OutErr {msg} {
global log
puts $msg
puts $log $msg
}
如果您希望所有脚本输出到日志文件和标准输出,请不要在 Tcl 中打开日志文件,只需在启动时将脚本输出通过管道传输到teetclsh script.tcl | tee logfile
: ,然后puts
到标准输出。