sub usagedie {
    print <<'END_USAGE';
Usage: setperm.pl [-v] [-f perm] [-d perm] [Directory]
-v, --verbose\t show files changed by script
-f, --filemode\t octal mode to change files to
-d, --dirmode\t octal mode to change directories to
END_USAGE
    exit(1);
}