Condition Coverage

blib/lib/Data/Selector.pm
Criterion Covered Total %
condition 39 50 78.0


and 3 conditions

line !l l&&!r l&&r condition
240 0 0 97 defined $args->{'selector_string'} and length $args->{'selector_string'}
247 0 0 6 defined $args->{'named_selectors'}{$1} && length $args->{'named_selectors'}{$1}
257 0 97 0 length $args->{'selector_string'} and not $args->{'selector_string'} =~ /[^.\[\],]/o
294 342 149 2 $opening_bracket_pos > -1 and $dot_in_prefix_pos > $opening_bracket_pos
304 18 0 0 $opening_bracket_pos > -1 and $dot_in_prefix_pos > $opening_bracket_pos
329 31 43 369 $first_char ne '+' and $first_char ne '-'
341 224 214 55 not length $string || $prev_is_suffix and @{$token->[2];}
437 17 27 105 not $has_includes and index($_->[0], '+') == 0
444 2 2 10 $2 < 0 && $2 >= -@{$data_tree;}
450 98 37 14 $data_tree_type eq 'ARRAY' and index($_->[0], '..') != -1
523 51 23 64 ref $data_sub_tree and grep {$_ ne '_order_';} keys %{$selector_sub_tree;}
529 25 96 9 $has_includes and not %matched_includes

or 2 conditions

line l !l condition
423 0 130 $selector_trees_keys{$selector_tree} ||= [map({my $selector_tree_key_base = substr($_, 1); [$_, $selector_tree_key_base, index($selector_tree_key_base, '*') != -1 ? do { my $pattern = quotemeta $selector_tree_key_base; $pattern =~ s/\\\*/.*/go; $pattern } : undef, undef, undef, $selector_tree];} (sort {$selector_tree->{$a}{'_order_'} <=> $selector_tree->{$b}{'_order_'};} grep({$_ ne '_order_';} keys %{$selector_tree;})))]

or 3 conditions

line l !l&&r !l&&!r condition
341 223 1 269 length $string || $prev_is_suffix
347 0 1 277 $is_suffix || $prev_is_suffix
439 12 8 129 index($_->[0], '+-') == 0 or index($_->[0], '--') == 0
470 12 0 181 $_->[4] // $_->[0]