Using File::Find module???

[sanket vaidya]

 

 

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.