amphiplex++

And just for the sake of completeness and complication *grin*, here's how to sort using indices: @sorted = @$setarray[ sort {$$setarray[$a]->size() <=> $$setarray[$b]->size()} 0 .. $#setarray ]; ____________
Makeshifts last the longest.