| line |
true |
false |
branch |
|
110
|
0 |
1 |
unless defined $args{'file'} |
|
114
|
0 |
1 |
if (defined $uniquetoken) |
|
115
|
0 |
0 |
if ($uniquetoken eq '1') { } |
|
152
|
0 |
1 |
if $self->got_lock |
|
158
|
1 |
0 |
if ($self->_write_lock_file) { } |
|
162
|
0 |
0 |
if ($self->_is_stale_lock) { } |
|
169
|
0 |
0 |
if ($now - $before_time > $$self{'timeout_acquire'}) |
|
174
|
0 |
0 |
if $$self{'poll_interval'} |
|
206
|
3 |
5 |
if (defined $nlinks and $nlinks == 2) { } |
|
224
|
2 |
3 |
-f (shift())->_lock_file ? : |
|
238
|
0 |
0 |
if $$self{'poll_interval'} |
|
250
|
1 |
1 |
if ($self->got_lock) |
|
261
|
0 |
1 |
if -e $unique_lock_file |
|
264
|
0 |
1 |
unless open my $fh, '>', $unique_lock_file |
|
271
|
0 |
1 |
if (not $linked and $! =~ /not permitted/i) |
|
281
|
10 |
1 |
if defined $$self{'unique_lock_file'} |
|
282
|
0 |
1 |
exists $INC{'threads.pm'} ? : |
|
291
|
7 |
1 |
if defined $$self{'lock_file'} |
|
301
|
0 |
0 |
unless $$self{'timeout_stale'} |
|
303
|
0 |
0 |
unless open my $fh, '<', $self->_lock_file |
|
308
|
0 |
0 |
if (&Time::HiRes::time() - $lines[0] > $$self{'timeout_stale'}) |