open my $file, $filename; #### Parentheses missing around "my" list at ./protcpdump.pl line 40. #### open my $file, "$filename";