in reply to Slice of an array of hashes

my @list = map { $_->{DB} } @$aref;
My criteria for good software:
  1. Does it work?
  2. Can someone else come in, make a change, and be reasonably certain no bugs were introduced?

In Section Seekers of Perl Wisdom