Select Code to Download

#!/usr/local/bin/perl -w

...
   $i++ if( $thing =~ /^thing$/ );
   $i;
}

Match eq => 1
Match rx => 1
Benchmark: timing 1000000 iterations of eq, rx...
        eq: 15 wallclock secs (14.27 usr +  0.00 sys = 14.27 CPU) @ 70
+093.46/s (n=1000000)
        rx: 22 wallclock secs (21.08 usr +  0.00 sys = 21.08 CPU) @ 47
+430.83/s (n=1000000)