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
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.