in reply to Re^2: Finding old copies of filesin thread Finding old copies of files
$known_files{$file}{$size} = 1; [download]
Change that to ...
$known_files{$file}{$size}++; [download]
... and you know how many (possible) duplicates you have found.
Alexander