getting multiple dir and file names into array

[Kipp, James]

Hello
If I have an array of dir names and I want to capture the sub dir names and
file
names into an array, what is the best way to do this without overwriting the
array each time thru? (see code below) Can I do a push or concatenate or
something else ?

Thanks

---

@dirs = qw( /dbm1/user/ /dbm2/user/ );

# read in the files and directory names in the directory excluding . and ..
foreach $dir (@dirs)
{
        unless (opendir (DIR, $dir))
        {
                print "\n Path not found - $dir\n\n";
                exit 1;
        }
        @filenames = grep (!/^\.\.?$/ , readdir (DIR));
}
closedir DIR;


 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]