| inc/Test/TCP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 16 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 0 | unless $port =~ /^[0-9]+$/ and $port < 19000 |
| 27 | 0 | 0 | if $sock |
| 35 | 0 | 0 | unless exists $args{$k} |
| 39 | 0 | 0 | if (my $pid = 'Test::SharedFork'->fork) { } |
| 0 | 0 | elsif ($pid == 0) { } | |
| 47 | 0 | 0 | if (WIFSIGNALED($?) and (split(' ', $Test::TCP::Config{'sig_name'}, 0))[WTERMSIG($?)] eq 'ABRT') |
| 68 | 0 | 0 | if ($remote) { } |
| 82 | 0 | 0 | if _check_port($port) |