Branch Coverage

blib/lib/Device/TLSPrinter/Network.pm
Criterion Covered Total %
branch 0 6 0.0


line true false branch
22 0 0 unless $host and $port
25 0 0 unless my $sock = 'IO::Socket::INET'->new('PeerHost', $host, 'Proto', 'tcp', 'PeerPort', $port, 'autoflush', 1, 'Timeout', $self->_timeout)
66 0 0 $$self{'_socket'}->connected ? :