Sample code for Benchmark

use Benchmark; 
my $t0 = new Benchmark; 

# See code run 

my $t1 = new Benchmark; 
my $td = timediff($t1, $t0); 
print timestr($td) . "\n";
[download]

Use as many or as few of those Benchmark objects as you'd like at any point in the program. The CPAN docs on Benchmark are great, but I thought it may be helpful to see the code right here. Instant gratification is key. :)

Comment on Sample code for Benchmark Download Code

Replies are listed 'Best First'.
Re: Sample code for Benchmark by cybear (Monk) on May 24, 2002 at 16:26 UTC
what module does Benchmark come from?	[reply]
Re: Re: Sample code for Benchmark by joealba (Hermit) on May 24, 2002 at 16:29 UTC
Benchmark -- It's its own module -- in the standard Perl distrib.	[reply]