Create dd.pl

the perl script to help find out duplicated files on your computer.