Select Code to Download

    array => sub {
        my @list = @input;
        @list[@input] = @input;
        Compare(\@list,\@output) or die "@list" if DO_CHECK;
    },

             Rate johngg  Tux pryrt choroba0 choroba choroba2 grepfirs
+t sortfirst Eily array
johngg     6047/s     -- -26%  -36%     -57%    -67%     -69%      -70
+%      -73% -83%  -93%
...
sortfirst 22333/s   269% 174%  136%      60%     23%      15%        9
+%        -- -37%  -73%
Eily      35540/s   488% 337%  275%     155%     95%      83%       74
+%       59%   --  -57%
array     83332/s  1278% 923%  780%     499%    358%     329%      307
+%      273% 134%    --