Select Code to Download

my $reject_rx = qr{
    total [ ] rows [ ] rejected: [ ] (\d+)
...
    my $count = defined $1? $1 : $2;
    print $count, "\n";
}

use 5.010_00

...
if ( my ($count) = $line =~ /$reject_rx/ ) {
    say $count;
}