Branch Coverage

blib/lib/Sub/Curried.pm
Criterion Covered Total %
branch 18 20 90.0


line true false branch
180 0 10 if ($^V lt v5.16.0) { }
202 0 17 unless ($$text =~ s/\A (? $nspace (?$ident))? (? $ospace \( (? $param (?: $ospace , $param)* )? $ospace \) )? (? $ospace ) \{ $ppr /injection(%+);/ex)
217 15 2 if (defined $esc_name)
219 15 2 defined $match{'name'} ? :
222 15 2 if (defined $esc_curried_name)
223 15 2 defined $curried_name ? :
227 15 2 defined $match{'params'} ? :
252 15 2 defined $esc_name ? :
2 15 @params == 0 ? :
253 1 29 $params[$_] =~ /^([\%\@])/ ? :