Hallo ;-)
Die Doku lesen: http://search.cpan.org/dist/perl/lib/Benchmark.pm
Ich nehme meine Wörter zurück! ;-)
use Benchmark;
$t0 = new Benchmark;
# ... your code here ...
$t1 = new Benchmark;
$td = timediff($t1, $t0);
print "the code took:",timestr($td),"\n";
Danke, es klappt!