my $filename = '/tmp/blah.txt';
open( FILE, '<', $filename ) or die "Can't open $filename: $!\n";