foreach(keys %hash ){ } or while (my ($k,$v) = each %hash){ } [download]
In reply to Re: 'reversing' a hash by shotgunefx in thread 'reversing' a hash by Tomte