| line |
true |
false |
branch |
|
35
|
20 |
30 |
if @{$$condition{'args'};} |
|
40
|
16 |
14 |
unless $chain |
|
51
|
16 |
31 |
unless $self->chain_from->{$parent} |
|
|
16 |
31 |
unless my(@chains) = @{[] unless $self->chain_from->{$parent};} |
|
58
|
77 |
3 |
if (length $pathpart) |
|
60
|
0 |
77 |
if @p > @parts |
|
63
|
36 |
41 |
unless $pathpart eq join('/', @stripped) |
|
66
|
17 |
27 |
if (defined $action->attributes->{'CaptureArgs'}[0]) { } |
|
68
|
0 |
17 |
if @parts < $capture_args |
|
73
|
0 |
17 |
unless $actions |
|
78
|
13 |
14 |
unless $action->match({%$condition, 'args', \@parts}) |
|
87
|
34 |
18 |
unless $action->attributes->{'Chained'} |
|
|
34 |
18 |
unless my(@chained) = @{[] unless $action->attributes->{'Chained'};} |
|
91
|
18 |
0 |
if ($parent) { } |
|
92
|
0 |
18 |
unless ($parent =~ m[^/]) |
|
102
|
1 |
17 |
unless $action->attributes->{'PathPart'} |
|
104
|
15 |
3 |
defined $pathpart[0] ? : |
|
116
|
12 |
122 |
if (defined $action->attributes->{'CaptureArgs'}[0]) { } |
|
|
97 |
25 |
elsif (defined $action->num_args) { } |
|
127
|
14 |
4 |
unless $action->attributes->{'CaptureArgs'} |
|
139
|
0 |
0 |
unless $self->used |
|
145
|
0 |
0 |
defined $endpoint->num_args ? : |
|
153
|
0 |
0 |
if (my $cap = $cur->attributes->{'CaptureArgs'}) |
|
154
|
0 |
0 |
if $$cap[0] |
|
156
|
0 |
0 |
if (my $pp = $cur->attributes->{'PathPart'}) |
|
157
|
0 |
0 |
if defined $$pp[0] and length $$pp[0] |
|
163
|
0 |
0 |
if $cur |
|
166
|
0 |
0 |
if ($parent ne '/') |
|
174
|
0 |
0 |
$parent->reverse eq $parents[0]->reverse ? : |
|
178
|
0 |
0 |
if (my $cap = $parent->attributes->{'CaptureArgs'}) |
|
184
|
0 |
0 |
@r ? : |
|
190
|
0 |
0 |
if (@unattached) |