| line |
true |
false |
branch |
|
723
|
0 |
20 |
if $arg =~ s[^DBI::][2/DBI::] |
|
728
|
6 |
14 |
defined $args ? : |
|
732
|
16 |
2 |
if (DBI::looks_like_number($element)) { } |
|
|
2 |
0 |
elsif ($element =~ /^&(\w.*)/) { } |
|
733
|
0 |
16 |
$element < 0 ? : |
|
736
|
0 |
16 |
if $element & 1 |
|
737
|
12 |
4 |
if $element & 2 |
|
738
|
12 |
4 |
if $element & 4 |
|
739
|
0 |
16 |
if $element & 8 |
|
740
|
2 |
14 |
if $element & 16 |
|
741
|
0 |
16 |
$reverse ? : |
|
747
|
2 |
0 |
if (defined $code) { } |
|
760
|
10 |
10 |
if $package |
|
769
|
0 |
20 |
if $$self{'Trace'} |
|
779
|
0 |
0 |
unless $ON_FLUSH_DUMP |
|
780
|
0 |
0 |
unless $$self{'Data'} |
|
782
|
0 |
0 |
if $detail |
|
798
|
0 |
84 |
unless $node ||= $$self{'Data'} |
|
800
|
48 |
36 |
if (ref $node eq 'HASH') |
|
804
|
76 |
0 |
$$node{$_} ? : |
|
821
|
2 |
4 |
if $$args_ref{'sortsub'} |
|
835
|
56 |
0 |
if ($format_path_element eq '%s') { } |
|
841
|
20 |
0 |
$$node[0] ? : |
|
847
|
0 |
6 |
if wantarray |
|
863
|
38 |
2 |
if (@$leaves) |
|
867
|
38 |
0 |
if ($count) |
|
869
|
0 |
38 |
$DBI::PERL_ENDING ? : |
|
870
|
23 |
15 |
if $perl_time |
|
876
|
0 |
11 |
if (@$leaves == 1 and ref $$self{'Data'} eq 'HASH' and $$self{'Data'}{'DBI'}) |
|
880
|
0 |
40 |
if wantarray |
|
887
|
0 |
106 |
unless UNIVERSAL::isa($thingy, 'ARRAY') |
|
890
|
106 |
0 |
if $leaves |
|
892
|
70 |
36 |
if $count <= 1 |
|
894
|
36 |
0 |
$count ? : |
|
902
|
0 |
108 |
unless UNIVERSAL::isa($thingy, 'HASH') |
|
921
|
2 |
214 |
unless defined $thingy |
|
922
|
106 |
108 |
if UNIVERSAL::isa($thingy, 'ARRAY') |
|
924
|
108 |
0 |
if UNIVERSAL::isa($thingy, 'HASH') |
|
932
|
0 |
50 |
unless $ON_DESTROY_DUMP |
|
933
|
12 |
38 |
unless $$self{'Data'} |
|
935
|
38 |
0 |
if $detail |
|
942
|
0 |
56 |
if ($$self{'Trace'} || 0) >= 2 |
|
945
|
0 |
56 |
if ($@) |