summaryrefslogtreecommitdiff
path: root/nagios-check-libs
diff options
context:
space:
mode:
Diffstat (limited to 'nagios-check-libs')
-rwxr-xr-xnagios-check-libs4
1 files changed, 2 insertions, 2 deletions
diff --git a/nagios-check-libs b/nagios-check-libs
index f38fcbc..de5c138 100755
--- a/nagios-check-libs
+++ b/nagios-check-libs
@@ -50,7 +50,7 @@ my %processes;
sub getPIDs($$) {
my ($user, $process) = @_;
- return join(', ', sort @{ $processes{$user}->{$process} });
+ return join(', ', sort keys %{ $processes{$user}->{$process} });
};
sub getProcs($) {
my ($user) = @_;
@@ -76,7 +76,7 @@ for my $line (@lsof) {
if ($line =~ m/path inode=/) {
my ($process, $pid, $user, $rest) = split /\s+/, $line;
#$processes{$user}->{$process} = [] unless defined $processes{$user}->{$process};
- push @{ $processes{$user}->{$process} }, $pid;
+ $processes{$user}->{$process}->{$pid} = 1;
};
};