/home/UTKU/devel/my_script #### /home/UTKU/devel/my_script/dir_one/my_package.pm /home/UTKU/devel/my_script/dir_two/my_package.pm #### #!/usr/bin/perl -w BEGIN { push @INC, "/home/UTKU/devel/my_script" } use Data::Dumper; use dir_two::my_package; print Dumper(\%my_hash); #### $ ./my_script.pl Name "main::my_hash" used only once: possible typo at ./my_script.pl line 9. $VAR1 = {}; #### ##! /usr/local/bin/perl package my_package; require(Exporter); @ISA = qw(Exporter); @EXPORT = qw( %my_hash ); %my_hash = ( ... );