simple perl script to find duplicate files by their checksums