Branch Coverage

blib/lib/Data/RecordStore/Silo.pm
Criterion Covered Total %
branch 60 68 88.2


line true false branch
59 4 5311 unless ($dir)
62 4 5307 unless ($template)
65 4711 596 $template =~ /\*/ ? :
66 4 5303 if ($record_size < 1)
69 4 5299 if ($size and $size != $record_size)
74 0 5299 if (@$err)
76 35 5264 if ($max_file_size < 1)
80 3308 1991 unless (-e "$dir/0")
109 740 0 if (-e $cfgfile)
138 4 2939 if ($template > 0) { }
87 2852 elsif ($template) { }
142 4 83 $template =~ /\*/ ? :
149 17 2926 if ($id > $self->entry_count or $id < 1)
166 20 2520 if ($id > $self->entry_count or $id < 1)
169 2135 385 unless ($template)
174 2499 21 ref $data ? :
179 4 2516 if ($write_size > $rec_size)
197 4 248 unless ($entries)
205 240 8 if ($new_subsilo_size or $subsilo_idx == 0) { }
218 4 8 unless ($entries)
269 0 0 if ($file eq '0') { }
303 1992 558 if ($needed > 0)
309 1980 12 if $records_needed_to_fill > $needed
311 1984 8 if ($records_needed_to_fill > 0)
314 0 1984 unless open my $fh, '+<', "$dir/$write_file"
328 0 8 if (-e "$dir/$write_file")
334 4 4 unless ($nulls)
342 12 1980 if ($needed > 0)
346 0 12 if (-e "$dir/$write_file")
369 19010 1550 if ($dh) { }
372 4 1546 unless opendir $dh, $self->[0]
375 548 20556 unless $_ eq '0'
82234 548 unless $_ > 0
396 0 6082 unless open my $fh, '+<', "$dir/$subsilo_idx"