blib/lib/Test/TCP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 17 | 64.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
38 | 1 | 2 | 13 | @_ and ref $_[0] eq 'HASH' |
line | l | !l | condition |
---|---|---|---|
51 | 15 | 1 | $max_wait ||= 10 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
75 | 0 | 1 | 0 | $self->{'socket'} ||= Net::EmptyPort::listen_socket({'host', $self->{'host'}, 'proto', $self->{'proto'}}) |
79 | 2 | 16 | 0 | $self->{'port'} ||= empty_port({'host', $self->{'host'}}) |
100 | 0 | 3 | 0 | $self->{'socket'} || $self->port |
142 | 0 | 13 | 12 | $kid == 0 or $kid == -1 |