Help for this page
package Foo; ... sub init { push @INC, '/my/module/dir'; }
package Bar; use Foo; BEGIN { Foo->init } use Baz; # Resides under /my/module/dir