Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Sorted tied hash wierdness

by Chmrr (Vicar)
on Nov 18, 2003 at 23:49 UTC ( #308189=note: print w/ replies, xml ) Need Help??

in reply to Sorted tied hash wierdness

You're getting too reference-happy. $_->[0] isn't the same as $_[0] -- the former treats $_ as an array ref, and takes the 0th element of that, while the second takes the 0th element of the @_ array. In this case, it's the latter you want. Change sub { $_->[0] <=> $_->[1] } to sub { $_[0] <=> $_[1] } and you'll have more luck.

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'

Comment on Re: Sorted tied hash wierdness
Select or Download Code
Re: Re: Sorted tied hash wierdness
by genecutl (Beadle) on Nov 19, 2003 at 00:01 UTC
    You're absolutely right. Don't you hate it when you waste time on something that should be completely obvious? Thanks!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://308189]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (3)
As of 2014-07-13 01:47 GMT
Find Nodes?
    Voting Booth?

    When choosing user names for websites, I prefer to use:

    Results (244 votes), past polls