| line |
true |
false |
branch |
|
16
|
69 |
0 |
unless defined $type |
|
17
|
0 |
69 |
if $type ne 'Flock' |
|
20
|
0 |
69 |
if (defined $params{'max_procs'} and $params{'max_procs'} != 1) |
|
35
|
0 |
0 |
if $_[0] <= $retries |
|
38
|
0 |
69 |
defined $timeout ? : |
|
|
0 |
69 |
defined $retries ? : |
|
|
0 |
69 |
defined $retries && defined $timeout ? : |
|
|
0 |
69 |
ref $retries ? : |
|
43
|
0 |
276 |
$file_prefix ? : |
|
46
|
276 |
0 |
$type eq 'Flock' ? : |
|
72
|
321 |
0 |
if (not @args) { } |
|
89
|
0 |
69 |
if $self->{'process_name_change'} |
|
96
|
69 |
0 |
if ($locker->[$locker_id]->get_lock) { } |
|
100
|
0 |
0 |
if $self->{'debug'} |
|
102
|
0 |
0 |
if $self->{'process_name_change'} |
|
120
|
0 |
412 |
if $self->{'process_name_change'} |
|
123
|
183 |
229 |
if ($$locker[$locker_id - 1]->get_lock) |
|
133
|
0 |
229 |
unless ($self->{'retry_sub'}->(++$tries, ++$lock_tries, &IPC::ConcurrencyLimit::WithLatestStandby::time() - $standby_start, &IPC::ConcurrencyLimit::WithLatestStandby::time() - $lock_start)) |
|
135
|
0 |
0 |
if $self->{'process_name_change'} |
|
140
|
176 |
53 |
if ($locker_id == 1) |
|
143
|
152 |
24 |
if ($$locker[$locker_id + 1]->get_lock) { } |
|
150
|
24 |
0 |
if $self->{'debug'} |
|
155
|
0 |
24 |
if $self->{'process_name_change'} |
|
170
|
0 |
45 |
if $locker_id |
|
174
|
45 |
0 |
if $self->{'debug'} |
|
177
|
0 |
45 |
if ($self->{'process_name_change'}) |
|
178
|
0 |
0 |
if ($self->{'process_name_change'} > 1) { } |