Révision 1cee26b5
Escaped the dot in the print output (worked with perl 5.8.8 but some users found problems)
| plugins/other/ipmi_therm | ||
|---|---|---|
| 22 | 22 |
# |
| 23 | 23 |
# Author: Alexx Roche <munin-ipmi-plugin@alexx.net> |
| 24 | 24 |
# Built on the work of Justin Shepherd <galstrom21@gmail.com> |
| 25 |
# Revision: 1.2 2010/10/15
|
|
| 25 |
# Revision: 1.3 2011/01/10
|
|
| 26 | 26 |
# |
| 27 | 27 |
#%# family=auto |
| 28 | 28 |
#%# capabilities=autoconf |
| ... | ... | |
| 87 | 87 |
print "graph_vlabel Temperature in Celsius\n"; |
| 88 | 88 |
print "graph_category Sensors\n"; |
| 89 | 89 |
foreach my $j (sort keys %val) {
|
| 90 |
print "probe_$j.label $val{$j}{'Probe Name'}\n";
|
|
| 91 |
print "probe_$j.warning $val{$j}{'Warning Threshold'}\n";
|
|
| 92 |
print "probe_$j.critical $val{$j}{'Critical Threshold'}\n";
|
|
| 90 |
print "probe_$j\.label $val{$j}{'Probe Name'}\n";
|
|
| 91 |
print "probe_$j\.warning $val{$j}{'Warning Threshold'}\n";
|
|
| 92 |
print "probe_$j\.critical $val{$j}{'Critical Threshold'}\n";
|
|
| 93 | 93 |
} |
| 94 | 94 |
}else{
|
| 95 | 95 |
foreach my $j (sort keys %val) {
|
Formats disponibles : Unified diff