Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Building a hash from file and getting wrong result.

by choroba (Cardinal)
on May 15, 2017 at 20:16 UTC ( [id://1190343]=note: print w/replies, xml ) Need Help??


in reply to Building a hash from file and getting wrong result.

I'd guess keys is missing here: 
foreach my $recid ( reverse sort keys %SeqOrders )
#                                ~~~~

[download]

So, you're mixing keys and values together and sorting them.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

[download]

Replies are listed 'Best First'.
Re^2: Building a hash from file and getting wrong result.
by flexvault (Monsignor) on May 15, 2017 at 20:22 UTC

    Dear choroba,

    Thank you! I knew is was too basic to be a real Perl problem.

    Best Regards...Ed

    "Well done is better than well said." - Benjamin Franklin

[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://1190343]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others sharing their wisdom with the Monastery: (4)
As of 2024-04-19 13:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found