Re^2: Common hash keys


Perl: the Markov chain saw
	PerlMonks

Re^2: Common hash keys

by moritz (Cardinal)

on Jun 07, 2008 at 07:56 UTC ( [id://690807]=note: print w/replies, xml )

Need Help??

in reply to Re: Common hash keys
in thread Common hash keys

Your inner loop could be described as clubbing somebody to death with a loaded uzi. No need to iterate over the hash keys just to check if one is present. Looking up a key in a hash is the most basic operation a hash offers ;-)

Comment on Re^2: Common hash keys

Replies are listed 'Best First'.
Re^3: Common hash keys by parv (Parson) on Jun 07, 2008 at 08:34 UTC
`(:` Indeed! (But I did not write Perl, did I?)	[reply]
Re^4: Common hash keys by massa (Hermit) on Jun 07, 2008 at 13:34 UTC
Maybe `my @keys_in_commmon = grep $hashref1->{$_}, keys %$hashref2;` [download] would've sufficed?? If you just have to determine if they have keys in common, `if( grep $hashref1->{$_}, keys %$hashref2 ) { ... }` [download] would do the trick...	[reply] [d/l] [select]
Re^5: Common hash keys by Anonymous Monk on Jun 08, 2008 at 06:56 UTC
I would say `my @keys_in_commmon = grep``exists``($hashref1->{$_}), keys %$hashref2;` to avoid autovivification.	[reply] [d/l] [select]
Re^6: Common hash keys by parv (Parson) on Jun 08, 2008 at 08:29 UTC
Re^6: Common hash keys by throop (Chaplain) on Jun 08, 2008 at 13:31 UTC
Re^7: Common hash keys by Porculus (Hermit) on Jun 15, 2008 at 17:30 UTC

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://690807]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others drinking their drinks and smoking their pipes about the Monastery: (4)

As of 2024-04-25 21:19 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found