| line |
true |
false |
branch |
|
31
|
0 |
1 |
if $args->{'dotlock_file'} |
|
41
|
0 |
1 |
unless @_ and $_[0] |
|
44
|
0 |
1 |
unless (defined $self->filename) |
|
47
|
0 |
0 |
$org eq 'DIRECTORY' ? : |
|
|
0 |
0 |
$org eq 'FILE' ? : |
|
62
|
0 |
1 |
unless $self->hasLock |
|
67
|
0 |
1 |
unless unlink $lock |
|
77
|
0 |
1 |
if -e $lockfile |
|
79
|
0 |
1 |
$^O eq 'MSWin32' ? : |
|
81
|
1 |
0 |
if sysopen $lock, $lockfile, $flags, 384 |
|
84
|
0 |
0 |
unless $! == 17 |
|
94
|
1 |
1 |
if $self->hasLock |
|
98
|
0 |
1 |
$timeout eq 'NOTIMEOUT' ? : |
|
103
|
1 |
0 |
if $self->_try_lock($lockfile) |
|
106
|
0 |
0 |
if (-e $lockfile and -A $lockfile > $expire) |
|
107
|
0 |
0 |
unless unlink $lockfile |
|
114
|
0 |
0 |
unless --$end |