Good Habits for More Secure Coding 

• Don't use this:

open my $fh, $filename or die ...

• Use this:

open my $fh, '<', $filename or die ...