| lib/Net/HL7/Connection.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 4 | 50.0 |
| line | l | !l | condition |
|---|---|---|---|
| 90 | 0 | 1 | $arg{'Timeout'} || 10 |
| 106 | 1 | 0 | 'IO::Socket::INET'->new('Proto', 'tcp', 'PeerAddr', $host, 'PeerPort', $port, 'Timeout', $self->{'Timeout'}) || (return undef) |