Sort 2-d array using multiple columns

[scottmf]

I have an array similar to the following (the one I am actually sorting
has 25 columns and several thousand rows):

@AoA = ([3, 1, 8],
[2, 2, 6],
[2, 1, 4],
[3, 2, 3]);

and I need to sort it by the second column, then the first column so
that my output would be as follows:

@sorted = ([2, 1, 4],
[3, 1, 8],
[2, 2, 3],
[3, 2, 6]);

I can sort by one column without a problem but have not been able to
find anything on sorting with respect to both columns. Any help would
be much appreciated.

 

[scottmf]

Thanks, it works perfectly.

~Scott

 

[Gunnar Hjalmarsson]

... have not been able to find anything on sorting with respect
to both columns. ...

Where did you look then?? "perldoc -f sort" includes examples with a
second sort criterium.

 

[Tad McClellan]

@AoA = ([3, 1, 8],
[2, 2, 6],
[2, 1, 4],
[3, 2, 3]);

and I need to sort it by the second column, then the first column

have not been able to
find anything on sorting with respect to both columns.

You are expected to check the Perl FAQ *before* posting to
the Perl newsgroup.

Any help would
be much appreciated.

You already have the help you need sitting on your hard disk, no
need to ask thousands of people around the world to take the
time to help you.


perldoc -q sort

How do I sort an array by (anything)?

...
If you need to sort on several fields, the following paradigm
is useful.

@sorted = sort { ...