| line |
true |
false |
branch |
|
121
|
3 |
0 |
if (ref $params ne 'HASH') { } |
|
125
|
0 |
0 |
unless (defined $params) |
|
131
|
3 |
0 |
if (not defined $lockfile_location or $lockfile_location eq '') |
|
139
|
0 |
3 |
unless sysopen $lock, $lockfile_location, 131138, 420 |
|
141
|
3 |
0 |
if (flock $lock, 6) |
|
146
|
0 |
3 |
if ($lock_tries > 5) |
|
154
|
1 |
2 |
if (defined $file_pid) |
|
164
|
1 |
0 |
if (defined $file_pid and $file_pid ne '' and $file_pid == 0 || (kill(0, $file_pid) || $!{'EPERM'})) |
|
177
|
0 |
2 |
if ($$params{'no_pid'}) { } |
|
187
|
0 |
2 |
if (defined $$params{'delete_on_destroy'}) { } |
|
188
|
0 |
0 |
$$params{'delete_on_destroy'} ? : |
|
220
|
0 |
1 |
if (not defined $new_setting) { } |
|
223
|
0 |
1 |
$new_setting ? : |
|
257
|
2 |
1 |
if ($self and $$self{'lockfile_location'} and $$self{'delete_on_destroy'}) |
|
260
|
0 |
2 |
unless open $lock, '<', $$self{'lockfile_location'} |
|
262
|
2 |
0 |
if (flock $lock, 6) |
|
267
|
0 |
2 |
if ($lock_tries > 5) |
|
270
|
2 |
0 |
if defined $file_pid |
|
271
|
2 |
0 |
if (defined $file_pid and $file_pid == 0 || $file_pid == $$) |