>perl -MO=Concise -e"@b = grep f, @h{@a}"
...
a                 <@> hslice lKM ->b
...

>perl -MO=Concise -e"@b = sort @h{@a}"
...
a              <@> hslice lK ->b
...