如何在Tcl中获取DDMMYYYY格式的日期

Question

我正在创建一个创建日志文件的TCL脚本。时间和日期是日志文件名的一部分。

这就是我目前拥有的：

set fname_date [clock format [clock seconds] -format {%d-%h-%y}]
set fname_time [clock format [clock seconds] -format {%H%M%S}]
set    log_fname "test_log"
append log_fname "_$fname_time"
append log_fname "_$fname_date"
append log_fname ".dat"

这会将文件名显示为：

test_log_155838_23-Aug-22.dat

然而，我需要日期都是数字，所以文件名看起来像这样：

life_test_log_155838_230822.dat

如何从TCL获取DDMMYY格式的当前日期？我不确定要使用什么格式的字符串来执行此操作。

Answer 1

clock format的详细信息如下：

• https://www.tcl-lang.org/man/tcl8.6/TclCmd/clock.htm

DDMMYY格式为%d%m%y

DDMMYYYY格式为%d%m%Y

Answer 2

长格式，您的代码适应

set fname_date [clock format [clock seconds] -format %d%m%y]
set fname_time [clock format [clock seconds] -format %H%M%S]
set    log_fname "test_log"
append log_fname "_$fname_time"
append log_fname "_$fname_date"
append log_fname ".dat"
puts $log_fname

缩写

set log_fname "life_test_log_[clock format [clock seconds] -format %H%M%S]_[clock format [clock seconds] -format %d%m%y].dat"
puts $log_fname

请参阅https://www.tcl.tk/man/tcl8.4/TclCmd/clock.html