| line |
true |
false |
branch |
|
161
|
0 |
3 |
if ($opt{'loose'}) |
|
162
|
3 |
0 |
if ($opt{'pkey'}) { } |
|
188
|
0 |
0 |
if ($v) |
|
208
|
0 |
0 |
if (not $dbh or $$p{'simu'}) |
|
223
|
0 |
0 |
unless ($dbh) |
|
224
|
0 |
0 |
if ($$p{'debug'} and $vals) |
|
227
|
0 |
0 |
unless ($sth) |
|
229
|
0 |
0 |
unless ($ok) |
|
232
|
0 |
0 |
unless ($rett) |
|
233
|
0 |
0 |
if (my $rcb = $$rets{$rett}) |
|
272
|
0 |
2 |
if ($@) |
|
273
|
0 |
2 |
if (reftype $e ne 'HASH') |
|
276
|
0 |
2 |
if (my $ats = $c{'attrs'}) |
|
277
|
0 |
0 |
if (ref $ats ne 'ARRAY') |
|
282
|
0 |
2 |
if (grep {ref $$e{$_};} keys %$e) |
|
284
|
0 |
0 |
ref $$e{$_} ? : |
|
295
|
0 |
2 |
if ($$p{'autoid'} and $$p{'autoid'} eq 'seq') |
|
298
|
0 |
0 |
if (@pka > 1) |
|
307
|
0 |
2 |
if ($hardval) |
|
312
|
0 |
0 |
$$p{'dbh'}->can('quote') ? : |
|
321
|
0 |
2 |
if (my $hv = $hardval) |
|
322
|
0 |
0 |
if ($hv == 2) { } |
|
|
0 |
0 |
elsif ($hv == 1) { } |
|
325
|
0 |
0 |
unless ($ok) |
|
330
|
0 |
2 |
if ($$p{'debug'}) |
|
331
|
2 |
0 |
unless ($$p{'dbh'}) |
|
334
|
0 |
0 |
unless ($hardval) |
|
337
|
0 |
0 |
if ($$p{'autoid'}) { } |
|
339
|
0 |
0 |
if (@pka != 1) |
|
381
|
0 |
2 |
if (reftype $e ne 'HASH') |
|
384
|
0 |
2 |
if ($$p{'debug'}) |
|
388
|
2 |
0 |
if (my $idg = $$idvgens{$idrt}) { } |
|
392
|
0 |
2 |
if (@pkv != @pka) |
|
398
|
0 |
2 |
if (ref $c{'attrs'} eq 'ARRAY') { } |
|
408
|
0 |
2 |
if (my(@badid) = $p->invalidids(@pkv)) |
|
411
|
0 |
2 |
$hardval ? : |
|
414
|
0 |
2 |
unless ($pot) |
|
420
|
0 |
2 |
if (my $hv = $hardval) |
|
423
|
0 |
0 |
$$p{'dbh'}->can('quote') ? : |
|
429
|
0 |
0 |
unless (@pkv) |
|
430
|
0 |
0 |
if ($hv == 2) { } |
|
|
0 |
0 |
elsif ($hv == 1) { } |
|
434
|
0 |
0 |
unless ($ok) |
|
440
|
0 |
2 |
if ($$p{'debug'}) |
|
441
|
2 |
0 |
unless ($$p{'dbh'}) |
|
446
|
0 |
0 |
if ($@) |
|
481
|
0 |
2 |
unless ($e) |
|
487
|
0 |
2 |
if (not $rt and $pkc == 1) |
|
490
|
2 |
0 |
if ($rt eq 'HASH') { } |
|
|
0 |
0 |
elsif ($rt eq 'ARRAY' and $pkc == scalar @$e) { } |
|
491
|
0 |
2 |
unless (%$e) |
|
507
|
0 |
2 |
unless ($wstr) |
|
509
|
2 |
0 |
unless ($$p{'dbh'}) |
|
525
|
2 |
0 |
$$p{'where'} ? : |
|
527
|
2 |
0 |
unless ($$p{'dbh'}) |
|
543
|
2 |
0 |
$$p{'where'} ? : |
|
545
|
0 |
2 |
if (reftype $ids eq 'HASH') |
|
553
|
0 |
0 |
if (my $hv = $hardval && $$p{'dbh'}) |
|
561
|
2 |
0 |
unless ($$p{'dbh'}) |
|
580
|
0 |
0 |
if ($h) |
|
583
|
0 |
0 |
unless ($wf) |
|
587
|
0 |
0 |
if (ref $sort and @$sort) |
|
592
|
0 |
0 |
if ($$p{'debug'}) |
|
594
|
0 |
0 |
if (ref $c{'attrs'} eq 'ARRAY') |
|
615
|
0 |
0 |
if ($c{'full'}) |
|
626
|
0 |
0 |
if (@_ == 1) |
|
643
|
0 |
0 |
if ($fsingle) |
|
663
|
0 |
0 |
unless ($chts) |
|
664
|
0 |
0 |
if (ref $chts ne 'ARRAY') |
|
666
|
0 |
0 |
if (@ids > 1) |
|
674
|
0 |
0 |
if ($debug) |
|
677
|
0 |
0 |
unless ($park) |
|
680
|
0 |
0 |
if (@$park != @ids) |
|
687
|
0 |
0 |
unless ($carr and @$carr) |
|
691
|
0 |
0 |
if (my $bto = $$cinfo{'blessto'}) |
|
705
|
0 |
0 |
if (ref $cv eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $cv eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $cv ne '') { } |
|
707
|
0 |
0 |
if (@$cv != 3) |
|
715
|
0 |
0 |
unless ($$cv{'parkey'}) |
|
716
|
0 |
0 |
unless ($$cv{$_}) |
|
736
|
0 |
2 |
if (ref $$p{'pkey'} ne 'ARRAY') |
|
739
|
0 |
2 |
if ($$p{'simu'}) |
|
753
|
0 |
11 |
if ($prt ne 'HASH') |
|
759
|
0 |
11 |
if (ref $$p{'pkey'} ne 'ARRAY') |
|
775
|
2 |
2 |
if (ref $fh eq 'HASH' and keys %$fh) |
|
779
|
0 |
4 |
if ($$p{'debug'}) |
|
780
|
4 |
0 |
unless ($$p{'dbh'}) |
|
808
|
0 |
0 |
unless ($pot) |
|
809
|
0 |
0 |
unless ($dbh = $$p{'dbh'}) |
|
825
|
3 |
0 |
unless not defined $_ |
|
840
|
0 |
5 |
if (@pka < 1) |
|
842
|
0 |
0 |
if ($pkval and ref $pkval eq 'ARRAY' and @$pkval == @pka) |
|
849
|
0 |
0 |
$$p{'dbh'} ? : |
|
878
|
0 |
0 |
if (ref $vals ne 'ARRAY') |
|
881
|
0 |
0 |
if (/^\d+$/) { } |
|
891
|
0 |
0 |
if (ref $v ne 'ARRAY') |
|
893
|
0 |
0 |
if (@$v != 2) |
|
894
|
0 |
0 |
unless (defined $$v[0] and defined $$v[1]) |
|
896
|
0 |
0 |
&Scalar::Util::looks_like_number($_) ? : |
|
897
|
0 |
0 |
if (@nums == 2) |
|
898
|
0 |
0 |
if ($$v[1] < $$v[0]) |
|
919
|
0 |
2 |
if (ref $e ne 'HASH') |
|
930
|
0 |
2 |
if (ref $v eq 'ARRAY') { } |
|
|
0 |
2 |
elsif ($v =~ /%/) { } |
|
|
0 |
2 |
elsif ($v =~ /^\d+$/) { } |
|
941
|
0 |
2 |
if (ref $c{'vals'} eq 'ARRAY') |
|
945
|
0 |
0 |
if (ref $v eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($v =~ /%/) { } |
|
962
|
0 |
0 |
unless ($e and %$e) |
|
976
|
0 |
6 |
if (ref $$h{$_} eq 'HASH') { } |
|
|
0 |
6 |
elsif (ref $$h{$_} eq 'ARRAY') { } |
|
995
|
0 |
0 |
if ($rt eq 'StoredHash') { } |
|
999
|
0 |
0 |
unless ($dbh) |
|
1004
|
0 |
0 |
if ($c{'tabonly'}) |
|
1019
|
0 |
0 |
unless ($dbh) |
|
1020
|
0 |
0 |
unless ($tn) |