Searched defs:TieOut (Results 1 - 7 of 7) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/
H A DTieOut.pm1 package TieOut; package
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A DDumpvalue.t65 my $out = tie *OUT, 'TieOut';
191 $d->dumpglob( '', 0, 'read', *TieOut::read );
193 $d->dumpglob( '', 0, 'read', \&TieOut::read, 1 );
204 is( $d->CvGV_name(\&TieOut::read), 'TieOut::read', 'CvGV_name found sub' );
208 $d->dumpsub( '', 'TieOut::read' );
209 like( $out->read, qr/&TieOut::read in/, 'dumpsub found sub fine' );
213 $DB::sub{'TieOut::read'} = 'TieOut';
214 is( $d->findsubs( \&TieOut
271 package TieOut; package
[all...]
H A Dsigtrap.t59 my $out = tie *STDOUT, 'TieOut';
70 package TieOut; package
H A DBenchmark.t128 my $out = tie *OUT, 'TieOut';
497 ###}my $out = tie *OUT, 'TieOut'; my ($got); ###
499 my $debug = tie *STDERR, 'TieOut';
591 package TieOut; package
H A Ddumpvar.t57 my $out = tie *STDOUT, 'TieOut';
72 package TieOut; package
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Term/
H A DCap.t37 my $out = tie *OUT, 'TieOut';
203 package TieOut; package
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/t/
H A Dterse.t29 my $out = tie *STDOUT, 'TieOut';
95 package TieOut; package

Completed in 25 milliseconds