What's the best way to get Epoch milliseconds in Perl?

Question

It's easy to get Epoch-Seconds (timestamp) in perl:

time

But what's with milliseconds? The most effective way seems to be time*1000, but that's not as accurate as I want it to be. Any good hints except for the long terms documented @perldoc?

score 14 · Accepted Answer · answered Feb 27 '11 at 17:35

14

The Time::HiRes module has a drop-in replacement for time

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

You can read more in the perl FAQ

perldoc -q "How can I measure time under a second"

answered Feb 27 '11 at 17:35

oylenshpeegul

3,404
1
18
18

Hm... I still get integer time with `Time::HiRes`. However, `clock_gettime()` from that module does the trick. It's perl 5.10.0 – Dallaylaen Feb 27 '11 at 18:17
@Dallaylaen: did you export time from Time::HiRes? – ysth Feb 27 '11 at 19:17
Thanks, it was my mistake. Of course `use Time::HiRes qw/time/` works fine. – Dallaylaen Feb 27 '11 at 22:51

score 5 · Answer 2 · answered Nov 21 '11 at 19:01

5

A real world example would be:

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

answered Nov 21 '11 at 19:01

Hawk

551
8
10

score 0 · Answer 3 · edited May 23 '17 at 10:30

0

perl -MTime::HiRes=time -e 'print time;'

For Perl: v5.8.4 built for SunOS (sun4-solaris-64int), oylenshpeegul's answer needs to be modified.

edited May 23 '17 at 10:30

Community

1
1

answered Feb 08 '14 at 02:03

pds

2,242
1
22
20

What's the best way to get Epoch milliseconds in Perl?

3 Answers3