Condition Coverage

blib/lib/Data/Reach.pm
Criterion Covered Total %
condition 56 66 84.8


and 3 conditions

line !l l&&!r l&&r condition
78 6 3 32 overload::Method($obj, "\@{}") and $key =~ /^-?\d+$/u
108 114 1 9 $recurse eq "ARRAY" and @$tree || $ignore_empty_subtrees
95 20 0 $recurse eq "HASH" and (my(@k) = sort(keys %$tree)) || $ignore_empty_subtrees
126 1 0 2 $use_overloads && overload::Method($tree, '@{}')
1 0 0 $use_overloads && overload::Method($tree, '%{}')
163 3 0 1 $paths_method && $tree->can($paths_method)
1 0 2 $use_overloads && overload::Method($tree, '@{}')
1 0 0 $use_overloads && overload::Method($tree, '%{}')
171 4 0 31 $recurse && $recurse =~ /^(OBJECT|HASH|ARRAY)$/u && $max_depth
179 27 2 2 not @paths and $keep_empty_subtrees
188 0 29 116 not $is_consumed and @paths

or 2 conditions

line l !l condition
38 203 3 &reftype($data) || ''
67 5 47 $hint_hash->{'Data::Reach/use_overloads'} // 1
68 8 44 $hint_hash->{'Data::Reach/peek_blessed'} // 1
71 9 43 $hint_hash->{'Data::Reach/reach_method'} || ''
100 118 6 $max_depth //= -1
101 118 6 $path //= []
102 36 86 &reftype($tree) // ""
124 1 2 $hint_hash->{'Data::Reach/use_overloads'} // 1
125 2 1 $hint_hash->{'Data::Reach/peek_blessed'} // 1
150 116 6 $max_depth //= -1
152 4 118 $hint_hash->{'Data::Reach/use_overloads'} // 1
153 6 116 $hint_hash->{'Data::Reach/peek_blessed'} // 1

or 3 conditions

line l !l&&r !l&&!r condition
102 2 36 86 $recurse //= &reftype($tree) // ""
108 8 1 1 @$tree || $ignore_empty_subtrees
18 1 1 (my(@k) = sort(keys %$tree)) || $ignore_empty_subtrees