in_some_sub{
 	open(THISFILE,'< $file') or warn "ERROR: Can't open $outfile!\n";
	binmode(THISFILE);
 	while(read(THISFILE,$part,1)){
 		$md5->add($part);
   	}
	$data = $md5->hexdigest;
        return unless ($data);
   	remove_dupes($data,$file);
}

##</code><code>##

Fingerprinting files with MD5SUM...

Press enter to continue...
ERROR: Can't open md5sums.txt!
d41d8cd98f00b204e9800998ecf8427e        ./Thumbs.db
ERROR: Can't open md5sums.txt!
---Duplicates found---
Remove which file:
1."./Thumbs.db" ,
2."./ABNC001.JPG" ,or
3. Ignore and do not delete either file.
(1/2/3)?:3
Ignoring...

d41d8cd98f00b204e9800998ecf8427e        ./ABNC001.JPG
ERROR: Can't open md5sums.txt!
---Duplicates found---
Remove which file:
1."./Thumbs.db" ,
2."./vincent05.jpg" ,or
3. Ignore and do not delete either file.
(1/2/3)?:3
Ignoring...

d41d8cd98f00b204e9800998ecf8427e        ./vincent05.jpg
ERROR: Can't open md5sums.txt!
---Duplicates found---
Remove which file:
1."./Thumbs.db" ,
2."./tux_trek.gif" ,or
3. Ignore and do not delete either file.
(1/2/3)?:

##</code><code>##

C:\WINDOWS\Profiles\madams\My Documents\My Pictures>md5sum -b Thumbs.db ABNC001.JPG vincent05.jpg tux_trek.gif
0b32237bb069cff23325ef2ea6c386ca *Thumbs.db
06b0c8cc903f49d131b27621389fb57d *ABNC001.JPG
032c0f9c5b5e9afe63936417037d8f4a *vincent05.jpg
8294e114b207d343000f74c72840a1ed *tux_trek.gif

##</code><code>##

              (__)
              (\/)
       /-------\/
      / | 666 ||
     *  ||----||