/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 = (
...
);