Branch Coverage

blib/lib/Daemon/Device.pm
Criterion Covered Total %
branch 21 76 27.6


line true false branch
17 0 6 if @_ % 2
40 6 0 unless ($self->{'_daemon'}{'user'})
46 0 6 unless ref $self->{'_daemon'} eq 'HASH'
48 0 12 if $self->{'_daemon'}{$_}
56 0 60 if exists $self->{$_} and ref $self->{$_} ne 'CODE'
89 0 0 if $self->{'_on_parent_hup'}
90 0 0 if ($self->{'_parent_hup_to_child'})
96 1 0 if $self->{'_on_parent_death'}
98 1 0 if $self->{'_on_shutdown'}
104 5 0 if ($self->{'_replace_children'})
105 5 0 if $self->{'_on_replace_child'}
107 5 8 if waitpid $_->{'pid'}, 1
113 0 0 if ($self->{'_on_message'})
119 5 0 if $self->{'_on_startup'}
125 3 0 if ($self->{'_parent'}) { }
138 17 0 if $self->{'_on_spawn'}
141 0 17 if ($self->{'_on_message'})
146 13 4 if (my $pid = fork) { }
149 0 13 if ($self->{'_on_message'})
163 0 4 if ($self->{'_on_message'})
186 0 0 if $self->{'_on_child_hup'}
190 4 0 if $self->{'_on_child_death'}
196 0 0 if ($self->{'_on_message'})
202 4 0 if ($self->{'_child'}) { }
207 0 0 unless $self->parent_alive
231 0 0 if (@{$self->{'_children'};} > 0 and @{$self->{'_children'};} < $self->{'_spawn'}) { }
0 0 elsif (@{$self->{'_children'};} > 0 and @{$self->{'_children'};} > $self->{'_spawn'}) { }
254 0 0 if @_
260 0 0 if @_
271 0 0 unless @_
273 0 0 if (@_ == 1)
274 0 0 unless ref $_[0]
279 0 0 if (@_ % 2 != 0) { }
293 0 0 unless ($self->{'_on_message'})
303 0 0 $self->{'_ppid'} == $pid ? :
304 0 0 if ($@)
309 0 0 unless $io->say($message)
310 0 0 unless kill 'URG', $pid