| line |
true |
false |
branch |
|
44
|
1 |
4 |
if ($c =~ s/=\z//) |
|
48
|
0 |
1 |
if exists $clset0->{$c} |
|
56
|
1 |
4 |
if (not $expr and $c =~ s/\A!(?=.)//) { } |
|
|
1 |
3 |
elsif (not $expr and $c =~ s/(?<=.)\|\z//) { } |
|
|
1 |
2 |
elsif (not $expr and $c =~ s/(?<=.)\&\z//) { } |
|
|
1 |
1 |
elsif (not $expr and $c =~ /\A([^.]+)(?:\.(.+))?\((\w+)\)\z/) { } |
|
|
0 |
1 |
elsif (not $c =~ /$clause_re/ || $c =~ /$clause_attr_on_empty_clause_re/) { } |
|
57
|
0 |
1 |
unless $c =~ /$clause_name_re/ |
|
61
|
0 |
1 |
unless $c =~ /$clause_name_re/ |
|
65
|
0 |
1 |
unless $c =~ /$clause_name_re/ |
|
70
|
0 |
1 |
unless $c2 =~ /$clause_name_re/ and !defined($a) || $a =~ /$attr_re/ |
|
74
|
0 |
1 |
defined $a ? : |
|
82
|
1 |
4 |
if ($sc eq '!') { } |
|
|
1 |
3 |
elsif ($sc eq '&') { } |
|
|
1 |
2 |
elsif ($sc eq '|') { } |
|
|
1 |
1 |
elsif ($sc eq '(LANG)') { } |
|
84
|
0 |
1 |
if exists $clset0->{$c} |
|
86
|
0 |
1 |
if exists $$clset0{"$c|"} |
|
88
|
0 |
1 |
if exists $$clset0{"$c&"} |
|
93
|
0 |
1 |
if exists $clset0->{$c} |
|
95
|
0 |
1 |
if exists $$clset0{"$c|"} |
|
96
|
0 |
1 |
unless ref $v eq 'ARRAY' |
|
102
|
0 |
1 |
if exists $clset0->{$c} |
|
103
|
0 |
1 |
unless ref $v eq 'ARRAY' |
|
109
|
0 |
1 |
if exists $clset0->{$cn} |
|
116
|
0 |
1 |
if $opts->{'has_req'} |
|
137
|
0 |
2 |
if (not defined $s) { } |
|
|
2 |
0 |
elsif (not $ref) { } |
|
|
0 |
0 |
elsif ($ref eq 'ARRAY') { } |
|
144
|
0 |
2 |
unless $s =~ /$type_re/ |
|
146
|
1 |
1 |
$has_req ? : |
|
152
|
0 |
0 |
if (not defined $t) { } |
|
|
0 |
0 |
elsif (ref $t) { } |
|
157
|
0 |
0 |
unless $t =~ /$type_re/ |
|
162
|
0 |
0 |
if (defined $s->[1]) { } |
|
163
|
0 |
0 |
if (ref $s->[1] eq 'HASH') { } |
|
166
|
0 |
0 |
if @$s > 3 |
|
170
|
0 |
0 |
unless @$s % 2 |
|
181
|
0 |
0 |
if (defined $extras) { } |
|
182
|
0 |
0 |
unless ref $extras eq 'HASH' |
|
185
|
0 |
0 |
if exists $extras->{'def'} and ref $extras->{'def'} ne 'HASH' |