Branch Coverage

blib/lib/Perinci/Sub/Normalize.pm
Criterion Covered Total %
branch 33 46 71.7


line true false branch
23 22 17 if (defined $ver)
24 2 20 unless defined $meta->{'v'} and $meta->{'v'} eq $ver
30 1 62 unless $k =~ /\A(\w+)(?:\.(\w+(?:\.\w+)*))?(?:\((\w+)\))?\z/
34 1 61 if (defined $3) { }
36 0 1 defined $2 ? :
42 5 57 defined $attr ? :
45 5 57 if ($prop =~ /\A_/ or defined $attr and $attr =~ /\A_|\._/)
46 4 1 unless ($opt_rip)
55 4 46 unless ($opt_aup or $prop_proplist)
60 4 0 if ($@)
61 4 0 if $@
66 0 53 unless $opt_aup or $prop_proplist
69 9 44 if ($prop_proplist and $prop_proplist->{'_prop'}) { }
0 44 elsif ($prop_proplist and $prop_proplist->{'_elem_prop'}) { }
10 34 elsif ($prop_proplist and $prop_proplist->{'_value_prop'}) { }
71 0 9 unless ref $meta->{$k} eq "HASH"
83 0 0 unless ref $meta->{$k} eq "ARRAY"
88 0 0 if (ref $_ eq 'HASH') { }
105 0 10 unless ref $meta->{$k} eq "HASH"
110 0 12 unless ref $meta->{$k}{$_} eq "HASH"
116 10 2 $prop eq 'args' ? :
122 8 26 if ($k eq 'schema' and $opt_nss) { }
147 0 18 unless my $sch_proplist = $sch->[1]{'_prop'}