nagios/check_bioctl/check_bioctl - diff

Return to check_bioctl CVS log

Up to [local] / nagios / check_bioctl

version 1.21, 2017/02/08 16:31:55

version 1.22, 2017/02/08 17:34:23

Line 1

#!/usr/bin/perl -T

# $AFresh1: check_bioctl,v 1.20 2014/06/27 18:59:56 andrew Exp $

# $AFresh1: check_bioctl,v 1.21 2017/02/08 16:31:55 andrew Exp $

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

# check_bioctl *** A nagios check for OpenBSD bioctl

Line 30

my $PROGNAME = 'check_bioctl';

my $BIOCTL = '/sbin/bioctl';

my $DOAS = '/usr/bin/doas';

my @DOAS = ( '/usr/bin/doas', '-n' );

use POSIX;

my $PREFIX;

Line 125

my %volumes;

foreach my $d ( @{$devices} ) {

open my $bioctl, q{-|}, $DOAS, $BIOCTL, $d

open my $bioctl, q{-|}, @DOAS, $BIOCTL, $d

or die "Couldn't open bioctl: $!\n";

LINE: while ( my $line = <$bioctl> ) {

my ( $i, $item ) = parse_bioctl_line($line);