in reply to Directly assigning Filehandle

Or if you prefer OO notation,
my $fh = IO::File->new($filename, 'r')

In Section Seekers of Perl Wisdom