Select Code to Download

Benchmark: timing 200000 iterations of Big, Pak, Str...
 Big: 6 wallclock secs ( 5.64 usr + 0.00 sys = 5.64 CPU) @ 35454.71/s 
+(n=200000)
 Pak: 4 wallclock secs ( 4.47 usr + 0.00 sys = 4.47 CPU) @ 44752.74/s 
+(n=200000)
 Str: 4 wallclock secs ( 3.95 usr + 0.00 sys = 3.95 CPU) @ 50594.49/s 
+(n=200000)

use strict;
# use warnings;
...
   Big => sub { big_look($big_ref) },
   Pak => sub { pak_look($pak_ref) },
};