需要以毫秒为单位从纪元转换时间戳并计算差异，然后以特定格式呈现答案

【问题标题】：Need to convert the timestamps in milliseconds from epoch and calculate difference then present in a specific format需要以毫秒为单位从纪元转换时间戳并计算差异，然后以特定格式呈现
【发布时间】：2014-07-08 11:44:21
【问题描述】：

我对 Perl 比较陌生，我有一个查询，详情如下。

考虑这些是以毫秒为单位从另一个程序检索到的时间戳。时间1 = 1404819151646 时间2 = 1404819485977

如何将这些时间传递给 perl 子程序，并以下列格式获取它们之间的差异：秒.毫秒

注意：我假设由于时间戳以毫秒为单位，并且 perl 正在计算 Time2 和 Time1 之间的差异，它会处理极端情况，例如日期更改或月份更改。如果我错了，请纠正我。

请帮忙！

【问题讨论】：

标签： perl datetime time perl-module subroutine

【解决方案1】：

通过计算差值除以1000得到秒；毫秒不关心日期、月份等。

sub diff {
  my ($aa, $bb) = @_

  return ($bb - $aa)/1000;
}

【讨论】：

谢谢，如果时间是“Jul 8 2014 17:59:55.455”格式呢？
@NitinSagar Jul 8 2014 17:59:55.455 不是时间戳，您需要一些模块先将其转换为毫秒。