| inc/IO/Socket/INET.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 65 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 77 | 0 | 0 | 0 | defined $addr and $addr =~ s[:([\w\(\)/]+)$][] |
| 80 | 0 | 0 | 0 | defined $proto and $proto =~ /\D/ |
| 102 | 0 | 0 | 0 | @serv and not $proto |
| 128 | 0 | 0 | 0 | $multi and not $addr_str =~ /^\d+(?:\.\d+){3}$/ |
| 143 | 0 | 0 | 0 | exists $arg->{'LocalHost'} and not exists $arg->{'LocalAddr'} |
| 157 | 0 | 0 | 0 | exists $arg->{'PeerHost'} and not exists $arg->{'PeerAddr'} |
| line | l | !l | condition |
|---|---|---|---|
| 93 | 0 | 0 | _get_proto_name($proto) || '' |
| 105 | 0 | 0 | $addr || undef |
| 0 | 0 | $port || undef | |
| 0 | 0 | $proto || undef | |
| 204 | 0 | 0 | $lport || 0 |
| 209 | 0 | 0 | $arg->{'Listen'} || 5 |
| 237 | 0 | 0 | $@ || 'Timeout' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 96 | 0 | 0 | 0 | $serv[2] || $defport || $pnum |
| 166 | 0 | 0 | 0 | $proto ||= _get_proto_number('tcp') |
| 168 | 0 | 0 | 0 | $arg->{'Type'} || $socket_type{lc _get_proto_name($proto)} |
| 188 | 0 | 0 | 0 | $arg->{'Reuse'} or $arg->{'ReuseAddr'} |
| 203 | 0 | 0 | 0 | $lport or $laddr ne "\000\000\000\000" |
| 0 | 0 | 0 | $lport or $laddr ne "\000\000\000\000" or exists $arg->{'Listen'} | |
| 219 | 0 | 0 | 0 | $rport or $type == 2 |
| 0 | 0 | 0 | $rport or $type == 2 or $type == 3 | |
| 223 | 0 | 0 | 0 | $type == 1 or defined $raddr |
| 254 | 0 | 0 | 0 | @_ == 2 or @_ == 3 |
| 261 | 0 | 0 | 0 | @_ == 2 or @_ == 3 |