Try this patch please diff --git a/AdduserLogging.pm b/AdduserLogging.pm index 1fe4743..51c45fa 100644 --- a/AdduserLogging.pm +++ b/AdduserLogging.pm @@ -115,7 +115,7 @@ sub logmsglevel { sub check_sys_admin { # this checks for SYS_ADMIN privilege, see #1074567 return $has_sys_admin if defined $has_sys_admin; - open my $fh, '<', '/proc/self/status' or die "Can't open /proc/self/status: $!"; + open my $fh, '<', '/proc/self/status' or return 0;
while (my $line = <$fh>) { if ($line =~ /^CapEff:\s+[0-9a-fA-F]{10}([0-9a-fA-F]+)/) {