Branch Coverage

blib/lib/Catmandu/Path/simple.pm
Criterion Covered Total %
branch 47 60 78.3


line true false branch
19 626 0 if (is_value($path))
25 0 0 if (is_array_ref($path))
53 71 0 @_ == 1 ? :
67 10 61 if (is_code_ref($opts{'value'})) { }
61 0 elsif (exists $opts{'value'}) { }
199 444 437 unless @$path
210 8 429 if (is_natural($key)) { }
37 392 elsif ($key eq '*') { }
234 1 391 if ($key eq '$first') { }
1 390 elsif ($key eq '$last') { }
261 0 71 unless defined $key
266 0 71 if (is_natural($key)) { }
0 71 elsif ($key eq '$first') { }
0 71 elsif ($key eq '$last') { }
0 71 elsif ($key eq '$prepend') { }
0 71 elsif ($key eq '$append') { }
0 71 elsif ($key eq '*') { }
312 200 263 unless @$path
318 9 254 if (is_natural($key)) { }
1 253 elsif ($key eq '*') { }
344 26 227 if ($key eq '$first' or $key eq '$last' or $key eq '$prepend' or $key eq '$append') { }
351 1 25 if ($key eq '$first') { }
1 24 elsif ($key eq '$last') { }
2 22 elsif ($key eq '$prepend') { }
22 0 elsif ($key eq '$append') { }
395 7 33 if (is_natural($key)) { }
3 30 elsif ($key eq '$first' or $key eq '$last' or $key eq '*') { }
403 1 2 if $key eq "\$first"
404 1 2 if $key eq "\$last"
405 1 2 if $key eq "*"