in reply to List and identify directories

...read a dir and differentiate files and directories?

perldoc -f readdir   to read directories.
perldoc -f -X   for how to test if it's a file or a directory

Update: added link for -X

Cheers, Sören

Replies are listed 'Best First'.
Re: List and identify directories
by Anonymous Monk on Jun 28, 2004 at 10:09 UTC 
    #!d:/perl/bin/perl.exe
$dir =shift || '.';
opendir Dir, $dir or die "dir not found \$! \n";
@files = readdir(Dir);
while(<@files>)
{
    print "$_ \n" if -d _; 
    
}

    [download]

    Edited by Chady -- code tags.

[reply]
[d/l]

In Section Seekers of Perl Wisdom