use dir_one::my_package qw(%my_hash);
BEGIN {
 # force this to run before the "use" below
 print "%s\n", Dumper(\%my_hash);
}
use dir_two::my_package qw(%my_hash);

print "%s\n", Dumper(\%my_hash);

##</code><code>##

print Dumper(\%my_hash);

##</code><code>##

use dir_one::my_package;
BEGIN {
 # force this to run before the "use" below
 print Dumper(\%my_hash);
}
use dir_two::my_package;

print Dumper(\%my_hash);