I re-ran the tests too, replacing the "print STDERR" with an assignment.

The "if" and "HashSub" methods speeds converge faster, with Hashsub becoming faster than "if" at a 22% match rate.

The minor differences in results may have to do with OS and perl implementations. I'm running Activestate perl 5.8 under Windows XP.