Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Twice the pleasure of sorting a hash

by broquaint (Abbot)
on Apr 26, 2004 at 09:52 UTC ( #348121=note: print w/replies, xml ) Need Help??

in reply to Twice the pleasure of sorting a hash

A double comparison should do it e.g
my %h = ( rock => 3, candle => 25, bug => 3, rain => 12, dust => 17, spider => 12, ); for( sort { $h{$b} <=> $h{$a} || $a cmp $b } keys %h ) { print "$_ => $h{$_}\n"; } __output__ candle => 25 dust => 17 rain => 12 spider => 12 bug => 3 rock => 3
So firstly we sort by value in descending order then optionally sort by key value.


Replies are listed 'Best First'.
Re: Re: Twice the pleasure of sorting a hash
by coldfingertips (Pilgrim) on Apr 26, 2004 at 09:55 UTC
    That works perfectly, you're the best!! Thanks so much for your help broquaint!!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://348121]
and a log crumbles through the grate...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (5)
As of 2016-12-04 20:38 GMT
Find Nodes?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:

    Results (69 votes). Check out past polls.