Select Code to Download

Benchmark: timing 10000 iterations of abigail, grinder, posixguy, roge
+r...
   abigail: 55 wallclock secs (51.42 usr +  0.12 sys = 51.54 CPU) @ 19
+4.02/s (n=10000)
   grinder:  1 wallclock secs ( 0.60 usr +  0.00 sys =  0.60 CPU) @ 16
+666.67/s (n=10000)
  posixguy:  1 wallclock secs ( 0.96 usr +  0.00 sys =  0.96 CPU) @ 10
+416.67/s (n=10000)
     roger:  1 wallclock secs ( 0.61 usr +  0.00 sys =  0.61 CPU) @ 16
+393.44/s (n=10000)

#!/usr/bin/perl -w

...
}

timethese(10000, {grinder=>'grinder()', roger=>'roger()', posixguy=>'p
+osixguy()', abigail=>'abigail()'});