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

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IO/t/
H A DIO.t83 my $fakemod = File::Spec->catfile( $fakedir, 'fakemod.pm' );
88 if (open( OUT, ">$fakemod"))
91 package IO::fakemod;
113 eval { IO->import( 'fakemod' ) };
114 ok( IO::fakemod::exists(), 'import() should import IO:: modules by name' );
120 1 while unlink $fakemod;

Completed in 14 milliseconds