[MacPerl] Re: find and finddepth

[Michael Schuerig <uzs90z@ibm.rhrz.uni-bonn.de>]

At 17:19 Uhr +0100 07.02.1997, Michael Schuerig wrote:

> I've written a small script that traverses a directory tree and does some
>inplace editing on HTML files. Curiously, when I use find to do a
>breadth-first traversal the script seems to get stuck when it encounters a
>directory. With finddepth it's as fast as one would expect.


Found it.

> 	while (<INFILE>) {

This was called in a subroutine called from "wanted". Well, it mangles $_
that's set up in "find" with the filename. As a consequence the traversal
gets messed up. Did I say that I hate dynamic binding?

Michael