my ( $thing ) = values %$data; [download]
In reply to Re: Transforming hash (removing useless key) by friedo in thread Transforming hash (removing useless key) by sschneid