in reply to (tye)Re3: sorting an array with an array
in thread sorting an array with an array

sub filter (&@) {map {local $_ = $_; $_ [0] -> (); $_} @_ [1 .. $# +_]}

Abigail