Help for this page

Select Code to Download

Select or download this

package Foo::Bar;

...
   $pkg .= '.pm';
   print($INC{$pkg}, "\n");
}

Select or download this

package Pkg;

...
output
======
Pkg, script.pl, 10, Pkg::test, 1, , , , 0,