Select Code to Download

use strict;
use warnings;
...
    'uniq3'  => sub { my @uniq = uniq3(@$data) },
    'uniq4'  => sub { my @uniq = uniq4(@$data) },
});

        Rate uniq1 uniqM uniq2 uniq3 uniq4
uniq1 35.2/s    --   -1%   -5%  -15%  -21%
...
uniq2 36.9/s    5%    4%    --  -11%  -17%
uniq3 41.5/s   18%   17%   13%    --   -7%
uniq4 44.7/s   27%   26%   21%    8%    --

        Rate uniq2 uniq1 uniq3 uniq4
uniq2 34.2/s    --   -4%  -30%  -30%
uniq1 35.5/s    4%    --  -28%  -28%
uniq3 49.1/s   43%   38%    --    0%
uniq4 49.1/s   43%   38%    0%    --

        Rate uniqM uniq2 uniq1 uniq3 uniq4
uniqM 24.8/s    --  -28%  -30%  -50%  -50%
...
uniq1 35.5/s   43%    4%    --  -28%  -28%
uniq3 49.5/s  100%   45%   39%    --    0%
uniq4 49.5/s  100%   45%   39%    0%    --

         Rate uniq1 uniq2 uniq3 uniq4 uniqM
uniq1  3445/s    --  -18%  -27%  -77%  -80%
...
uniq3  4696/s   36%   11%    --  -69%  -72%
uniq4 15175/s  340%  260%  223%    --  -10%
uniqM 16905/s  391%  301%  260%   11%    --