File Perl

$entry = readdir(dirhandle);
The $entry variable holds the file name read from the directory. 
If there are no more names, readdir will return an undefined value in scalar context.
In scalar context, readdir returns the next entry. 
In array context, it returns all the contents of the directory: 
@entries = readdir(dirhandle);
If there are no entries, readdir will return a null list in array context.