Branch Coverage

blib/lib/YAML/Old/Dumper.pm
Criterion Covered Total %
branch 153 170 90.0


line true false branch
49 4 153 if (not $self->use_header and $self->document == 1)
52 1 3 unless ref($node) =~ /^(HASH|ARRAY)$/
54 1 2 if ref $node eq 'HASH' and keys %$node == 0
56 1 1 if ref $node eq 'ARRAY' and @$node == 0
64 0 153 if ($self->use_version)
78 4 1479 if ($type eq 'GLOB')
86 5 1474 if (ref $_[0] eq 'Regexp')
92 949 525 unless (ref $_[0])
93 0 949 if $self->purity
102 2 523 if ref $value and not $type
105 11 512 if ($self->transferred->{$node_id})
108 9 2 ref $self->transferred->{$node_id} ? :
114 7 505 if ($type eq 'CODE')
128 34 471 if (defined $class)
129 5 29 if ($value->can('yaml_dump')) { }
7 22 elsif ($type eq 'SCALAR') { }
150 4 494 if (defined 'YAML::Old'->global_object->{'blessed_map'}{$node_id})
159 31 463 if ($type eq 'REF' or $type eq 'SCALAR') { }
2 461 elsif ($type eq 'GLOB') { }
180 3 489 if ++$self->{'id_refcnt'}{$node_id} > 1
183 429 60 if ($type eq 'HASH') { }
60 0 elsif ($type eq 'ARRAY') { }
215 521 955 if ($ref) { }
216 5 516 if ($ref eq 'Regexp')
231 93 1378 if (defined $self->transferred->{$node_id}) { }
5 1373 elsif ($ynode = ynode($value)) { }
234 77 16 if (ref $value) { }
235 77 0 defined $ynode ? :
241 16 0 defined $ynode ? :
254 1466 5 if ($self->use_aliases)
256 20 1446 if ($self->{'id_refcnt'}{$node_id} > 1)
257 11 9 if (defined $self->{'id_anchor'}{$node_id})
267 2 1458 if ref $value and not $type
269 14 1444 if $type eq 'SCALAR' and $tag
271 951 493 if $type eq 'SCALAR'
273 433 60 if $type eq 'HASH'
275 60 0 if $type eq 'ARRAY'
285 61 372 if $tag
289 0 433 if $@
290 8 425 if $empty_hash
294 20 405 if ($context == 5 and $self->compress_series and not defined $self->{'id_anchor'}{$node_id} || $tag || $empty_hash) { }
303 405 0 unless $self->headless and not $self->headless(0)
311 424 1 if ($self->sort_keys == 1) { }
0 1 elsif ($self->sort_keys == 2) { }
1 0 elsif (ref $self->sort_keys eq 'ARRAY') { }
312 65 359 if (ynode($value)) { }
328 2 0 defined $order{$a} && defined $order{$b} ? :
336 36 389 if (exists $$value{&VALUE})
338 36 0 if ($keys[$i] eq &VALUE)
359 7 53 if $tag
361 4 56 if @$value == 0
363 55 1 unless $self->headless and not $self->headless(0)
367 2 2 if ($self->inline_series and @$value <= $self->inline_series and not scalar grep({/\n/ unless ref $_;} @$value))
369 5 3 unless ref $_
375 2 3 if $i == $#{$value;}
397 1169 20 unless $context == 5
426 1194 972 $type == 3 ? :
427 1194 972 $type == 3 ? :
428 1194 972 $type == 3 ? :
432 4 2162 unless defined $_[0]
436 37 2125 if $_[0] eq "\aYAML\aVALUE\a"
438 1 2124 if $_[0] =~ /$ESCAPE_CHAR/
442 26 2098 if ($_[0] =~ /\n/)
443 1 25 if $self->use_block
447 0 25 if $self->use_fold
449 6 19 if length $_[0] <= 30
453 2 17 unless $_[0] =~ /\n\s*\S/
461 61 2037 if $self->is_literal_number($_[0])
465 1989 48 if $self->is_valid_plain($_[0])
469 1 47 if $_[0] =~ /'/
499 6 2031 unless length $_[0]
500 6 2025 if $self->quote_numeric_strings and &Scalar::Util::looks_like_number($_[0])
502 17 2008 if $_[0] =~ /^[\s\{\[\~\`\'\"\!\@\#\>\|\%\&\?\*\^]/
503 9 1999 if $_[0] =~ /[\{\[\]\},]/
504 4 1995 if $_[0] =~ /[:\-\?]\s/
505 1 1994 if $_[0] =~ /\s#/
506 0 1994 if $_[0] =~ /\:(\s|$)/
507 4 1990 if $_[0] =~ /[\s\|\>]$/
508 1 1989 if $_[0] eq '-'
517 1 9 length $1 > 1 ? :
10 8 length $1 ? :
518 0 18 unless defined $value
520 0 18 if $value =~ /^\s/
527 2050 4 defined $_[0] ? :
553 0 18 unless length $text