什么';在Perl中获取历元毫秒的最佳方法是什么?

什么';在Perl中获取历元毫秒的最佳方法是什么?,perl,timestamp,epoch,Perl,Timestamp,Epoch,在perl中很容易获得历元秒(时间戳): 但是毫秒是怎么回事?最有效的方法似乎是时间*1000,但这并不像我希望的那样准确。除了@perldoc?长期记录之外,还有什么好的提示吗?该模块的替换时间有所减少 $ perl -E 'say time' 1298827929 $ perl -MTime::HiRes=time -E 'say time' 1298827932.67446 你可以 现实世界的一个例子是: use Time::HiRes qw(gettimeofday); print g

在perl中很容易获得历元秒(时间戳):

但是毫秒是怎么回事?最有效的方法似乎是时间*1000,但这并不像我希望的那样准确。除了@perldoc?

长期记录之外,还有什么好的提示吗?该模块的替换时间有所减少

$ perl -E 'say time'
1298827929
$ perl -MTime::HiRes=time -E 'say time'
1298827932.67446
你可以


现实世界的一个例子是:

use Time::HiRes qw(gettimeofday);
print gettimeofday;

对于Perl:v5.8.4SunOS构建的(sun4-solaris-64int),需要修改。

Hm。。。我仍然使用
time::HiRes
获得整数时间。但是,来自该模块的
clock\u gettime()
起作用。它是perl 5.10。0@Dallaylaen:您是否从time::HiRes导出时间?谢谢,这是我的错误。当然
使用时间::雇佣qw/Time/
很好。
perldoc -q "How can I measure time under a second"
use Time::HiRes qw(gettimeofday);
print gettimeofday;
perl -MTime::HiRes=time -e 'print time;'