Select Code to Download

find [base directory] -type [f|d] -exec chmod [perm] {} \;

#!/usr/bin/perl -w
use strict;
...
    print "-d, --dirmode\t octal mode to change directories to\n";
    exit(0);
}

#!/usr/bin/perl -w
use strict;
...
    print "-d, --dirmode\t octal mode to change directories to\n";
    exit(1);
}