Rev 11 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 11 | Rev 12 | ||
|---|---|---|---|
| Line 98... | Line 98... | ||
| 98 | 98 | ||
| 99 | my $perfdata; |
99 | my $perfdata; |
| 100 | my $size = $memory->{"VmData"} + $memory->{"VmStk"}; |
100 | my $size = $memory->{"VmData"} + $memory->{"VmStk"}; |
| 101 | # create perfdata
|
101 | # create perfdata
|
| 102 | foreach (keys %$memory) { |
102 | foreach (keys %$memory) { |
| 103 | $perfdata .= "$_: $memory->{$_} "; |
- | |
| - | 103 | $perfdata .= "$_=$memory->{$_}KB; "; |
|
| 104 | }
|
104 | }
|
| 105 | 105 | ||
| 106 | # check thresholds
|
106 | # check thresholds
|
| 107 | if ( $size > $critical ) { |
107 | if ( $size > $critical ) { |
| 108 | print "CRITICAL: $processname, memory: $size KB | $perfdata\n"; |
108 | print "CRITICAL: $processname, memory: $size KB | $perfdata\n"; |