Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re^3: Sort hash with values

by AnomalousMonk (Chancellor)
on Jun 24, 2013 at 19:44 UTC ( #1040484=note: print w/replies, xml ) Need Help??

in reply to Re^2: Sort hash with values
in thread Sort hash with values

The only change i have done is reversing the hash.

A naive hash reversal works just fine if the hash values are unique to begin with. If they're not, somebody's gonna get (silently) clobbered. Maybe add a pre/post reversal size check:

>perl -wMstrict -le "my %hash = qw(a aye b bee c see eh aye); ;; my $pre_k = keys %hash; %hash = reverse %hash; $pre_k == keys %hash or die 'somebody got clobbered'; " somebody got clobbered at -e line 1.

Replies are listed 'Best First'.
Re^4: Sort hash with values
by sammy_01 (Initiate) on Jun 25, 2013 at 10:53 UTC
    Oh Yes, i do agree with you.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1040484]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2018-06-19 08:58 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (111 votes). Check out past polls.