Time::HiRes自Perl 5.7.3起,它已成为核心部分。要检查其可用性,请从命令行检查Perl版本
perl-v,或尝试将其与一起使用
perl -e 'use Time::HiRes;'。
用法示例:
use Time::HiRes qw/ time sleep /;my $start = time;sleep rand(10)/3;my $end = time;print 'Slept for ', ( $end - $start ) , "n";
要以Konerak的评论为基础,如果该评论不存在或无法使用,请通过反引号使用本机Linux命令:
sub time_since_epoch { return `date +%s.%N` }print time_since_epoch;


