Branch Coverage

blib/lib/File/Flock/Tiny.pm
Criterion Covered Total %
branch 13 16 81.2


line true false branch
36 8 31 if (ref $file and ref $file eq 'GLOB' || $file->isa('IO::Handle')) { }
37 0 8 unless $fh = 'IO::Handle'->new_from_fd($file, '>>')
40 0 31 unless open $fh, '>>', $file
56 0 23 unless flock $fh, 2
70 6 10 unless flock $fh, 6
88 2 2 if $lock
152 35 15 if ($lock->opened)
160 38 1 unless (*$lock->{'destroy_only_in'} and *$lock->{'destroy_only_in'} != $$)