Help for this page

Select Code to Download

Select or download this

use Benchmark  qw( cmpthese );
use List::Util qw( shuffle );
...
        Rate  sort rsort
sort  1.01/s    --   -2%
rsort 1.03/s    2%    --