Select Code to Download

use 5.010;

...
        default    { $N[$i]++; }
    }
}

#!/usr/local/bin/perl
use 5.010;
...
orig_g/w   24660/s      1067%         --       -19%       -68%
substr_g/w 30632/s      1350%        24%         --       -60%
BUK        77422/s      3565%       214%       153%         --