| blib/lib/Net/Async/Ping/TCP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 12 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 1 | 0 | unless keys %params |
| 44 | 0 | 1 | if my $legacy = &blessed($_[0]) |
| 45 | 0 | 1 | $legacy ? : |
| 70 | 1 | 0 | if ($layer and $layer eq 'connect') |
| 71 | 0 | 1 | if not $service_check and $ex == 111 |
| 77 | 0 | 1 | $self->bind ? : |