readdir the directory name and file name separately?

[Davy]

Hi all,

I found readdir generate list contain ".", "..", "directory name",
"file name".
How can I readdir only the "directory name" and only the "file name"?

Thanks!
Davy

 

[Eric Schwartz]

I found readdir generate list contain ".", "..", "directory name",
"file name".
How can I readdir only the "directory name" and only the "file name"?

You can't. But you can ignore the files:

my $dirname="/path/to/dir";
opendir my $dirhandle, $dirname or die "Couldn't open [$dirname]: $!";

while(my $entry = readdir($dirhandle)) {
next unless -d "$dirname/$entry"; # perldoc -f -X
# perldoc -f readdir (2nd paragraph)

# do other stuff here
}

-=Eric

 

[Davy]

Have you considered reading the documentation for the function you are
using?

perldoc -f readdir

[snip]

Shall I use
#--------
opendir(DIR, $some_dir);
@dir_list = grep{-d "$some_dir/$_"} readdir(DIR);
@file_list = grep{-f "$some_dir/$_"} readdir(DIR);
closedir(DIR);
#--------

Thanks!
Davy