Comment detail

ミリ秒まで含んだ時刻文字列 (Nested Flatten)

Tcl8.5の場合は、 clock millisecondsが使える。 clock microsecondsも使える。

Tcl8.4の場合は、 最近のActiveTclにバックポートとして入っているnewclock拡張を使う。

1
2
3
4
set pit [clock milliseconds]
set sec [clock format [string range $pit 0 9] -format %Y%m%d%H%M%S]]
set msec [string range $pit 10 end]
puts $sec.$msec

Index

Feed

Other

Link

Pathtraq

loading...