nagios/check_bioctl/check_bioctl - diff

Return to check_bioctl CVS log

Up to [local] / nagios / check_bioctl

version 1.15, 2009/11/23 22:24:45

version 1.17, 2011/12/27 01:32:01

Line 1

#!/usr/bin/perl -T

# $RedRiver: check_bioctl,v 1.14 2009/11/23 21:58:04 andrew Exp $

# $RedRiver: check_bioctl,v 1.15 2009/11/23 22:24:45 andrew Exp $

########################################################################

# check_bioctl *** A nagios check for OpenBSD bioctl

Line 10

local %ENV = ();

my $NAGIOS_OUTPUT = 0;

my $NAGIOS_OUTPUT = 1;

my $License = <<'EOL';

Line 158

chomp $line;

# Do these by columns cuZ that is the easiest for now

my @o = unpack( "A6 A1 A11 A15 A7 A9 A*", $line );

my @o = unpack( "A10 A1 A11 A15 A7 A9 A*", $line );

return if $o[0] eq 'Volume';

foreach (@o) {