perl 中时间函数

求助： perl 中时间函数
想用perl计算一个外部函数的执行时间，不知道具体函数。
搜了一下localtime（）之类的用法，都不是我要的，帮忙填空吧

大体这样

Perl code

$begin = localtime();'command';$end = localtime();print "Used time : " . ( $end - $begin );

Perl code

use Benchmark;timethis(100, sub { system 'dir' });
[解决办法]
用time函数就行，得到的是秒数。
my $t1=time();
func;
my $t2=time();
my $t=$t2-$t1;
print "$t\n";
[解决办法]
用time函数就行