Branch Coverage

blib/lib/SHARYANTO/File/Flock.pm
Criterion Covered Total %
branch 11 20 55.0


line true false branch
16 0 4 unless defined $path
30 0 4 if $$self{'_fh'}
41 0 4 unless open $$self{'_fh'}, '>>', $path
48 4 0 if (flock $$self{'_fh'}, 6) { }
51 0 4 unless @st1
58 0 4 unless @st2
62 0 4 if $st1[0] != $st2[0] or $st1[1] != $st2[1]
67 0 0 unless $tries <= $$self{'retries'}
83 1 4 unless $$self{'_fh'}
85 2 2 if $$self{'_created'} and not -s $$self{'path'}