=================================================================== RCS file: /cvs/nagios/check_bioctl/check_bioctl,v retrieving revision 1.21 retrieving revision 1.22 diff -u -r1.21 -r1.22 --- nagios/check_bioctl/check_bioctl 2017/02/08 16:31:55 1.21 +++ nagios/check_bioctl/check_bioctl 2017/02/08 17:34:23 1.22 @@ -1,5 +1,5 @@ #!/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 # @@ -30,7 +30,7 @@ my $PROGNAME = 'check_bioctl'; my $BIOCTL = '/sbin/bioctl'; -my $DOAS = '/usr/bin/doas'; +my @DOAS = ( '/usr/bin/doas', '-n' ); use POSIX; my $PREFIX; @@ -125,7 +125,7 @@ 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); @@ -221,7 +221,7 @@ } sub print_revision { - my $rev = '$Revision: 1.21 $'; + my $rev = '$Revision: 1.22 $'; $rev =~ s/^\D+([\d\.]+)\D+$/v$1/xms; say "$PROGNAME $rev";