Lines Matching refs:fh
30 open my $fh, '>', $ro_empty_file or die "open $fh: $!";31 close $fh or die "close $fh: $!";296 'open my $fh, "test.pl"; -r $fh; undef $fh; open my $fh2, '311 open my $fh, 'test.pl';313 stat *$fh{IO};317 -r *$fh{IO};321 stat $fh;322 close $fh;327 -T $fh; # closed