On our Sun Solaris server, I need a perl program to find all duplicate filenames on a file system. I want just the first characters up the first "." (dot) in the search. We may have some files by the same name but one of them may be compressed; (.Z) in another directory. I also need to be able to exclude some directories from the search for which i know we would have duplicate filenames there.