| line |
true |
false |
branch |
|
50
|
1 |
0 |
unless (defined $debug) |
|
53
|
0 |
1 |
if $debug |
|
75
|
0 |
0 |
unless ($on) |
|
76
|
0 |
0 |
if $self->cache |
|
85
|
0 |
0 |
if ($@) |
|
104
|
0 |
0 |
if (defined $dbh) |
|
138
|
0 |
0 |
if $debug |
|
144
|
0 |
0 |
if ($self->cache) |
|
146
|
0 |
0 |
if ($o) |
|
163
|
0 |
0 |
if ($@) |
|
167
|
0 |
0 |
if $debug |
|
168
|
0 |
0 |
if $debug |
|
171
|
0 |
0 |
if ($self->cache) |
|
189
|
0 |
0 |
unless (defined $$hash{'base'}) |
|
211
|
0 |
0 |
unless (defined $table) |
|
215
|
0 |
0 |
unless $$hash{'fields'} |
|
216
|
0 |
0 |
unless $$hash{'references'} |
|
228
|
0 |
0 |
if $debug |
|
234
|
0 |
0 |
if ($@) |
|
237
|
0 |
0 |
unless (@row) |
|
255
|
0 |
0 |
if ($$hash{'base'}) |
|
275
|
0 |
0 |
if (exists $$o{'_dbid_'}) |
|
288
|
0 |
0 |
unless (defined $hash) |
|
311
|
0 |
0 |
if (defined $$persist{'base'}) |
|
315
|
0 |
0 |
if ($id) |
|
318
|
0 |
0 |
if $debug |
|
324
|
0 |
0 |
if ($@) |
|
337
|
0 |
0 |
if $debug |
|
344
|
0 |
0 |
if ($@) |
|
363
|
0 |
0 |
unless (exists $$o{'_dbid_'}) |
|
370
|
0 |
0 |
unless (defined $persist) |
|
388
|
0 |
0 |
if (defined $$persist{'base'}) |
|
394
|
0 |
0 |
unless (defined $$persist{'base'}) |
|
406
|
0 |
0 |
unless $$persist{'references'} |
|
415
|
0 |
0 |
if $debug |
|
420
|
0 |
0 |
if ($@) |
|
441
|
0 |
0 |
unless (exists $$o{'_dbid_'}) |
|
448
|
0 |
0 |
if $debug |
|
469
|
0 |
0 |
if ($@) |
|
475
|
0 |
0 |
if (defined $base) |
|
503
|
0 |
0 |
if (@ids > 1) |
|
511
|
0 |
0 |
if (@ids == 1) |
|
512
|
0 |
0 |
if $debug |
|
545
|
0 |
0 |
if (defined $o) |
|
549
|
0 |
0 |
if $debug |
|
556
|
0 |
0 |
if (ref $value eq 'ARRAY' and $$value[0] eq '=') |
|
561
|
0 |
0 |
if (ref $value) |
|
646
|
0 |
0 |
if (defined $$fields{$key}) |
|
648
|
0 |
0 |
unless (defined $$value[1]) |
|
653
|
0 |
0 |
if (length $cmpvalue > $dbdriver->MaxLength and $$fields{$key}[0] eq $dbdriver->String) |
|
663
|
0 |
0 |
if (defined $$references{$key}) |
|
665
|
0 |
0 |
unless (defined $o) |
|
672
|
0 |
0 |
if ($@) |
|
685
|
0 |
0 |
if (defined $$fields{$key} or defined $$references{$key}) |
|
688
|
0 |
0 |
if ($value) { } |
|
701
|
0 |
0 |
if $debug |
|
710
|
0 |
0 |
if ($@) |
|
717
|
0 |
0 |
if ($mustSuper) |
|
721
|
0 |
0 |
unless $both |
|
763
|
0 |
0 |
if (defined $$persist{'references'}{$field}) |
|
792
|
0 |
0 |
if ($@) |