| line |
true |
false |
branch |
|
18
|
0 |
3 |
unless $type =~ /^(?:flock|fcntl)$/ |
|
27
|
1 |
2 |
if (defined(my $timeout = delete $opts{'timeout'})) |
|
33
|
2 |
1 |
if (defined $file) { } |
|
35
|
0 |
2 |
unless $open_mode =~ /^\+?(?:<|>>?)/ |
|
36
|
0 |
2 |
unless open $fh, $mode, $file |
|
51
|
0 |
3 |
if ($type eq 'fcntl') { } |
|
54
|
0 |
0 |
$lock_mode eq '<' ? : |
|
57
|
0 |
3 |
$lock_mode eq '<' ? : |
|
61
|
0 |
3 |
if %opts |
|
75
|
16 |
0 |
if ($self->{'type'} eq 'flock') { } |
|
84
|
2 |
14 |
if ($ok) { } |
|
|
13 |
1 |
elsif ($! == &Errno::EAGAIN() and !defined($self->{'max_time'}) || $self->{'max_time'} >= $now) { } |