blib/lib/Test/TCP/Multi.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 12 | 0.0 |
line | l | !l | condition |
---|---|---|---|
137 | 0 | 0 | $loop and scalar keys %pids |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
21 | 0 | 0 | 0 | $port =~ /^[0-9]+$/ and $port < 19000 |
45 | 0 | 0 | 0 | scalar keys %pids > 0 and (my $kid = waitpid(-1, 1)) > 0 |
line | l | !l | condition |
---|---|---|---|
20 | 0 | 0 | shift() || 10000 |
102 | 0 | 0 | $data{$name} ||= {} |