Help for this page

Select Code to Download


  1. or download this
    timethese(1000000, {
        'blessed' => sub { my $bar = $foo; $c->clean($foo); },
        'normal'  => sub { my $bar = $foo; $bar =~ s/^\s+|\s$//g; },
        'super' => sub { my $bar = $foo; $bar =~ s/$c//g; },
    });
    
  2. or download this
    Benchmark: timing 1000000 iterations of blessed, normal, super...
       blessed: 10 wallclock secs ( 9.83 usr +  0.00 sys =  9.83 CPU)
        normal:  4 wallclock secs ( 5.42 usr +  0.00 sys =  5.42 CPU)
         super:  7 wallclock secs ( 6.71 usr +  0.00 sys =  6.71 CPU)