I understand the -next- concept, but adding this line made no
difference. I got the same output as without it.
--Chris
yitzle wrote:
> 1) There are filesystem modules already out there.
> 2) You might want to consider using a more generic recursive structure.
>
> 3) To answer your question, check its a directory and not a file.
>
> while ($yearly = readdir(TOTALHANDLE)) {
> next unless (-d $yearly);
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/