Permission fixup (was RE: [Mimedefang] Quarantine management - anyone else working on this?)

[Al Sparks]

--- "David F. Skoll" <dfs at roaringpenguin.com> wrote:
> On Fri, 2 Apr 2004, Paul Murphy wrote:
> 		system("chmod -R g+rwX $dir");

Perl has its own embeded 
   chmod
function.

The "system" call to the shell should be avoided if at all possible,
since it does slow things down.

You'd have to write more code since perl's chmod function doesn't give you the
option to recursivley descend through the directory structure.

But I'll bet the "Perl Cookbook" by Christianson and Torkington has
some code you could appropriate.
  === Al