summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--plugins/t/check_ping.t3
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
12use vars qw($tests); 12use vars qw($tests);
13 13
14BEGIN {$tests = 6; plan tests => $tests} 14BEGIN {$tests = 8; plan tests => $tests}
15 15
16my $successOutput = '/PING (ok|OK) - Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; 16my $successOutput = '/PING (ok|OK) - Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/';
17my $failureOutput = '/Packet loss = +[0-9]{1,2}\%, +RTA = [\.0-9]+ ms/'; 17my $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
35exit(0) if defined($Test::Harness::VERSION); 36exit(0) if defined($Test::Harness::VERSION);
36exit($tests - $t); 37exit($tests - $t);