|  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') { }  |