version 1.11, 2000/12/23 16:56:46
|
version 1.12, 2001/01/10 17:20:44
|
Line 45 ENDERROUT
|
Line 45 ENDERROUT
|
|
|
# ================================================================ Main Program |
# ================================================================ Main Program |
|
|
|
# ----------------------------- Make sure this process is running from user=www |
|
my $wwwid=getpwnam('www'); |
|
if ($wwwid!=$<) { |
|
print("User ID mismatch. This program must be run as user 'www'\n") unless $noprint; |
|
exit 1; |
|
} |
|
|
# ------------------------------------------------------------ Read access.conf |
# ------------------------------------------------------------ Read access.conf |
{ |
{ |