What about to sort a multidimensional array using the elements of @{$array[1]}?

@array = [8,9,10], [6,5,4], [7,8,9];

@sorted = [10,9,8], [4,5,6], [9,8,7];
[download]