Lines Matching refs:fh
382 my $fh = 'main::fh';
384 open( $fh, "<$Monfile" ) && do {
386 header($fh);
387 close( $fh );
425 my $fh = 'main::fh';
444 open( $fh, "<$monout" ) || die "Unable to open $monout\n";
446 header($fh);
455 parsestack( $fh, $names, $calls, $times, $ctimes, $idkeys );
670 my( $fh, $names, $calls, $times, $ctimes, $idkeys ) = @_;
697 while(<$fh>){
880 my $fh = shift;
881 chop($_ = <$fh>);
885 while(<$fh>){