Sorting array of array 1

[KeziaKristina]

I have problem with sorting an array of array.
@array = (
[200,3],
[100,5],
[250,6],
[700,5],
[370,4],
);
I want to sort descanding the first elemen of array on each index.
The result is like this :
@array = (
[700,5],
[370,4],
[250,6],
[200,3],
[100,5],
);
Thanks..

 

[133tcamel]

@new = sort { $b->[0] <=> $a->[0]} @array;

just a fluke method ---
cheers!
san

"The universe has been expanding, and Perl's kind of been expanding along with the universe" - Larry Wall