Branch Coverage

blib/lib/DBIx/Recordset/FileSeq.pm
Criterion Covered Total %
branch 0 18 0.0


line true false branch
42 0 0 unless -e $dir
44 0 0 unless -d $dir
80 0 0 unless opendir DH, $$self{'*Dir'}
84 0 0 if (/seq\.(.*?)\.(\d*?)\.(\d+)$/)
121 0 0 unless (defined $cnt)
125 0 0 unless open FH, ">$dir/seq.$name.$max.$cnt"
131 0 0 if $max ne '' and $cnt1 > $max
133 0 0 if (rename "$dir/seq.$name.$max.$cnt", "$dir/seq.$name.$max.$cnt1")
141 0 0 if $lastcnt == $$self{'*Counter'}{$name}