Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl
    use strict;
    ...
    
    timethese (10000,{'MethodOne'=>'&doSelect'});
    
  2. or download this
    Connected to Database OK.
    Creating Tables && INSERTING
    ...
     MethodOne: 100 wallclock secs (71.48 usr + 18.18 sys = 89.66 CPU) @ 1
    +11.53/s (n=10000)
    Benchmark: timing 10000 iterations of MethodOne...
     MethodOne:  5 wallclock secs ( 2.83 usr +  1.11 sys =  3.94 CPU) @ 25
    +38.07/s (n=10000)