Perlで処理時間を計測する方法にはいろいろあるのでしょうが、とりあえず下記のプログラムでできそうです。秒数を計算しているので、精度を変更したり、結果表示を変更したい場合は、微調整が必要です。
$ cat time.pl
#!/usr/bin/perl
#!/usr/bin/perl
my $startTime = time;
my $time1 = localtime(time);
print $time1;
print "\n";
my $time2 = localtime(time);
print $time2;
print "\n";
sleep 3;
my $stopTime = time;
print $stopTime - $startTime;
print "\n";