use Data::Dumper;
warn Dumper \%XYZ::Hash1;
[download]

Note, that hash variables should be declared as package variables in XYZ. Like this:

our (%Hash1, %Hash2, %Hash3);
[download]

though you seems aren't using strict...