diff options
Diffstat (limited to 'plugins-scripts')
-rwxr-xr-x | plugins-scripts/check_ircd.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/plugins-scripts/check_ircd.pl b/plugins-scripts/check_ircd.pl index 3fbce2e4..42a9bca9 100755 --- a/plugins-scripts/check_ircd.pl +++ b/plugins-scripts/check_ircd.pl | |||
@@ -187,19 +187,19 @@ MAIN: | |||
187 | 187 | ||
188 | if ($opt_h) {print_help(); exit $ERRORS{'OK'};} | 188 | if ($opt_h) {print_help(); exit $ERRORS{'OK'};} |
189 | 189 | ||
190 | ($opt_H) || ($opt_H = shift) || usage("Host name/address not specified\n"); | 190 | ($opt_H) || ($opt_H = shift @ARGV) || usage("Host name/address not specified\n"); |
191 | my $remotehost = $1 if ($opt_H =~ /([-.A-Za-z0-9]+)/); | 191 | my $remotehost = $1 if ($opt_H =~ /([-.A-Za-z0-9]+)/); |
192 | ($remotehost) || usage("Invalid host: $opt_H\n"); | 192 | ($remotehost) || usage("Invalid host: $opt_H\n"); |
193 | 193 | ||
194 | ($opt_w) || ($opt_w = shift) || ($opt_w = 50); | 194 | ($opt_w) || ($opt_w = shift @ARGV) || ($opt_w = 50); |
195 | my $warn = $1 if ($opt_w =~ /^([0-9]+)$/); | 195 | my $warn = $1 if ($opt_w =~ /^([0-9]+)$/); |
196 | ($warn) || usage("Invalid warning threshold: $opt_w\n"); | 196 | ($warn) || usage("Invalid warning threshold: $opt_w\n"); |
197 | 197 | ||
198 | ($opt_c) || ($opt_c = shift) || ($opt_c = 100); | 198 | ($opt_c) || ($opt_c = shift @ARGV) || ($opt_c = 100); |
199 | my $crit = $1 if ($opt_c =~ /^([0-9]+)$/); | 199 | my $crit = $1 if ($opt_c =~ /^([0-9]+)$/); |
200 | ($crit) || usage("Invalid critical threshold: $opt_c\n"); | 200 | ($crit) || usage("Invalid critical threshold: $opt_c\n"); |
201 | 201 | ||
202 | ($opt_p) || ($opt_p = shift) || ($opt_p = 6667); | 202 | ($opt_p) || ($opt_p = shift @ARGV) || ($opt_p = 6667); |
203 | my $remoteport = $1 if ($opt_p =~ /^([0-9]+)$/); | 203 | my $remoteport = $1 if ($opt_p =~ /^([0-9]+)$/); |
204 | ($remoteport) || usage("Invalid port: $opt_p\n"); | 204 | ($remoteport) || usage("Invalid port: $opt_p\n"); |
205 | 205 | ||