This is one of the sorting routines I had to learn the hard way. You simply have to choose which sub-element by which you'll do the sorting in your sort statement and then you're home free.

# say I've got a two dimensional array...
   @array = ( ["oops", 0], [ "happy", 2 ], [ "word", 4 ] );

# sort on the sub-element of your choice here....
   @sorted = sort{$a->[0] cmp $b->[0]}@array;
   
   
   # and I wanna print the contents of it thusly:
   foreach $ar (@sorted) {
        print "$ar->[0] is $ar->[1]\n"
   }

   # how would I sort the @a based on the $ar->[0]?
[download]

Mick