Searched refs:FooLoader (Results 1 - 1 of 1) sorted by relevance

/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dinccode.t108 sub FooLoader::INC { subroutine
118 my $href = bless( {}, 'FooLoader' );
125 is( ref $INC{'Quux.pm'}, 'FooLoader',
131 my $aref = bless( [], 'FooLoader' );
138 is( ref $INC{'Quux1.pm'}, 'FooLoader',
144 my $sref = bless( \(my $x = 1), 'FooLoader' );
151 is( ref $INC{'Quux2.pm'}, 'FooLoader',

Completed in 96 milliseconds