From ab006a5113b18c3e2cc9691879452b307303dc39 Mon Sep 17 00:00:00 2001 From: David Schweikert Date: Wed, 30 Apr 2014 22:56:21 +0200 Subject: [PATCH] more tests --- ci/test-6-options-f-h.pl | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) diff --git a/ci/test-6-options-f-h.pl b/ci/test-6-options-f-h.pl index 7756ae4..7ca7e8c 100755 --- a/ci/test-6-options-f-h.pl +++ b/ci/test-6-options-f-h.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -w -use Test::Command tests => 9; +use Test::Command tests => 15; use Test::More; use Time::HiRes qw(gettimeofday tv_interval); use File::Temp; @@ -38,3 +38,19 @@ $cmd->exit_is_num(0); $cmd->stdout_is_eq("127.0.0.1 is alive\n127.0.0.2 is alive\n"); $cmd->stderr_is_eq(""); } + +# fping -g +{ +my $cmd = Test::Command->new(cmd => "fping -g 127.0.0.1/30"); +$cmd->exit_is_num(0); +$cmd->stdout_is_eq("127.0.0.1 is alive\n127.0.0.2 is alive\n"); +$cmd->stderr_is_eq(""); +} + +# fping -H +{ +my $cmd = Test::Command->new(cmd => "fping -H 1 127.0.0.1"); +$cmd->exit_is_num(0); +$cmd->stdout_is_eq("127.0.0.1 is alive\n"); +$cmd->stderr_is_eq(""); +} -- 2.43.0