blib/lib/Tie/MLDBM/Lock/File.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
20 | 0 | 0 | unless (exists $$self{'Lock'}) |
26 | 0 | 0 | unless my $file = $$self{'Config'}{'Lockfile'} |
30 | 0 | 0 | unless my $fh = 'IO::File'->new('+>' . $file) |
36 | 0 | 0 | unless flock $$self{'Lock'}, 2 |
51 | 0 | 0 | unless (exists $$self{'Lock'}) |
57 | 0 | 0 | unless my $file = $$self{'Config'}{'Lockfile'} |
61 | 0 | 0 | unless my $fh = 'IO::File'->new('+>' . $file) |
67 | 0 | 0 | unless flock $$self{'Lock'}, 1 |
81 | 0 | 0 | if (exists $$self{'Lock'}) |