line |
true |
false |
branch |
23
|
1 |
0 |
if ($^O ne 'MSWin32') { } |
26
|
0 |
1 |
if $@ |
31
|
0 |
0 |
if $@ |
180
|
0 |
0 |
defined $title ? : |
186
|
0 |
0 |
if ($Displaycallerlocation) |
188
|
0 |
0 |
defined $overrides{'DUMPER_NAME'} ? : |
191
|
0 |
0 |
unless (defined $structure_to_dump) |
196
|
0 |
0 |
if ('' eq ref $structure_to_dump) |
201
|
0 |
0 |
if ($Displaycallerlocation) |
208
|
0 |
0 |
if (exists $overrides{'NO_PACKAGE_SETUP'} and $overrides{'NO_PACKAGE_SETUP'}) { } |
217
|
0 |
0 |
unless (exists $local_setup{'TYPE_FILTERS'}{'Regexp'}) |
243
|
0 |
0 |
defined $title ? : |
245
|
0 |
0 |
if (defined $structure_to_dump) { } |
270
|
0 |
0 |
if '' eq $tree_type |
274
|
0 |
0 |
if $$setup{'MAX_DEPTH'} == $level |
279
|
0 |
0 |
if ($level == 0) |
283
|
0 |
0 |
if ($@) |
290
|
0 |
0 |
if $level == 0 |
298
|
0 |
0 |
if (defined $filter_sub) { } |
303
|
0 |
0 |
if defined $replacement_tree |
310
|
0 |
0 |
unless defined $tree_type |
317
|
0 |
0 |
if (ref $node eq 'ARRAY') { } |
332
|
0 |
0 |
if $level == 0 |
363
|
0 |
0 |
if (not $is_terminal_node and exists $$already_displayed_nodes{$element_address}) |
368
|
0 |
0 |
defined $tree ? : |
381
|
0 |
0 |
if (not $is_terminal_node) { } |
399
|
0 |
0 |
if $level == 0 |
414
|
0 |
0 |
if defined $level_filters and exists $$level_filters{$level} |
417
|
0 |
0 |
if defined $type_filters and exists $$type_filters{$type} |
419
|
0 |
0 |
unless ('CODE' eq ref $filter_sub or not defined $filter_sub) |
441
|
0 |
0 |
if ($tree_type eq 'HASH' or obj $tree, 'HASH') |
443
|
0 |
0 |
if defined $element |
445
|
0 |
0 |
if ($$setup{'QUOTE_HASH_KEYS'}) { } |
460
|
0 |
0 |
if ($tree_type eq 'ARRAY' or obj $tree, 'ARRAY') |
471
|
0 |
0 |
if defined $element |
478
|
0 |
0 |
if ($tree_type eq 'REF' or obj $tree, 'REF') |
480
|
0 |
0 |
if defined $element |
488
|
0 |
0 |
if ($element_type eq '' or obj $element, 'HASH') |
493
|
0 |
0 |
if ($element_type eq 'HASH' or obj $element, 'HASH') |
498
|
0 |
0 |
if ($element_type eq 'ARRAY' or obj $element, 'ARRAY') |
503
|
0 |
0 |
if ($element_type eq 'REF' or obj $element, 'REF') |
508
|
0 |
0 |
if ($element_type eq 'CODE' or obj $element, 'CODE') |
513
|
0 |
0 |
if ($element_type eq 'SCALAR' or obj $element, 'SCALAR') |
525
|
0 |
0 |
if ($tree_type eq 'CODE' or obj $tree, 'CODE') |
527
|
0 |
0 |
if defined $element |
535
|
0 |
0 |
if ($tree_type eq 'SCALAR' or obj $tree, 'SCALAR') |
537
|
0 |
0 |
if defined $element |
595
|
0 |
0 |
if (exists $$setup{'__TYPE_SEPARATORS'}{$tree_type}) { } |
613
|
0 |
0 |
if $$setup{'NO_OUTPUT'} |
615
|
0 |
0 |
if (defined $$setup{'RENDERER'}{'END'}) { } |
621
|
0 |
0 |
unless ($$setup{'USE_ASCII'}) |
638
|
0 |
0 |
if (defined $$setup{'RENDERER'} and '' eq ref $$setup{'RENDERER'}) |
645
|
0 |
0 |
if $@ |
648
|
0 |
0 |
if (defined $$setup{'RENDERER'}{'NAME'}) |
655
|
0 |
0 |
if $@ |
658
|
0 |
0 |
unless ($$setup{'NO_OUTPUT'}) |
662
|
0 |
0 |
if (defined $$setup{'RENDERER'}{'BEGIN'}) { } |
665
|
0 |
0 |
if $$setup{'DISPLAY_ROOT_ADDRESS'} |
668
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
671
|
0 |
0 |
if $$setup{'DISPLAY_PERL_SIZE'} |
679
|
0 |
0 |
defined $$setup{'TITLE'} ? : |
681
|
0 |
0 |
if $$setup{'DISPLAY_ROOT_ADDRESS'} |
682
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
683
|
0 |
0 |
if $$setup{'DISPLAY_PERL_SIZE'} |
723
|
0 |
0 |
if $$setup{'NO_OUTPUT'} |
725
|
0 |
0 |
if (defined $$setup{'RENDERER'}{'NODE'}) { } |
755
|
0 |
0 |
unless $perl_size eq '' |
759
|
0 |
0 |
if ($$setup{'NO_WRAP'}) { } |
768
|
0 |
0 |
if (defined $$setup{'WRAP_WIDTH'}) { } |
774
|
0 |
0 |
if (defined $^O) |
776
|
0 |
0 |
if ($^O ne 'MSWin32') { } |
786
|
0 |
0 |
if ($columns eq '') |
795
|
0 |
0 |
if (length($tree_header) + length($element_description) > $columns and not $$setup{'NO_WRAP'}) { } |
832
|
0 |
0 |
if $$setup{'DISPLAY_PERL_SIZE'} |
843
|
0 |
0 |
if ('' eq $_) |
849
|
0 |
0 |
defined $element ? : |
853
|
0 |
0 |
if (defined $replacement_list) |
863
|
0 |
0 |
if ($$setup{'QUOTE_VALUES'} and defined $element) { } |
872
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
879
|
0 |
0 |
if ('HASH' eq $_) |
889
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
891
|
0 |
0 |
unless (%{$element;} or $$setup{'NO_NO_ELEMENTS'}) |
896
|
0 |
0 |
if (%{$element;} and $$setup{'MAX_DEPTH'} == $level + 1 && $$setup{'DISPLAY_NUMBER_OF_ELEMENTS_OVER_MAX_DEPTH'} || $$setup{'DISPLAY_NUMBER_OF_ELEMENTS'}) |
907
|
0 |
0 |
$number_of_elements > 1 ? : |
914
|
0 |
0 |
if ($$setup{'DISPLAY_TIE'} and my $tie = tied %$element) |
926
|
0 |
0 |
if ('ARRAY' eq $_) |
936
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
938
|
0 |
0 |
unless (@{$element;} or $$setup{'NO_NO_ELEMENTS'}) |
943
|
0 |
0 |
if (@{$element;} and $$setup{'MAX_DEPTH'} == $level + 1 && $$setup{'DISPLAY_NUMBER_OF_ELEMENTS_OVER_MAX_DEPTH'} || $$setup{'DISPLAY_NUMBER_OF_ELEMENTS'}) |
953
|
0 |
0 |
scalar @{$element;} ? : |
960
|
0 |
0 |
if ($$setup{'DISPLAY_TIE'} and my $tie = tied @$element) |
971
|
0 |
0 |
if ('CODE' eq $_) |
980
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
985
|
0 |
0 |
if ('SCALAR' eq $_) |
989
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
994
|
0 |
0 |
if ('GLOB' eq $_) |
997
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
1002
|
0 |
0 |
if ('REF' eq $_) |
1005
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
1013
|
0 |
0 |
if (obj $element, 'HASH') { } |
|
0 |
0 |
elsif (obj $element, 'ARRAY') { } |
|
0 |
0 |
elsif (obj $element, 'GLOB') { } |
|
0 |
0 |
elsif (obj $element, 'SCALAR') { } |
1016
|
0 |
0 |
if (%{$element;} and $$setup{'MAX_DEPTH'} == $level + 1 && $$setup{'DISPLAY_NUMBER_OF_ELEMENTS_OVER_MAX_DEPTH'} || $$setup{'DISPLAY_NUMBER_OF_ELEMENTS'}) |
1027
|
0 |
0 |
$number_of_elements > 1 ? : |
1034
|
0 |
0 |
if (@{$element;} and $$setup{'MAX_DEPTH'} == $level + 1 && $$setup{'DISPLAY_NUMBER_OF_ELEMENTS_OVER_MAX_DEPTH'} || $$setup{'DISPLAY_NUMBER_OF_ELEMENTS'}) |
1044
|
0 |
0 |
scalar @{$element;} ? : |
1057
|
0 |
0 |
if $$setup{'DISPLAY_PERL_ADDRESS'} |
1068
|
0 |
0 |
if ($$setup{'DISPLAY_OBJECT_TYPE'}) |
1083
|
0 |
0 |
if (exists $$already_displayed_nodes{$element_address}) { } |
1087
|
0 |
0 |
if $$setup{'DISPLAY_ADDRESS'} |
1094
|
0 |
0 |
if $$setup{'DISPLAY_PATH'} |
1097
|
0 |
0 |
if $$setup{'DISPLAY_ADDRESS'} |
1135
|
0 |
0 |
if ('' eq $_) |
1141
|
0 |
0 |
if ('HASH' eq $_) |
1143
|
0 |
0 |
unless %$element |
1146
|
0 |
0 |
if (not $is_terminal_node and defined $$setup{'RENDERER'}{'NODE'}) |
1148
|
0 |
0 |
if (defined $filter_sub) |
1156
|
0 |
0 |
unless @children_nodes_to_display |
1163
|
0 |
0 |
if ('ARRAY' eq $_) |
1165
|
0 |
0 |
unless @$element |
1168
|
0 |
0 |
if (not $is_terminal_node and defined $$setup{'RENDERER'}{'NODE'}) |
1170
|
0 |
0 |
if (defined $filter_sub) |
1178
|
0 |
0 |
unless @children_nodes_to_display |
1185
|
0 |
0 |
if ('CODE' eq $_) |
1191
|
0 |
0 |
if ('SCALAR' eq $_) |
1197
|
0 |
0 |
if ('GLOB' eq $_) |
1203
|
0 |
0 |
if ('REF' eq $_) |
1213
|
0 |
0 |
if (obj $_, 'HASH') |
1214
|
0 |
0 |
unless (%$element) |
1218
|
0 |
0 |
unless ($$setup{'NO_NO_ELEMENTS'}) |
1227
|
0 |
0 |
if (obj $_, 'ARRAY/') |
1228
|
0 |
0 |
unless (@$element) |
1232
|
0 |
0 |
unless ($$setup{'NO_NO_ELEMENTS'}) |
1242
|
0 |
0 |
if wantarray |
1254
|
0 |
0 |
if ($$setup{'DISPLAY_TIE'}) |
1256
|
0 |
0 |
if (obj $element, 'HASH' and my $tie_hash = tied %$element) { } |
|
0 |
0 |
elsif (obj $element, 'ARRAY' and my $tie_array = tied @$element) { } |
|
0 |
0 |
elsif (obj $element, 'SCALAR' and my $tie_scalar = tied $$element) { } |
|
0 |
0 |
elsif (obj $element, 'GLOB' and my $tie_glob = tied *$element) { } |
1281
|
0 |
0 |
if ('' eq $_ or 'HASH' eq $_ or 'ARRAY' eq $_ or 'CODE' eq $_ or 'SCALAR' eq $_ or 'GLOB' eq $_ or 'REF' eq $_) |
1286
|
0 |
0 |
if ($$setup{'DISPLAY_OBJECT_TYPE'}) |
1289
|
0 |
0 |
$class->can('AUTOLOAD') ? : |
1293
|
0 |
0 |
if ($$setup{'DISPLAY_INHERITANCE'}) |
1297
|
0 |
0 |
if ($$setup{'DISPLAY_AUTOLOAD'}) { } |
1302
|
0 |
0 |
if ($has_autoload) { } |
1331
|
0 |
0 |
if '' eq ref $tree |
1335
|
0 |
0 |
if ('HASH' eq $tree_type) |
1337
|
0 |
0 |
if defined $keys |
1341
|
0 |
0 |
if ('ARRAY' eq $tree_type) |
1343
|
0 |
0 |
if defined $keys |
1347
|
0 |
0 |
if 'SCALAR' eq $tree_type |
1348
|
0 |
0 |
if 'REF' eq $tree_type |
1349
|
0 |
0 |
if 'CODE' eq $tree_type |
1357
|
0 |
0 |
if (obj $_, 'HASH') |
1364
|
0 |
0 |
if (obj $_, 'ARRAY') |
1371
|
0 |
0 |
if (obj $_, 'GLOB') |
1378
|
0 |
0 |
if (obj $_, 'SCALAR') |
1405
|
0 |
0 |
if defined $replacement_tree |
1432
|
0 |
0 |
if (exists $types{$reference}) { } |
1440
|
0 |
0 |
if ($element =~ /=HASH/) { } |
|
0 |
0 |
elsif ($element =~ /=ARRAY/) { } |
|
0 |
0 |
elsif ($element =~ /=GLOB/) { } |
|
0 |
0 |
elsif ($element =~ /=SCALAR/) { } |
1470
|
0 |
0 |
if ($$setup{'NUMBER_LEVELS'}) |
1472
|
0 |
0 |
if ('CODE' eq ref $$setup{'NUMBER_LEVELS'}) { } |
1481
|
0 |
0 |
if ($color_levels) |
1483
|
0 |
0 |
if ('ARRAY' eq ref $color_levels) { } |
1524
|
0 |
0 |
if ($colors) |
1526
|
0 |
0 |
if ('ARRAY' eq ref $colors) { } |
1533
|
0 |
0 |
if ('CODE' eq ref $colors) |
1542
|
0 |
0 |
if (not defined $$levels_left[$current_level] or $$levels_left[$current_level] == 0) { } |
1559
|
0 |
0 |
if ($level > 0 or $start_level) |
1561
|
0 |
0 |
if ($colors) |
1563
|
0 |
0 |
if ('ARRAY' eq ref $colors) { } |
1575
|
0 |
0 |
if ($is_last_in_level == 0) { } |