Branch Coverage

blib/lib/DDLock/Client/File.pm
Criterion Covered Total %
branch 0 26 0.0


line true false branch
16 0 0 unless ref $self
22 0 0 unless (-d $lockdir)
31 0 0 if (-e $tmpfile)
32 0 0 unless unlink $tmpfile
35 0 0 unless my $fh = 'IO::File'->new($tmpfile, 193)
41 0 0 unless link $tmpfile, $lockfile
43 0 0 unless unlink $tmpfile
61 0 0 if (@_) { }
72 0 0 if (my $hook = $$self{'hooks'}{$hookname})
75 0 0 if $@
84 0 0 unless $$self{'path'}
85 0 0 unless unlink $$self{'path'}
104 0 0 if $$ == $$self{'pid'}