BEGIN { $my_module_dir = '~/myperl_modules/`; push(@INC, ('.',"$my_module_dir")); } use mymodule; ...