open(FILE, $filename);

##</code><code>##

my $fh;
open($fh, '<', $filename) or die "can't open $filename: $!"