X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=dsa-nagios-nrpe-config%2Fdsa-check-mirrorsync;h=4637cabbe923bc2634c0001db4b23e83dabb49bf;hb=3b3f578e3e089f2134b6c26e2a42d4aeb2ff2bf4;hp=413f6a13704f7e850f065e5be8dc25ce507b135c;hpb=90b4ec88060f041ba20a061b770f3d64e5029417;p=mirror%2Fdsa-nagios.git diff --git a/dsa-nagios-nrpe-config/dsa-check-mirrorsync b/dsa-nagios-nrpe-config/dsa-check-mirrorsync index 413f6a1..4637cab 100755 --- a/dsa-nagios-nrpe-config/dsa-check-mirrorsync +++ b/dsa-nagios-nrpe-config/dsa-check-mirrorsync @@ -31,14 +31,14 @@ use File::Basename; use English; use warnings; -my $VERSION = '0.1'; -my $PROG = basename($PROGRAM_NAME); sub usage($$) { my ($fh, $exit) = @_; + my $basename = basename($PROGRAM_NAME); + my $VERSION = '0.1'; - print $fh "$PROG $VERSION\n"; - print $fh "Usage: $PROG [--help|--version] [--verbose]\n"; + print $fh "$basename $VERSION\n"; + print $fh "Usage: $basename [--help|--version] [--verbose]\n"; print $fh "\n"; print $fh " --help Print this short help.\n"; print $fh " --version Report version number.\n";