(@ok, @no) = ((), ());
map {$_->name =~ /[0-9][0-9]$/ ? push @ok, $_ : push @no, $_} @{$rec->vals};