Select Code to Download

#!/usr/local/bin/perl -slw
use strict;
...
    lccmp  => q[ lccmp() ],
    regex  => q[ regex() ],
};

         Rate regex lccmp
regex  8083/s    --  -82%
lccmp 45997/s  469%    --