in reply to sorting array of arrays reference

A concise O(N) solution:
my @top = @masterArray[0..2]; @top = (sort { $b->[2] <=> $a->[2] } @top, $masterArray[$_])[0..2] for + 3..$#masterArray;
Though, I have no idea how fast it would be.