use strict; use warnings; use Cwd; my $dir = getcwd; my $file = $dir . "/myModules/" . "SomeModule.pm"; use $file; print "I am in the main package\n"; SomeModule::func();