| line |
true |
false |
branch |
|
59
|
1 |
102 |
ref $arg ? : |
|
61
|
0 |
103 |
unless (s/^\[//) |
|
65
|
15 |
88 |
if s/^\^// |
|
70
|
231 |
490 |
if (s/^\s+//) |
|
75
|
34 |
456 |
if (s/^\[ (?! \: [^\[\]]+ \:\] )//x) |
|
76
|
1 |
33 |
if ($$cur{'op'} eq '&' and not $$cur{'follow'}) |
|
84
|
7 |
27 |
if s/^\^// |
|
89
|
137 |
319 |
if (s/^\]//) |
|
90
|
0 |
137 |
unless ($$cur{'childs'} and @{$$cur{'childs'};}) |
|
94
|
15 |
122 |
if ($$cur{'op'} eq '&' and not $$cur{'follow'}) |
|
99
|
103 |
34 |
unless $$cur{'parent'} |
|
101
|
0 |
34 |
if ($$cur{'follow'}) |
|
108
|
7 |
27 |
if $$cur{'follow'} |
|
113
|
77 |
242 |
if (s/^([\&\|\-])(?=[\s\[\]])//) |
|
116
|
0 |
77 |
unless ($$cur{'childs'} and @{$$cur{'childs'};}) |
|
120
|
0 |
77 |
if ($$cur{'follow'}) |
|
126
|
10 |
67 |
if ($$cur{'op'} eq $o) |
|
132
|
4 |
63 |
if ($$cur{'op'} eq '&' and not $$cur{'follow'}) |
|
139
|
21 |
46 |
if ($o eq '&') |
|
152
|
41 |
5 |
if ($o eq '-') |
|
153
|
3 |
38 |
if (@{$$cur{'childs'};} > 1) |
|
165
|
5 |
0 |
if ($o eq '|') |
|
172
|
242 |
0 |
if (s/^((?:
\\[pPN]\{ [^{}]* \}
| \\c?(?s:.)
| [^\s\[\]]
| \[\: [^\[\]]+ \:\]
)+)//x) |
|
181
|
0 |
242 |
if ($lit eq '^') |
|
185
|
1 |
241 |
if ($$cur{'op'} eq '&' and not $$cur{'follow'}) |
|
191
|
24 |
218 |
if $$cur{'follow'} |
|
194
|
45 |
197 |
if (@$kid and not ref $$kid[-1] and not $lit =~ /^[\-\^]/ and not $$kid[-1] =~ /^\[\^/ and not $$kid[-1] =~ /\-\]\z/ and $$cur{'op'} ne '&' and not $$cur{'op'} eq '-' && @$kid == 1) { } |
|
222
|
197 |
58 |
unless ref $_ |
|
223
|
0 |
58 |
if ref $_ ne 'HASH' |
|
230
|
21 |
140 |
if ($op eq '&') { } |
|
|
41 |
99 |
elsif ($op eq '-') { } |
|
241
|
25 |
74 |
@$kids > 1 ? : |
|
243
|
22 |
139 |
$$list{'neg'} ? : |