Branch Coverage

blib/lib/HTTP/Proxy/Engine/ScoreBoard.pm
Criterion Covered Total %
branch 0 40 0.0


line true false branch
35 0 0 unless pipe $self->status_read, $self->status_write
61 0 0 if ($self->select->can_read(1))
62 0 0 unless $self->status_read->sysread(my $buf, 50) > 0
75 0 0 if ($new ne $self->scoreboard)
92 0 0 if (time > $self->verify_live_kids_time + $self->verify_delay)
94 0 0 if kill 0, $kid
106 0 0 if (@idlers < $self->min_spare_servers || keys %$kids < $self->start_servers and keys %$kids < $self->max_clients and time > $self->last_fork_time) { }
0 0 elsif (@idlers > $self->max_spare_servers || @idlers > $self->min_spare_servers && time > $self->last_active_time + $self->verify_delay and keys %$kids > $self->start_servers) { }
116 0 0 if (not defined $child) { }
120 0 0 if ($child) { }
160 0 0 unless $pid
172 0 0 unless (unlink $self->tempfile->filename)
185 0 0 unless (open my $lockfh, $self->tempfile->filename)
194 0 0 unless (flock $lockfh, 2)
199 0 0 unless $proxy->loop
201 0 0 unless 5 == syswrite($status_write, pack('NA', $$, 'A'))
204 0 0 unless (my $slave = $daemon->accept)
209 0 0 unless (flock $lockfh, 8)
214 0 0 unless 5 == syswrite($status_write, pack('NA', $$, 'B'))
221 0 0 unless 5 == syswrite($status_write, pack('NA', $$, 'I'))