| line |
true |
false |
branch |
|
10
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
17
|
0 |
0 |
unless NoSQL::PL2SQL::Object::item($_) |
|
34
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
53
|
0 |
0 |
if $item and $$item[1] |
|
66
|
0 |
0 |
if $$self{'data'} and not $$self{'globals'}{'rollback'} |
|
90
|
0 |
0 |
if $ct < 50 |
|
93
|
0 |
0 |
unless @errors |
|
108
|
0 |
0 |
unless ($updates * 1) |
|
136
|
0 |
0 |
if (@$self == 3) |
|
193
|
0 |
0 |
if @_ |
|
201
|
0 |
0 |
if @_ |
|
209
|
0 |
0 |
if @_ |
|
223
|
0 |
0 |
if $$self{'globals'}{'rollback'} |
|
224
|
0 |
0 |
unless $$self{'update'} |
|
225
|
0 |
0 |
if $$self{'top'} and not $self->record |
|
227
|
0 |
0 |
unless $$self{'delete'} |
|
229
|
0 |
0 |
if ($$self{'top'}) { } |
|
232
|
0 |
0 |
if (not exists $xml[-1]{'sql'}{'reftype'}) { } |
|
|
0 |
0 |
elsif (grep(($_ eq $xml[-1]{'sql'}{'reftype'}), ('scalar', 'scalarref'))) { } |
|
236
|
0 |
0 |
if @chain |
|
245
|
0 |
0 |
$r eq 'scalarref' ? : |
|
|
0 |
0 |
$r eq 'arrayref' ? : |
|
|
0 |
0 |
$r eq 'hashref' ? : |
|
253
|
0 |
0 |
unless grep(($_ eq $$self{'reftype'}), ('arrayref', 'hashref')) |
|
256
|
0 |
0 |
if exists $$self{'sequence'} |
|
270
|
0 |
0 |
if $$memo{'sql'}{'reftype'} eq 'scalarref' |
|
275
|
0 |
0 |
if (my $mrec = $self->refrecord(1)) |
|
281
|
0 |
0 |
if $combined[-1]{'sql'}{'reftype'} eq 'scalarref' |
|
289
|
0 |
0 |
if ($$self{'parent'}) |
|
310
|
0 |
0 |
if $$r{'deleted'} and not $k |
|
313
|
0 |
0 |
if $$r{$kk} |
|
319
|
0 |
0 |
@_ ? : |
|
321
|
0 |
0 |
if $k |
|
329
|
0 |
0 |
@_ ? : |
|
340
|
0 |
0 |
if @_ |
|
343
|
0 |
0 |
unless ref $$self{'data'} |
|
348
|
0 |
0 |
$$self{'reftype'} eq 'scalarref' ? : |
|
|
0 |
0 |
$$self{'reftype'} eq 'arrayref' ? : |
|
|
0 |
0 |
$$self{'reftype'} eq 'hashref' ? : |
|
353
|
0 |
0 |
unless $oo[1]{'top'} |
|
356
|
0 |
0 |
if $k |
|
357
|
0 |
0 |
if $rec |
|
363
|
0 |
0 |
$oo[1]{'reftype'} eq 'scalarref' ? : |
|
365
|
0 |
0 |
if $refto and not exists $oo[1]{'globals'}{'scalarrefs'}{$refto} |
|
369
|
0 |
0 |
if $oo[1] == $o |
|
397
|
0 |
0 |
@_ ? : |
|
413
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
414
|
0 |
0 |
unless ($$self{'data'}) |
|
415
|
0 |
0 |
if $refto |
|
420
|
0 |
0 |
if $blesstype |
|
423
|
0 |
0 |
if (@args) |
|
425
|
0 |
0 |
@args == 1 ? : |
|
430
|
0 |
0 |
unless ($$self{'data'}) |
|
431
|
0 |
0 |
if $refto |
|
441
|
0 |
0 |
if $blesstype |
|
444
|
0 |
0 |
if (@args) |
|
446
|
0 |
0 |
@args == 1 ? : |
|
452
|
0 |
0 |
@args == 1 ? : |
|
|
0 |
0 |
@args == 2 ? : |
|
477
|
0 |
0 |
if $item and $$item[1] |
|
487
|
0 |
0 |
@_ ? : |
|
488
|
0 |
0 |
unless defined $self |
|
492
|
0 |
0 |
if $reference and $$reference{'clone'} |
|
494
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
523
|
0 |
0 |
unless ref $self |
|
524
|
0 |
0 |
if ref $self eq 'HASH' and tied %$self |
|
525
|
0 |
0 |
if ref $self eq 'ARRAY' and tied @$self |
|
526
|
0 |
0 |
if ref $self eq 'SCALAR' and tied $$self |
|
528
|
0 |
0 |
if grep((ref $self eq $_), ('HASH', 'ARRAY', 'SCALAR')) |
|
530
|
0 |
0 |
if ref $self eq 'NoSQL::PL2SQL::Object' |
|
532
|
0 |
0 |
if $self->isa('HASH') and tied %$self |
|
533
|
0 |
0 |
if $self->isa('ARRAY') and tied @$self |
|
534
|
0 |
0 |
if $self->isa('SCALAR') and tied $$self |
|
545
|
0 |
0 |
if $$self{'globals'}{'clone'} |
|
552
|
0 |
0 |
@_ ? : |
|
555
|
0 |
0 |
unless ref $o and $blesstype |
|
556
|
0 |
0 |
if grep(($_ eq $blesstype), ('SCALAR', 'ARRAY', 'HASH')) |
|
569
|
0 |
0 |
@_ ? : |
|
571
|
0 |
0 |
--$$self{'globals'}{'refcount'}{$recid} > 0 ? : |
|
577
|
0 |
0 |
unless ref $$self{'data'} |
|
580
|
0 |
0 |
unless ref $$ii[1] eq ref $self |
|
584
|
0 |
0 |
unless $v |
|
586
|
0 |
0 |
if @_ |
|
595
|
0 |
0 |
unless ref $o |
|
597
|
0 |
0 |
if ref $o eq 'HASH' |
|
598
|
0 |
0 |
unless @out or ref $o ne 'ARRAY' |
|
599
|
0 |
0 |
if ref $o eq 'SCALAR' |
|
600
|
0 |
0 |
if ref $o eq 'NoSQL::PL2SQL::Object' |
|
602
|
0 |
0 |
unless @out or not $o->isa('HASH') |
|
603
|
0 |
0 |
unless @out or not $o->isa('ARRAY') |
|
611
|
0 |
0 |
if (ref $o ne 'NoSQL::PL2SQL::Object') { } |
|
|
0 |
0 |
elsif ($$o{'reftype'} eq 'scalarref') { } |
|
630
|
0 |
0 |
if @_ |
|
632
|
0 |
0 |
if $$self{'globals'}{'clone'} |
|
640
|
0 |
0 |
unless defined $dd[1] |
|
641
|
0 |
0 |
ref $dd[0] ? : |
|
647
|
0 |
0 |
unless $$self{'top'} |
|
648
|
0 |
0 |
if grep(($$self{'reftype'} eq $_), ('scalarref', 'arrayref', 'hashref')) |
|
650
|
0 |
0 |
if ref $$self{'data'} |
|
651
|
0 |
0 |
if exists $$self{'ref'} |
|
652
|
0 |
0 |
if length $$self{'data'} > 512 |
|
657
|
0 |
0 |
unless $types[0] eq $types[1] |
|
660
|
0 |
0 |
unless $self->record->{'defined'} or defined $item |
|
661
|
0 |
0 |
if $self->record->{'defined'} and defined $$self{'data'} and $$self{'data'} eq $item |
|
677
|
0 |
0 |
exists $$r{$_} ? : |
|
679
|
0 |
0 |
if exists $$o{'sequence'} |
|
685
|
0 |
0 |
if (not exists $$o{'data'}) { } |
|
|
0 |
0 |
elsif ($o->record->{'deleted'}) { } |
|
|
0 |
0 |
elsif (my(@rewrite) = $o->scalarok) { } |
|
|
0 |
0 |
elsif ($o->equals($$o{'data'}, $$o{'ref'})) { } |
|
688
|
0 |
0 |
@rewrite > 1 ? : |
|
702
|
0 |
0 |
if $xml[-1]{'sql'}{'reftype'} eq 'scalar' and $$o{'reftype'} eq 'scalarref' |
|
712
|
0 |
0 |
unless $xml == $xml[-1] |
|
737
|
0 |
0 |
ref $$item[0] && $$item[1]{'top'} && $$item[1]{'reftype'} eq 'scalarref' ? : |
|
746
|
0 |
0 |
if @_ |
|
750
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
751
|
0 |
0 |
$$self{'data'}{$k} ? : |
|
758
|
0 |
0 |
$$self{'data'}[$k] ? : |
|
764
|
0 |
0 |
if $seqflag |
|
775
|
0 |
0 |
if grep(($_ eq $$o{'reftype'}), ('hashref', 'arrayref')) |
|
830
|
0 |
0 |
@_ ? : |
|
831
|
0 |
0 |
@_ ? : |
|
837
|
0 |
0 |
ref $_ ? : |
|
858
|
0 |
0 |
unless $o |
|
860
|
0 |
0 |
unless $$o{'reftype'} eq 'item' |
|
861
|
0 |
0 |
if $obliterate |
|
863
|
0 |
0 |
if ($$self{'reftype'} eq 'hashref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'arrayref') { } |
|
|
0 |
0 |
elsif ($$self{'reftype'} eq 'scalarref') { } |
|
870
|
0 |
0 |
$obliterate ? : |
|
878
|
0 |
0 |
unless $$o{'top'} |