my @sorted_recs = sort { $$records[$a][2] <=> $$records[$b][2] } @records; #### my @sorted_recs = sort { $a->[2] <=> $b->[2] } @records;