Using File::Find module???





Hi all



I have some files stored in directory "resumes1" (say the files are file1,
file2 & file3).



When I run the following code



use warnings;

use strict;



use File::Find;

find (\&del,"D:/resumes1");



sub del

{

print "File name is $_\n ";

}



The output is:



File name is . (i.e. a dot)

File name is file1

File name is file2.

File name is file3



Where did this "." come from & how to eliminate it?



I use ActivePerl 5.10 on windows.



Thanks in advance.