Help for this page

Select Code to Download


  1. or download this
    Benchmark::cmpthese(5000, {
       'outside' => sub { 
    ...
             Rate  inside outside
    inside  120/s      --    -13%
    outside 138/s     15%      --
    
  2. or download this
    for(my $i = 64; $i < (scalar(@rddt) - (2 * $pond)); $i++){
    
  3. or download this
    @rddt = (1) x 1000;
    $pond = 32;
    ...
    
    inside  273/s      --    -39%
    outside 450/s     65%      --