my @sorted = sort { $b->{id} <=> $b->{id} || $a->{foo} cmp $b->{foo} } @unsorted; # SLOW