Text::Same - Look for similarities between files or arrays

    use Text::Same;

    my $matchmap = compare "file_1", "file_2", { ignore_whitespace => 1 };
    my $matchmap = compare \@records1,  \@records2,  { ignore_simple => 3 };

  or use the "psame" command:

    psame -a file_1 file_2 | more

compare() compares two files or arrays of strings and returns a MatchMap object holding the results.

 Title   : compare
 Usage   : $matchmap = compare($options, $file1, $file2)
        or
           $matchmap = compare($options, \@array1, \@array2)
        then:
           my @all_matches = $matchmap->all_matches;
 Function: return a MatchMap object holding matches and non-matches between the
           two given files or arrays of strings

psame(1)

Kim Rutherford <kmr+same@xenu.org.uk>

Copyright 2005,2006 Kim Rutherford, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.