version 1.3, 2005/03/23 12:12:08
|
version 1.4, 2005/09/20 17:28:26
|
Line 342 logger("INFO", "archivecheck $version");
|
Line 342 logger("INFO", "archivecheck $version");
|
|
|
# make shure the right user is running this program |
# make shure the right user is running this program |
my $user = getlogin; |
my $user = getlogin; |
if (($user ne "archive")&&($user ne "root")) { |
if (not (($user eq "archive")||($user eq "root"))) { |
logger("ABORT", "you must be archive or root user to run this program!"); |
logger("ABORT", "you must be archive or root user to run this program!"); |
exit 1; |
exit 1; |
} |
} |