is close to what you want. Change the call to the function to:
my %dupes = find_duplicate_files('c:\\');
Write it to a file and from the command line you can write something like this:
perl myprogram > output_file
Cheers, Ben
I have come to believe that idealism without discipline is a quick road to disaster, while discipline without idealism is pointless. -- Aaron Ward (my brother)