大侠请留步！ Tcl怎的能获取当前操作文件的文件名字

大侠请留步！！！ Tcl怎样能获取当前操作文件的文件名字？
写了个tcl测试脚本如：test.tcl，想在测试过程中将测试得到的数据存到同名的log里 如：test.log

------解决方案--------------------
search "tcl script name",

http://*.com/questions/3838591/fullpath-of-current-tcl-script