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


in reply to How would I write this using map?

Using map, it would look like this:
push @$ref2array, map $_, sort keys %{$obj->things};
... which could then be distilled to:
push @$ref2array, sort keys %{$obj->things};

---
It's all fine and dandy until someone has to look at the code.