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);