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 |