my @sorted = sort { f($a) cmp f($b) } @unsorted;