Re: How do I read a directory?

[cLive ;-)]

Use the readdir function. To read only certain files, you can use it with grep. For example:

my $dir = '/path/to/dir';

# read all entries:
opendir DIR, $dir or die "read dir $dir - $!";
my @dir = readdir DIR;
closedir DIR;

# read only cgi scripts:
opendir DIR, $dir or die "read dir $dir - $!";
my @cgi_scripts = grep /\.cgi$/, readdir DIR;
closedir DIR;

# read all but (UNIX style) hidden entries:
opendir DIR, $dir or die "read dir $dir - $!";
my @dir = grep !/^\./, readdir DIR;
closedir DIR;