Select Code to Download

#!/usr/local/bin/perl

...
        }
}
close INFILE;

s/^total\s[0-9]+\s[0-9]+\s([0-9]+)\s([0-9]+)$/$1 $2/