Branch Coverage

blib/lib/Compress/BraceExpansion.pm
Criterion Covered Total %
branch 63 76 82.8


line true false branch
25 54 13 if ($arg_ref and ref $arg_ref eq 'HASH') { }
13 0 elsif ($arg_ref and ref $arg_ref eq 'ARRAY') { }
0 0 elsif (@strings) { }
52 0 24 unless ($strings_of{ident $self})
57 0 24 if ($debug_of{ident $self})
65 0 24 if ($debug_of{ident $self})
78 0 24 if ($debug_of{ident $self})
103 283 126 unless $$pointer{$character}
105 86 323 if ($character_count == length($text) - 1)
119 2 486 unless ref $tree_h eq 'HASH'
122 0 486 if @nodes == 0
125 449 37 if (@nodes == 1) { }
37 0 elsif (@nodes > 1) { }
126 23 426 if ($nodes[0] eq 'POINTER') { }
130 125 301 if ($node eq 'end') { }
136 292 9 if (defined $lbuffer)
146 0 83 if $node eq 'POINTERS'
147 0 83 if ($node eq 'POINTER') { }
2 81 elsif ($node eq 'end') { }
160 10 27 if ($pointer and $pointers_of{ident $self}{$pointer})
167 359 104 if (wantarray)
184 47 137 unless ($root)
187 152 32 if (@nodes == 1) { }
32 0 elsif (@nodes > 1) { }
188 15 137 if $nodes[0] eq 'end'
194 12 47 unless $text
201 15 5 if (defined $depth)
210 124 33 if (wantarray)
235 14 27 if ($depth > 1) { }
238 0 14 if $next_node eq 'end'
239 6 8 if ($depth > 2)
243 2 9 if $next_node eq 'end'
256 1 38 if ($child_node_name eq 'end')
260 18 20 unless ($pruned)
288 2 192 unless length $string eq $base_length
292 30 49 if (_check_array_values_equal(@ends))
306 49 121 unless $array eq $base
324 8 8 if (keys %{$pointers_of{ident $self};})