use Data::Dumper;
warn Dumper \%XYZ::Hash1;