phaylon@hamlett:~/ptests> perl search_bench.pl 2>/dev/null
Benchmark: timing 1000000 iterations of index, w_reg...
     index: 25 wallclock secs (24.36 usr +  0.62 sys = 24.98 CPU) @ 40032.03/s (n=1000000)
     w_reg: 74 wallclock secs (72.47 usr +  1.10 sys = 73.57 CPU) @ 13592.50/s (n=1000000)