set $user to <unknown> if lsof could not tell the username
[mirror/dsa-nagios.git] / dsa-nagios-checks / checks / dsa-check-libs
index aaaf1ee..fd9e338 100755 (executable)
@@ -156,7 +156,7 @@ LINE: for my $line (@lsof)  {
                my %fields = map { m/^(.)(.*)$/ ; $1 => $2 } grep { defined $_  and length $_ >1} split /\0/, $line;
                $process = $fields{c};
                $pid     = $fields{p};
-               $user    = $fields{L};
+               $user    = $fields{L} || '<unknown>';
                next;
        }