| blib/lib/Net/Server/Proto/UDP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 12 | 33.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 42 | 0 | 10 | 0 | $Net::Server::Proto::TCP::ISA[0] eq 'IO::Socket::INET' and 'Net::Server::Proto'->requires_ipv6($server) |
| 89 | 1 | 0 | 0 | $port eq 0 and $port = $sock->sockport |
| 1 | 0 | 0 | $port =~ /\D/ and $port = $sock->sockport |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 44 | 0 | 10 | 0 | $server->{'server'}{'udp_args'} ||= do { my(%temp) = map({$_, undef;} @udp_args); $server->configure({map({$_, \$temp{$_};} @udp_args)}); \%temp } |