| line |
true |
false |
branch |
|
724
|
0 |
20 |
if $arg =~ s[^DBI::][2/DBI::] |
|
729
|
6 |
14 |
defined $args ? : |
|
733
|
16 |
2 |
if (DBI::looks_like_number($element)) { } |
|
|
2 |
0 |
elsif ($element =~ /^&(\w.*)/) { } |
|
734
|
0 |
16 |
$element < 0 ? : |
|
737
|
0 |
16 |
if $element & 1 |
|
738
|
12 |
4 |
if $element & 2 |
|
739
|
12 |
4 |
if $element & 4 |
|
740
|
0 |
16 |
if $element & 8 |
|
741
|
2 |
14 |
if $element & 16 |
|
742
|
0 |
16 |
$reverse ? : |
|
748
|
2 |
0 |
if (defined $code) { } |
|
761
|
10 |
10 |
if $package |
|
770
|
0 |
48 |
if $self->{'Trace'} |
|
780
|
0 |
0 |
unless $ON_FLUSH_DUMP |
|
781
|
0 |
0 |
unless $self->{'Data'} |
|
783
|
0 |
0 |
if $detail |
|
799
|
0 |
84 |
unless $node ||= $self->{'Data'} |
|
801
|
48 |
36 |
if (ref $node eq 'HASH') |
|
805
|
76 |
0 |
$node->{$_} ? : |
|
822
|
2 |
4 |
if $args_ref->{'sortsub'} |
|
836
|
56 |
0 |
if ($format_path_element eq '%s') { } |
|
842
|
20 |
0 |
$node->[0] ? : |
|
848
|
0 |
6 |
if wantarray |
|
864
|
38 |
2 |
if (@$leaves) |
|
868
|
38 |
0 |
if ($count) |
|
870
|
0 |
38 |
$DBI::PERL_ENDING ? : |
|
871
|
23 |
15 |
if $perl_time |
|
877
|
0 |
9 |
if (@$leaves == 1 and ref $self->{'Data'} eq 'HASH' and $self->{'Data'}{'DBI'}) |
|
881
|
0 |
40 |
if wantarray |
|
888
|
0 |
106 |
unless UNIVERSAL::isa($thingy, 'ARRAY') |
|
891
|
106 |
0 |
if $leaves |
|
893
|
70 |
36 |
if $count <= 1 |
|
895
|
36 |
0 |
$count ? : |
|
903
|
0 |
108 |
unless UNIVERSAL::isa($thingy, 'HASH') |
|
922
|
2 |
214 |
unless defined $thingy |
|
923
|
106 |
108 |
if UNIVERSAL::isa($thingy, 'ARRAY') |
|
925
|
108 |
0 |
if UNIVERSAL::isa($thingy, 'HASH') |
|
933
|
0 |
50 |
unless $ON_DESTROY_DUMP |
|
934
|
12 |
38 |
unless $self->{'Data'} |
|
936
|
38 |
0 |
if $detail |
|
944
|
0 |
56 |
if ($self->{'Trace'} || 0) >= 2 |
|
946
|
0 |
56 |
if ($@) |