| line |
true |
false |
branch |
|
24
|
16 |
89 |
unless defined $path and length $path |
|
26
|
69 |
36 |
unless $self->paths->{$path} |
|
27
|
33 |
40 |
if $action->match($condition) |
|
36
|
23 |
29 |
unless $action->attributes->{'Path'} |
|
|
23 |
29 |
unless my(@register_paths) = @{[] unless $action->attributes->{'Path'};} |
|
55
|
10 |
19 |
unless length $path |
|
60
|
18 |
11 |
unless (@$actions) |
|
65
|
10 |
1 |
if (defined $num_args) { } |
|
68
|
0 |
14 |
unless defined $$actions[$p]->num_args |
|
69
|
10 |
4 |
if $$actions[$p]->num_args <= $num_args |
|
72
|
0 |
10 |
if (not defined $p) { } |
|
86
|
0 |
0 |
unless $self->used |
|
92
|
0 |
0 |
$path eq '/' ? : |
|
94
|
0 |
0 |
if (defined $action->num_args) { } |