Select Code to Download

#!/usr/bin/perl

...
        'first'=> 'my $result = first { $_ } @$'.$name,
    })
}

START:
         Rate  grap  grep first
...
grap  102/s    --  -73%  -86%
first 377/s  269%    --  -50%
grep  751/s  635%   99%    --