| line |
true |
false |
branch |
|
13
|
0 |
86 |
unless $request and ref $request and $request->can("destination") |
|
18
|
24 |
62 |
unless my(@match_array) = $self->SUPER::match($destination) |
|
31
|
32 |
92 |
if (my $filters = $self->_match_global_filters($filter_type, $request)) |
|
34
|
10 |
22 |
if $filter_type eq "prefilters" |
|
35
|
22 |
10 |
if $filter_type eq "postfilters" |
|
43
|
0 |
124 |
unless $kind eq "prefilters" or $kind eq "postfilters" |
|
47
|
92 |
32 |
unless defined $$self{"global_$kind"} |
|
53
|
3 |
20 |
if not defined $pattern or ref $pattern eq "SCALAR" and $request->destination eq $$pattern or ref $pattern eq "Regexp" and $request->destination =~ /$pattern/u or not ref $pattern and substr($request->destination, 0, length $pattern) eq $pattern |
|
68
|
0 |
11 |
unless ref $self->{'leaves'} eq "ARRAY" and @{$self->{'leaves'}} > 0 |
|
75
|
0 |
44 |
if $self->{'pxf_frozen'} |
|
85
|
0 |
32 |
unless ref $route eq "HASH" or ref $route eq "ARRAY" or not ref $route |
|
89
|
32 |
8 |
unless ref $route eq "HASH" |
|
91
|
3 |
38 |
ref $route->{$key} ? : |
|
92
|
9 |
32 |
$key && uc $key ne 'ANY' ? : |
|
103
|
0 |
8 |
unless $when eq "before" or $when eq "after" |
|
106
|
5 |
3 |
$when eq 'before' ? : |
|
113
|
34 |
10 |
unless $base and length $base |
|
114
|
0 |
10 |
if substr($path, 0, 1) ne "/" |
|
123
|
10 |
34 |
$method ? : |