in reply to foreach keys over multiple hashes

All else unchanged: my @hashes = (\%one, \%two, \%three); ____________
Makeshifts last the longest.