Select Code to Download

use strict;
use warnings;
...
my @ok = grep {/[0-9][0-9]$/ or !push(@no, $_) }@{$rec};
return (\@ok, \@no);
}

OP:
  xyz10, xab02
...
Roy:
  xyz10, xab02
  abc0, axy1

             Rate Tanktalus        OP  JDPorter       Roy    Fletch   
+     GF
Tanktalus 39861/s        --      -14%      -23%      -43%      -44%   
+   -57%
...
Roy       70510/s       77%       52%       36%        --       -1%   
+   -23%
Fletch    71157/s       79%       53%       37%        1%        --   
+   -23%
GF        91995/s      131%       98%       77%       30%       29%   
+     --