Hallo,
ich möchte gerne die Zeit einer Funktion ermitteln. Ich schreibe dann so:
#8<---------------8<--------PERL-------8<---------------
sub test1;
my $tm = 0;
my $timer_string = 0;
my $out = 0;
$tm = timethese(10000,{
'test1' => 'test1()',
});
sub test1{
$out="sssadsd\n" ;
$out.="sssadsd\n" ;
$out.="sssadsd\n" ;
}
$timer_string = timestr($tm);
#8<---------------8<--------PERL-------8<---------------
...
#8<---------------8<--------HTML-------8<---------------
<html>
<body>
$timer_string
</body>
</html>
#8<---------------8<--------HTML-------8<---------------
Und der Webserver meldet sich damit:
Software error:
Not an ARRAY reference at /usr/lib/perl5/5.6.1/Benchmark.pm line 423.
Was mache ich falsch?
Danke!