Branch Coverage

blib/lib/Net/Ping/External.pm
Criterion Covered Total %
branch 10 38 26.3


line true false branch
27 0 5 if defined $args{'hostname'}
30 0 5 if defined $args{'ip'}
33 0 5 unless defined $args{'host'}
34 4 1 unless defined $args{'timeout'} and $args{'timeout'} > 0
60 0 5 unless $subref
72 0 0 if $Net::Ping::External::DEBUG
74 0 0 if $Net::Ping::External::DEBUG_OUTPUT
76 0 0 if $result =~ /time.*ms/
77 0 0 if $result =~ /TTL/
78 0 0 if $result =~ /is alive/
92 0 0 if $Net::Ping::External::DEBUG
94 0 0 if $Net::Ping::External::DEBUG_OUTPUT
96 0 0 if $result =~ /(\d+) packets received/ and $1 > 0
110 0 5 if $Net::Ping::External::DEBUG
113 4 1 if $exit_status == $success
179 0 0 if -x '/usr/sbin/ping'
205 0 5 if (-e '/etc/redhat-release' or -e '/etc/SuSE-release') { }
233 0 0 unless ($which_ping)
236 0 0 if ($which_ping =~ m[/cygdrive/\w/WINDOWS/SYSTEM32/ping]i)