in reply to Recursive directory listing
You need to use a recursive function like the one below.
my $dir = "D:/";
opendir(DIR, $dir) or die $!;
while(defined (my $file = readdir(DIR)))
print "directory found....\n";
opendir(newDIR, $file) or die $!;
while(defined ($file = readdir(newDIR)))
print "got new file!!!!\n";
Once (shame on you!)
Twice (shame on me!)
More often than I'd like to be
All the time
Just when answering stupid polls
Who you callin' a fool?
I refuse to vote in this ridiculous poll
Results (521 votes). Check out past polls.