---

Der skulle vel ikke være nogen der har et lille script (eller nogle gode
ideer til et script) der (gerne rekursivt) finder kataloger (og
underkatologer - helt til bunds)
--
Jørgen Sørensen

---

In <91lvtc$npd$1@news.cybercity.dk> "Joergen Soerensen" <Joergen.Soerensen@skolekom.dk> writes:

>Der skulle vel ikke være nogen der har et lille script (eller nogle gode
>ideer til et script) der (gerne rekursivt) finder kataloger (og
>underkatologer - helt til bunds)
>--
>Jørgen Sørensen

Fra "Perl Cookbook" side 322:

Problem:
You want to do something to each file and subdirectory in a particular
directory.

Solution:
Use the standard File::Find module.

use File::Find;
sub process_file {
# do whatever
}
find(\&process_file, @DIRLIST);

/Martin