Searched refs:test_require (Results 1 – 3 of 3) sorted by relevance
12 sub test_require {37 test_require('(STDIN open)');42 test_require('(STDIN closed)', 0);
221 foreach my $filename ('/test_require.pm', './test_require.pm',222 '../test_require.pm') {225 undef $test_require::loaded;228 is($test_require::loaded, undef, 'no module is loaded' );233 undef $test_require::loaded;235 eval { require 'test_require.pm'; };236 is($got, undef, 'the directory is scanned for test_require.pm');237 is($test_require::loaded, 1, 'the module is loaded');
4 package test_require; package6 ++$test_require::loaded;