| 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 |