line |
true |
false |
branch |
22
|
0 |
4 |
if (defined &IPPROTO_IP) { } |
|
4 |
0 |
elsif ($^O eq 'darwin' or $^O eq 'linux' or $^O eq 'freebsd' or $^O eq 'openbsd' or $^O eq 'netbsd' or $^O eq 'aix') { } |
38
|
0 |
4 |
if (defined &IPPROTO_IPv6) { } |
|
4 |
0 |
elsif ($^O eq 'linux' or $^O eq 'freebsd') { } |
50
|
0 |
4 |
if (defined &IPPROTO_RAW) { } |
|
4 |
0 |
elsif ($^O eq 'darwin' or $^O eq 'linux' or $^O eq 'freebsd' or $^O eq 'openbsd' or $^O eq 'netbsd' or $^O eq 'aix') { } |
66
|
0 |
4 |
if (defined &IP_HDRINCL) { } |
|
4 |
0 |
elsif ($^O eq 'darwin' or $^O eq 'freebsd' or $^O eq 'openbsd' or $^O eq 'netbsd' or $^O eq 'linux' or $^O eq 'aix' or $^O eq 'cygwin') { } |
|
0 |
0 |
elsif ($^O eq 'hpux') { } |
91
|
4 |
0 |
if (not $@) { } |
99
|
0 |
0 |
unless ($@) |
115
|
4 |
0 |
unless ($@) |
125
|
0 |
0 |
unless ($@) |
143
|
4 |
0 |
unless ($@) |
156
|
0 |
0 |
if ($err) |
160
|
0 |
0 |
if (@res > 0) |
176
|
0 |
0 |
unless ($@) |
182
|
0 |
0 |
unless my(@res) = Socket6::getaddrinfo($dest, '', $family, $socktype) |
185
|
0 |
0 |
if (@res >= 5) |
198
|
0 |
0 |
if ($@) { } |
211
|
0 |
0 |
if ($err) |
216
|
0 |
0 |
unless (defined $ai) |