Branch Coverage

blib/lib/Devel/hdb/Server.pm
Criterion Covered Total %
branch 3 24 12.5


line true false branch
17 0 1 if (exists $args{'port'})
22 0 1 if (%supplied_port_arg)
26 0 1 if exists $args{'listen_sock'}
37 0 0 if (my $conn = $self->{'listen_sock'}->accept)
38 0 0 unless $conn->setsockopt(6, 1, 1)
48 0 0 $self->{'ssl'} ? :
61 0 0 if $env->{'psgix.harakiri.commit'}
83 0 0 unless $self->write_all($conn, join('', @lines), $self->{'timeout'})
85 0 0 if (defined $res->[2]) { }
95 0 0 unless $self->write_all($conn, $_[0], $self->{'timeout'})
102 0 0 if ($done) { }
106 0 0 if ($err =~ /^failed to send all data\n/) { }