Select Code to Download

use strict;
use warnings;
...
    'set' => sub {my $set = Set::Scalar->new(@array);},
    }
 );

         Rate   set   map map++    GF
set    2203/s    --  -84%  -91%  -92%
map   13740/s  524%    --  -46%  -49%
map++ 25598/s 1062%   86%    --   -6%
GF    27113/s 1131%   97%    6%    --