diff options
Diffstat (limited to 'plugins/t')
-rw-r--r-- | plugins/t/check_ping.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/t/check_ping.t b/plugins/t/check_ping.t index 49c568a..0dba91b 100644 --- a/plugins/t/check_ping.t +++ b/plugins/t/check_ping.t | |||
@@ -11,7 +11,7 @@ use NPTest; | |||
11 | 11 | ||
12 | use vars qw($tests); | 12 | use vars qw($tests); |
13 | 13 | ||
14 | BEGIN {$tests = 6; plan tests => $tests} | 14 | BEGIN {$tests = 8; plan tests => $tests} |
15 | 15 | ||
16 | my $successOutput = '/PING (ok|OK) - Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; | 16 | my $successOutput = '/PING (ok|OK) - Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; |
17 | my $failureOutput = '/Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; | 17 | my $failureOutput = '/Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; |
@@ -31,6 +31,7 @@ $t += checkCmd( "./check_ping $host_responsive 100 100 1000 1000 -p 1", | |||
31 | $t += checkCmd( "./check_ping $host_responsive 0 0 0 0 -p 1", 2, $failureOutput ); | 31 | $t += checkCmd( "./check_ping $host_responsive 0 0 0 0 -p 1", 2, $failureOutput ); |
32 | $t += checkCmd( "./check_ping $host_nonresponsive 0 0 0 0 -p 1 -to 1", 2 ); | 32 | $t += checkCmd( "./check_ping $host_nonresponsive 0 0 0 0 -p 1 -to 1", 2 ); |
33 | $t += checkCmd( "./check_ping $hostname_invalid 0 0 0 0 -p 1 -to 1", 3 ); | 33 | $t += checkCmd( "./check_ping $hostname_invalid 0 0 0 0 -p 1 -to 1", 3 ); |
34 | $t += checkCmd( "./check_ping -w 100,10% -c 200,20%" , 3 , "/You must specify a server address or host name.*/"); | ||
34 | 35 | ||
35 | exit(0) if defined($Test::Harness::VERSION); | 36 | exit(0) if defined($Test::Harness::VERSION); |
36 | exit($tests - $t); | 37 | exit($tests - $t); |