$ cat 11149115.pl
open (STAT, "<", "$file");
while ( $content = <STAT> ) {
     :
    $errcnt  = $total - $content;
}

:

printf RPT "  Number of Rejected Records   : $errcnt\n";
$ perl -cw 11149115.pl
syntax error at 11149115.pl line 3, near ":"
syntax error at 11149115.pl line 7, near ":"
11149115.pl had compilation errors.
$