in reply to Print HoH
Update: If you are just debugging, and do not care about the exact output format...
use Data::Dumper; print Dumper(%HoH); [download]