$ cat > fh_test
This is fh_test

$ perl -wE 'open my $fh, q{<}, q{fh_test} or die $!; while (<$fh>) { print }'
This is fh_test

$ perl -wE 'open my $fh, q{<}, q{fh_test} or die $!; while (< $fh >) { print }'
GLOB(0x10053ad8)