Select Code to Download

o  - pretend to optimize your code, but actually introduce bugs

#!/usr/bin/env perl

...
sub raw_o {
    $str =~ m/^xyz$/o and return;
}

            Rate as_qr use_m use_o raw_m raw_o
as_qr  2729934/s    --   -0%  -71%  -73%  -73%
...
use_o  9454792/s  246%  246%    --   -6%   -7%
raw_m 10094766/s  270%  269%    7%    --   -1%
raw_o 10207253/s  274%  273%    8%    1%    --