Branch Coverage

blib/lib/Persistent/File.pm
Criterion Covered Total %
branch 28 50 56.0


line true false branch
183 0 9 unless @_ > 0
185 0 9 unless ref $this
190 9 0 if @_
191 9 0 if @_
497 0 17 unless @_ > 0
499 0 17 unless ref $this
510 1 16 unless (-e $file)
511 0 1 unless open DB_FH, ">$file"
516 0 17 unless open DB_FH, "<$file"
528 59 0 if $id_field eq $field
553 0 10 unless @_ > 0
555 0 10 unless ref $this
559 10 0 if (defined $$this{'DataStore'}{'Hash'}) { }
565 0 10 unless open DB_FH, ">$file"
587 0 7 unless @_ > 0
589 0 7 unless ref $this
608 0 17 unless @_ > 0
610 0 17 unless ref $this
617 10 7 if ($lock_type =~ /ex/i)
626 1 16 unless (-e "$file.lock")
627 0 1 unless open LOCK_FH, ">$file.lock"
632 0 17 unless open LOCK_FH, "$open_type$file.lock"
634 0 17 unless flock LOCK_FH, $flock_type
649 0 17 unless @_ > 0
651 0 17 unless ref $this