http://www.perlmonks.org?node_id=1063974


in reply to how extract values of hash via key

Checkout the function safe_reverse in module Hash::MoreUtils.
Bill