Branch Coverage

blib/lib/StoredHash.pm
Criterion Covered Total %
branch 29 136 21.3


line true false branch
62 0 3 if ($opt{'loose'})
63 3 0 if ($opt{'pkey'}) { }
84 0 0 if ($v)
104 0 0 if (not $dbh or $$p{'simu'})
118 0 0 unless ($dbh)
119 0 0 if ($$p{'debug'})
122 0 0 unless ($sth)
124 0 0 unless ($ok)
126 0 0 if (my $rcb = $$rets{$rett})
147 0 2 if ($@)
148 0 2 if (reftype $e ne 'HASH')
155 0 2 if ($$p{'autoid'} and $$p{'autoid'} eq 'seq')
158 0 0 if (@pka > 1)
167 2 0 unless ($$p{'dbh'})
171 0 0 if ($$p{'autoid'}) { }
173 0 0 if (@pka != 1)
204 0 2 if (reftype $e ne 'HASH')
207 0 2 if ($$p{'debug'})
210 2 0 if (my $idg = $$idvgens{$idrt}) { }
214 0 2 if (@pkv != @pka)
218 0 2 if (my(@badid) = $p->invalidids(@pkv))
222 0 2 unless ($pot)
225 2 0 unless ($$p{'dbh'})
243 0 2 unless ($e)
249 0 2 if (not $rt and $pkc == 1) { }
2 0 elsif ($rt eq 'HASH') { }
0 0 elsif ($rt eq 'ARRAY' and $pkc == scalar @$e) { }
259 2 0 unless ($$p{'dbh'})
271 2 0 $$p{'where'} ? :
273 2 0 unless ($$p{'dbh'})
284 2 0 $$p{'where'} ? :
286 2 0 unless ($$p{'dbh'})
298 0 0 if ($h)
300 0 0 unless ($wf)
303 0 0 if ($$p{'debug'})
315 0 0 if (@_ == 1)
332 0 0 if ($fsingle)
350 0 0 unless ($chts)
351 0 0 if (ref $chts ne 'ARRAY')
353 0 0 if (@ids > 1)
361 0 0 if ($debug)
364 0 0 unless ($park)
367 0 0 if (@$park != @ids)
374 0 0 unless ($carr and @$carr)
378 0 0 if (my $bto = $$cinfo{'blessto'})
390 0 0 if (ref $cv eq 'ARRAY') { }
0 0 elsif (ref $cv eq 'HASH') { }
0 0 elsif (ref $cv ne '') { }
392 0 0 if (@$cv != 3)
400 0 0 unless ($$cv{'parkey'})
401 0 0 unless ($$cv{$_})
420 0 2 if (ref $$p{'pkey'} ne 'ARRAY')
423 0 2 if ($$p{'simu'})
433 0 13 if ($prt ne 'HASH')
438 0 13 if (ref $$p{'pkey'} ne 'ARRAY')
459 0 0 unless ($pot)
460 0 0 unless ($dbh = $$p{'dbh'})
476 3 0 unless not defined $_
485 0 7 if (@pka < 1)
500 0 0 if (ref $vals eq 'ARRAY')
503 0 0 if (/^\d+$/) { }
514 0 0 if (@$v != 2)
533 0 0 if (ref $e ne 'HASH')
542 0 0 if (ref $v eq 'ARRAY') { }
0 0 elsif ($v =~ /%/) { }
0 0 elsif ($v =~ /^\d+$/) { }
560 0 6 if (ref $$h{$_} eq 'HASH') { }
0 6 elsif (ref $$h{$_} eq 'ARRAY') { }