Lines Matching refs:fh
25 my $fh;28 open $fh, "<:encoding($encoding)", $file_name32 open $fh, '<', $file_name39 $content = <$fh>;41 close $fh or carp "Can't close $fh: $!";55 my $fh;57 open $fh, "<:encoding($encoding)", $file_name61 open $fh, '<', $file_name68 $content = <$fh>;70 close $fh or carp "Can't close $fh: $!";