如何使用tcl脚本创建日志文件

时间:2015-10-15 12:20:49

标签: tcl

如果我想从Tcl脚本创建一个日志文件..在Tcl中是否有任何命令可以执行此操作以及它需要哪些软件包?

感谢您的提前帮助

1 个答案:

答案 0 :(得分:2)

尝试使用Tcllib中的logger包。如果您使用其他语言的日志记录系统,它应该感觉相当熟悉:

package require logger
set log [logger::init myservice]

${log}::notice "Initialized myservice logging"
# ... code ...
${log}::notice "Ending myservice logging"

${log}::delete

默认情况下,它会记录到控制台。要登录到文件,您需要一些额外的代码,可能是这样的:

set logfile [open "myfile.log" "a"];   #### <<<< Open in APPEND mode!
proc logtofile {msg} {
    global logfile
    puts $logfile "[clock format [clock seconds]]: NOTICE: $msg"
}
${log}::logproc notice logtofile

当然,您也可以删除中间人并直接使用logtofile程序...