Perl needs to compare two data structures and the difference in return

Question

I have two data structures with a mix of hashes and arrays. How can I compare two data structures and return their differences, something like perl Test :: Harness, but I don't want to run unit test .... or is there a way to drag Test :: Harness without actually running unit test?

Answer 1

Perl Monks says that Test :: Deep , Data :: Compare and Data :: Match are your friends. These packages do not seem to aim at creating detailed differences, but you can hack a callback to track the exact differences.

Answer 2

Test:: Deep:: NoTest ( Test:: Deep) , , Test:: script (eq_deeply, cmp_deeply ..). , deep_diag(), , .

Data:: Compare - , (, cmp ), ( ) .

, , deep_diag(), Data:: Compare , .