if ($if_name eq $outside_if && $if_dir eq 'inbound') {
			if (my $service eq 'mail') {
                           my $smtp_inc_src_cnt{$src} ++;
                           my $smtp_inc_dst_cnt{$dst} ++;
                           my $smtp_inc_tot ++;
			}
}

##</code><code>##

syntax error at D:\perltmp\statpdf2.pl line 49, near "$smtp_inc_src_cnt{"
syntax error at D:\perltmp\statpdf2.pl line 49, near "++;"
syntax error at D:\perltmp\statpdf2.pl line 50, near "$smtp_inc_dst_cnt{"
syntax error at D:\perltmp\statpdf2.pl line 50, near "++;"
syntax error at D:\perltmp\statpdf2.pl line 54, near "}"