@array=(
     ["def","456","$%^"],
     ["abc","123","!@#"],
     ["ghi","789","&*("]
     );

#code to sort the aoa here

for $i ( 0 .. $#array ) {
     print "$array[$i][0]\n";
}