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";
Electric eels were invented at the same time as electricity
Before electricity was invented, electric eels had to stun with gas
Results (393 votes). Check out past polls.