Comparing two hashes

midnight has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Comparing two hashes by kennethk (Abbot) on Apr 01, 2010 at 20:47 UTC
A little information on what you've tried would be helpful (How do I post a question effectively?). This is either a faq or closely related to it: see How do I test whether two arrays or hashes are equal? in perlfaq4.	[reply]
Re: Comparing two hashes by moritz (Cardinal) on Apr 01, 2010 at 20:46 UTC
What exactly do you want to compare? the values for given keys? or if the set of keys in one hash is the same as in the other? or something else?	[reply]
Re: Comparing two hashes by toolic (Bishop) on Apr 01, 2010 at 21:36 UTC
Welcome to the Monastery, midnight. There is a great tool here to help you find information called Super Search. For example, where title contains all of "compar", "hash", click on this link, then hit "Search": http://www.perlmonks.org/?node_id=3989;HIT=compar%20hash;re=N	[reply]
Re: Comparing two hashes by dwm042 (Priest) on Apr 01, 2010 at 21:08 UTC
As other monks have pointed out, the question is a little vague. If what you're trying to do is compare elements in one hash with elements in another hash, and the key values do not matter, you could use code something like this: `#!/usr/bin/perl use warnings; use strict; my %giant = ( fee => 'fi', fo => 'fum', I => 'smell' ); my %mouse = ( eeeny => 'meeny', miny => 'mo', nose => 'smell' ); my $out = "giant\{%s\} equals mouse\{%s\}\n"; for my $g ( sort keys %giant ) { for my $m ( sort keys %mouse ) { printf $out, $g, $m if ( $giant{$g} eq $mouse{$m} ); } }` [download]	[reply] [d/l]
Re^2: Comparing two hashes by ruzam (Curate) on Apr 02, 2010 at 02:06 UTC
Actually, this only tells you which 'values' exist in both hashes, not whether the key/value pairs are the same, let alone whether the two hashes are the same. How to check similarity of two hash tables How do I test the deep equality of two hash tables? How to test equality of hashes?	[reply]
Re^3: Comparing two hashes by dwm042 (Priest) on Apr 02, 2010 at 18:06 UTC
Actually, that's what I intended to do, ruzam. And that's what I said I was going to do. One example, of one possible interpretation of the OP's question, was all I wanted to provide.	[reply]
Re^4: Comparing two hashes by ruzam (Curate) on Apr 03, 2010 at 04:00 UTC
Re: Comparing two hashes by bichonfrise74 (Vicar) on Apr 01, 2010 at 20:45 UTC
Something like... 1. Create an outer for loop on 1st hash. 2. Create an inner for loop on the 2nd hash. 3. If keys and values of 2nd hash element is equal to the 1st hash element, then they are the same.	[reply]
Re^2: Comparing two hashes by moritz (Cardinal) on Apr 01, 2010 at 21:31 UTC
Doing a linear scan over an associative array is like trying to club someone to death with a loaded Uzi -- TimToady Sounds like you don't need step 2. at all, since you can simply access the hash item by key. Perl 6 - links to (nearly) everything that is Perl 6.	[reply]
Re: Comparing two hashes by vennila (Novice) on Apr 02, 2010 at 06:37 UTC
Try to check test::Deep or Storable module.	[reply]
Re: Comparing two hashes by midnight (Initiate) on Apr 14, 2010 at 22:28 UTC
Thank you guys. This has helped	[reply]