Select Code to Download

#!/usr/local/bin/perl
use strict;
...

timethese (10000,{'MethodOne'=>'&doSelect'});

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)