in reply to Traverse an unknown multi-dimensional hash
You can use Data::Dumper:
use Data::Dumper; print Dumper \%hash; [download]
citromatik