| line |
true |
false |
branch |
|
6
|
0 |
16 |
if ($ENV{'WEB_DISPATCH_PARSER_DEBUG'}) |
|
46
|
3 |
143 |
unless length $spec |
|
51
|
0 |
211 |
unless push @match, $self->_parse_spec_section($_) |
|
53
|
3 |
208 |
if (/\G\)/cg) |
|
54
|
0 |
3 |
unless $nested |
|
58
|
135 |
73 |
if pos $_ == length $_ |
|
59
|
0 |
73 |
unless $match[-1] = $self->_parse_spec_combinator($_, $match[-1]) |
|
62
|
1 |
138 |
if (not $close and $nested and pos $_ == length $_) |
|
66
|
74 |
67 |
if @match == 1 |
|
75
|
69 |
4 |
if /\G\+/cg |
|
79
|
4 |
0 |
if /\G\|/cg |
|
82
|
0 |
5 |
unless push @match, $self->_parse_spec_section($_) |
|
84
|
4 |
1 |
if pos $_ == length $_ |
|
85
|
0 |
1 |
unless /\G\|/cg |
|
99
|
2 |
216 |
if /\G~/cg |
|
104
|
25 |
191 |
if /\G([A-Z]+)/cg |
|
109
|
94 |
97 |
if m[\G(?=/)]cg |
|
114
|
5 |
92 |
if /\G\.(\*|\w+)/cg |
|
119
|
4 |
88 |
if /\G\(/cg |
|
124
|
1 |
87 |
if /\G!/cg |
|
128
|
82 |
5 |
if /\G\?/cg |
|
132
|
4 |
1 |
if /\G\%/cg |
|
136
|
1 |
0 |
if /\G\*/cg |
|
150
|
4 |
188 |
if (/\G\.\.\./cg) |
|
155
|
0 |
188 |
unless my($segment) = $self->_url_path_segment_match($_) |
|
158
|
17 |
171 |
if (ref $segment) |
|
160
|
6 |
11 |
if (defined $name) { } |
|
161
|
0 |
6 |
if $seen_nameless |
|
165
|
0 |
11 |
if @names |
|
173
|
4 |
184 |
if (/\G\.\.\./cg) |
|
177
|
2 |
182 |
if /\G\.\*/cg |
|
180
|
3 |
181 |
if $keep_dot |
|
182
|
83 |
9 |
if (@path and not $end and not $keep_dot) |
|
187
|
8 |
86 |
if ($end) { } |
|
188
|
0 |
8 |
@names ? : |
|
190
|
4 |
82 |
@names ? : |
|
200
|
30 |
158 |
if /\G(?:(?=[+|\)])|$)/cg |
|
203
|
141 |
17 |
if /
\G(
(?: # start matching at a space followed by:
[\w\-] # word chars or dashes
| # OR
\. # a period
(?!\.) # not followed by another period
)
+ # then grab as far as possible
)
/cgx |
|
216
|
5 |
12 |
if /\G\*\*(?:(\.\*)?\:(\w+))?/cg |
|
220
|
9 |
3 |
if /\G\*(?:(\.\*)?\:(\w+))?/cg |
|
224
|
3 |
0 |
if /\G\:(\w+)/cg |
|
249
|
17 |
93 |
if (/\G\*/cg) { } |
|
251
|
0 |
17 |
if $is_kw |
|
253
|
0 |
17 |
if ($star) |
|
262
|
0 |
93 |
unless /\G([\w.]*)/cg |
|
269
|
79 |
14 |
/\G\=/cg ? : |
|
274
|
52 |
41 |
$is_kw ? : |