| line |
true |
false |
branch |
|
14
|
0 |
0 |
unless defined(my $pid = fork) |
|
15
|
0 |
0 |
if $pid |
|
16
|
0 |
0 |
unless setsid() |
|
23
|
0 |
0 |
unless -e $config_filename |
|
30
|
0 |
0 |
unless open my $in_fh, '<', $config_filename |
|
34
|
0 |
0 |
if (not $line =~ /^#/ and $line =~ /:/) |
|
35
|
0 |
0 |
if ($line =~ /$re_line/) |
|
51
|
0 |
0 |
unless $$data{$name} |
|
71
|
0 |
0 |
if $config_mt < (stat $config_filename)[9] |
|
72
|
0 |
0 |
unless @$config |
|
80
|
0 |
0 |
unless defined $cfg |
|
83
|
0 |
0 |
unless $filename |
|
85
|
0 |
0 |
if $mt > time - $dt |
|
90
|
0 |
0 |
unless (-e $pid_file or -e $err_file) |
|
91
|
0 |
0 |
if (not exists $$data{$key} or $$data{$key} != $mt) |
|
95
|
0 |
0 |
if (my $pid = fork) { } |
|
97
|
0 |
0 |
unless open my $fh, '>', $pid_file |
|
100
|
0 |
0 |
unless $ampersand |
|
102
|
0 |
0 |
unless defined $pid |
|
114
|
0 |
0 |
if ($pid_file ~~ \@pids and exists $processes{$pid_file}[2] and $processes{$pid_file}[2] == 0) { } |
|
|
0 |
0 |
elsif (-e $pid_file and not $pid_file =~ @pids) { } |
|
116
|
0 |
0 |
if ($return) { } |
|
117
|
0 |
0 |
unless open my $fh, '>', $err_file |
|
122
|
0 |
0 |
defined $$data{$name} ? : |
|
132
|
0 |
0 |
if $pause |