or you can use the reverse sort like this ...
@trav= reverse sort { $a <=> $b } @trav;
_
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional command
Tuesday, November 20, 2001, 6:27:44 PM, Brett W. McCoy wrote:
BWM> On Tue, 20 Nov 2001, Franck FASANO wrote:
>> Here is a little code :
>>
>> --
>> my @trav= ( 1, 12, 5, 3);
>> @trav=sort { $b cmp $a } @trav;
>>
>> foreach (@trav) {
>> print " $_ ";
>> }
>> --
>>
>> Afte
On Tue, 20 Nov 2001, Franck FASANO wrote:
> Here is a little code :
>
> --
> my @trav= ( 1, 12, 5, 3);
> @trav=sort { $b cmp $a } @trav;
>
> foreach (@trav) {
> print " $_ ";
> }
> --
>
> After exec, we have :
> 5 3 12 1
You're using the wrong operator. You want { $
@trav=sort { $b <=> $a } @trav;
<=> instead of cmp for numerical descending
http://www.perldoc.com/perl5.6.1/pod/func/sort.html
Etienne
Franck FASANO wrote:
>
> Here is a little code :
>
> --
> my @trav= ( 1, 12, 5, 3);
> @trav=sort { $b cmp $a } @trav;
>
> foreach (@trav) {
>
Here is a little code :
--
my @trav= ( 1, 12, 5, 3);
@trav=sort { $b cmp $a } @trav;
foreach (@trav) {
print " $_ ";
}
--
After exec, we have :
5 3 12 1
But I expected :
12 5 3 1
How can I do ?
I mean easily (without developping some code) ...
Franck.
--
To uns