Select Code to Download

my @sorted_recs = sort { $$records[$a][2] <=> $$records[$b][2] } @reco
+rds;

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