Select Code to Download

use strict;
use warnings;

...
    limit_array => sub { my ($id, @rest) = split ' ', $string, 2 },
    nolim_array => sub { my ($id, @rest) = split ' ', $string },
};

                 Rate nolim_array limit_array limit_undef nolim_undef
nolim_array  573888/s          --        -59%        -67%        -67%
limit_array 1396453/s        143%          --        -20%        -21%
limit_undef 1746725/s        204%         25%          --         -1%
nolim_undef 1760873/s        207%         26%          1%          --