Hash::Diff - Return difference between two hashes as a hash
use Hash::Diff qw( diff );
my %a = (
'foo' => 1,
'bar' => { a => 1, b => 1 },
);
my %b = (
'foo' => 2,
'bar' => { a => 1 },
);
my %c = %{ diff( \%a, \%b ) };
# %c = %{ foo => 1, bar => { b => 1} }
Hash::Diff returns the difference between two hashes as a hash.
- diff ( <hashref>, <hashref> )
- Diffs two hashes. Returns a reference to the new hash.
- left_diff ( <hashref>, <hashref> )
- Returns the values in the left hash that is not, or different from the
right hash.
This will not handle self-referencing/recursion within hashes well. This will
only handle HASH and SCALAR.
Plans for a future version include incorporate deep recursion
protection. And support for ARRAY.
Sure! Report here: http://rt.cpan.org/NoAuth/Bugs.html?Dist=Hash::Diff
Bjorn-Olav Strand <bo@startsiden.no>
Copyright (c) 2010 ABC Startsiden AS. All rights reserved.
This library is free software. You can redistribute it and/or
modify it under the same terms as Perl itself.