| blib/lib/Perinci/Sub/Normalize.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 38 | 47 | 80.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 16 | 0 | 0 | defined $slurpy_pos and $slurpy_pos < @pos |
| 45 | 13 | 0 | 0 | $meta->{'args_as'} and $meta->{'args_as'} =~ /\Aarray(ref)?\z/ |
| 63 | 2 | 0 | 29 | defined $meta->{'v'} and $meta->{'v'} eq $ver |
| 84 | 99 | 2 | 1 | defined $attr and $attr =~ /\A_|\._/ |
| 108 | 2 | 86 | 9 | $prop_proplist and $prop_proplist->{'_prop'} |
| 2 | 86 | 0 | $prop_proplist and $prop_proplist->{'_elem_prop'} | |
| 2 | 86 | 0 | $prop_proplist and $prop_proplist->{'_value_prop'} | |
| 161 | 46 | 3 | 20 | $k eq "schema" and $opt_nss |
| line | l | !l | condition |
|---|---|---|---|
| 176 | 4 | 23 | $opts //= {} |
| 178 | 2 | 25 | $opts->{'allow_unknown_properties'} //= 0 |
| 179 | 1 | 26 | $opts->{'normalize_sah_schemas'} //= 1 |
| 180 | 1 | 26 | $opts->{'remove_internal_properties'} //= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 33 | 2 | 1 | 13 | $argspec->{'slurpy'} or $argspec->{'greedy'} |
| 84 | 4 | 18 | 84 | $prop =~ /\A_/ or defined $attr and $attr =~ /\A_|\._/ |
| 94 | 7 | 90 | 4 | $opt_aup or $prop_proplist |
| 95 | 0 | 2 | 2 | $modprefix //= $prefix |
| 105 | 7 | 90 | 0 | $opt_aup or $prop_proplist |