my regex flaw exposes another?

On Mar 6, 4:04pm, Mike wrote:
> [...] I was trying to exclude
> both the ".", "..", and a directory called "approved".
[...]

> next if ($file =~ /(^\.)(approved)/);

Try:

    next if ($file =~ /^(\.\.?|approved)$/);

(Untested.)

Kevin