如何在Tcl中获得UTC时间的差异?

时间:2015-01-07 12:00:13

标签: tcl

我有1043549199作为开始时间,1043550749作为结束时间,我需要知道经过的时间。我相信这些数字是以UTC时间戳格式化的。我如何在Tcl

中实现这一目标

1 个答案:

答案 0 :(得分:3)

1043549199不是一个数字时间戳的时间,它是从Unix时代开始(1970年1月初以UTC开始)的秒数。获得差异是微不足道的,因为它们只是数字:从另一个中减去一个。

set t1 1043549199
set t2 1043550749
set diff [expr {$t2 - $t1}]
puts "The interval from '[clock format $t1]' to '[clock format $t2]' lasted $diff seconds"
The interval from 'Sun Jan 26 02:46:39 GMT 2003' to 'Sun Jan 26 03:12:29 GMT 2003' lasted 1550 seconds