Select Code to Download

@array = ([8,9,10], [4,5,6], [7,8,9]);
@sorted = sort { $a->[1] <=> $b->[1] } @array

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