Select Code to Download

/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

...
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 l
+ine 9.
$VAR1 = {};

##! /usr/local/bin/perl
package my_package;
...
%my_hash = (
...
);