| line |
true |
false |
branch |
|
41
|
0 |
5 |
unless (eval "\n package $alias;\n \n use $original;\n \n 1;\n ") |
|
66
|
1 |
2 |
ref $params{'base'} eq 'ARRAY' ? : |
|
75
|
0 |
3 |
$params{'name'} ? : |
|
92
|
1 |
2 |
if (ref $params{'options'} eq 'ARRAY') |
|
99
|
1 |
2 |
if (ref $params{'config'} eq 'HASH') |
|
100
|
0 |
1 |
options()->{'config'} ? : |
|
107
|
1 |
2 |
if (defined $params{'namespace'}) |
|
120
|
4 |
1 |
if (my($filename) = $File::Find::name =~ m[^\Q$path\E/?(.+)[.]pm$]isu) |
|
134
|
0 |
3 |
if (options()->{'daemon'}) |
|
143
|
0 |
0 |
unless open my $fh_pid, '+>>:encoding(UTF-8)', $pid_filename |
|
148
|
0 |
0 |
if ($pid_prev) |
|
153
|
0 |
0 |
$pid_prev ? : |
|
155
|
0 |
0 |
if (not $is_working) { } |
|
157
|
0 |
0 |
if (my $pid = fork) |
|
159
|
0 |
0 |
unless print {$fh_pid;} "$pid\n" |
|
160
|
0 |
0 |
unless close $fh_pid |
|
168
|
0 |
0 |
unless close $fh_pid |