You want to use the each function. See http://perldoc.perl.org/functions/each.html. (This was the second hit in a Google search for "perldoc print hash each".)