Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
               two => 'map $_->[0], sort { $a->[1] <=> $b->[1] } map [
+$_, -s $_],  @bin'
            }
        );
  2. or download this
    timethese(0, { test1 => '...', test2 => '...'})
  3. or download this
    
$ perl thing
usage: $result = timethis($time, 'code' );        or
       $result = timethis($time, sub { code } );