print Data::Dumper(%HASH);