Technische Dokumentation zum Unix-Verbund ... - Dr. Hubert Feyrer

B.6 Adduser/chlogin 288
# Where to find defaults-file
$DEFAULTS_FILE = "/home3/bedienst/feyrer/work/SysOp/Adduser/default/adduser";
#$DEFAULTS_FILE = "/net/rfhs8012/home3/bedienst/feyrer/work/NDS/work/Adduser/default/adduser";
###########################################################################
# Read defaults from file or take hardcoded values if unavailable
###########################################################################
sub setdefaults
{
print "Setting defaults\n" if $opt_verbose>0;
}
#
# Internal defaults (if defaults-file is gone)
#
$DEF_YP_DIR = "/var/yp";
$DEF_ETC_DIR = "/etc";
$DEF_MAKE = "/usr/ccs/bin/make";
$DEF_LOCK = "/var/yp/passwd.lock";
#
# Read defaults from defaults-file
#
open(DEF,"