version 1.18, 2006/12/02 02:15:17 |
version 1.19, 2006/12/04 23:33:53 |
|
|
#!/usr/bin/perl -T |
#!/usr/bin/perl -T |
# $RedRiver: check_hw_sensors,v 1.17 2006/10/25 23:30:23 andrew Exp $ |
# $RedRiver: check_hw_sensors,v 1.18 2006/12/02 02:15:17 andrew Exp $ |
######################################################################## |
######################################################################## |
# check_hw_sensors *** A nagios check for OpenBSD hw.sensors |
# check_hw_sensors *** A nagios check for OpenBSD hw.sensors |
# |
# |
|
|
|
|
use POSIX; |
use POSIX; |
use lib "/usr/local/libexec/nagios"; |
use lib "/usr/local/libexec/nagios"; |
|
use lib '.'; |
use utils qw($TIMEOUT %ERRORS &print_revision &support); |
use utils qw($TIMEOUT %ERRORS &print_revision &support); |
|
|
use Getopt::Long; |
use Getopt::Long; |
|
|
{ |
{ |
type => 'integer', |
type => 'integer', |
regex => qr/\sraw$/, |
regex => qr/\sraw$/, |
|
}, |
|
{ |
|
type => 'percent', |
|
regex => qr/\s\%$/, |
}, |
}, |
{ |
{ |
type => 'lux', |
type => 'lux', |