The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

File::Find::Duplicates - Find duplicate files

SYNOPSIS

  use File::Find::Duplicates;

  my %dupes = find_duplicate_files('/basedir1', '/basedir2');

  local $" = "\n  ";
  foreach my $filesize (keys %dupes) {
    print "Duplicate files of size $filesize:\n  @{$dupes{$filesize}}\n";
  }

DESCRIPTION

This module provides a way of finding duplicate files on your system.

When passed a base directory (or list of such directories) it returns a hash, keyed on filesize, of lists of the identical files of that size.

TODO

Check the contents of tars, zipfiles etc to ensure none of these also exist elsewhere (if so requested).

SEE ALSO

File::Find.

AUTHOR

Tony Bowden, <kasei@tmtm.com>.

COPYRIGHT

Copyright (C) 2001 Tony Bowden. All rights reserved.

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