將put的輸出同時發送到日誌文件和stdout？

Question

我這樣做很多次，如puts "$log" "blah blah blah"和puts "blah blah blah" 一個用於將其放入日誌文件，一個用於顯示它到標準輸出。

它可以在一條線上完成，或者以簡單的方式使用一個投入或以更好的方式完成。

也沒有任何顏色代碼，我們可以在Linux

Answer 1

如果你是一個使輸出要求自己用它來輸出彩色文本像tput，創建一個過程和調用來代替。

proc log2OutErr {msg} { 
    global log 

    puts $msg 
    puts $log $msg 
} 

如果你想所有腳本輸出去到日誌文件和stdout都不要打開Tcl的日誌文件，就管你的腳本輸出到tee在啓動時：tclsh script.tcl | tee logfile，然後puts標準輸出。