| blib/lib/LaBrea/NetIO.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 26 | 73.0 |
| line | true | false | branch |
|---|---|---|---|
| 141 | 2 | 2 | if not $port or $port =~ /\D/ |
| 143 | 1 | 1 | unless $iaddr = inet_aton($host) |
| 146 | 0 | 1 | unless socket $S, 2, 1, $proto |
| 149 | 0 | 0 | unless (connect $S, $paddr) |
| 183 | 1 | 0 | if $timeout |
| 186 | 0 | 1 | if $@ |
| 187 | 0 | 1 | wantarray ? : |
| 217 | 1 | 4 | if (&_want_daemon(\$target)) { } |
| 220 | 2 | 47 | if open_tcp($S, $d_host, $d_port) |
| 223 | 5 | 121 | unless open $S, $target |
| 237 | 0 | 6 | unless $tgp |
| 238 | 4 | 2 | unless ref $$tgp eq 'HASH' |
| 239 | 1 | 1 | if (exists $${$tgp;}{'file'}) |