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/