Select Code to Download

# Sort by using indices
@SortedList = sort { $List[$a][0] <=> $List[$b][0] } 0..$#List;

# Sort by using array elements
@SortedList = sort { $a->[0] <=> $b->[0] } @List;