| line |
true |
false |
branch |
|
29
|
15 |
0 |
defined $path ? : |
|
61
|
0 |
876 |
unless &Scalar::Util::blessed($req) and $req->can('path') |
|
64
|
0 |
876 |
unless defined $path |
|
68
|
539 |
337 |
if ($self->variables) { } |
|
70
|
269 |
270 |
unless $size == $self->parts |
|
71
|
201 |
69 |
unless (%captures) = $self->extract($path) |
|
72
|
4 |
65 |
unless $self->_is_valid_variables(\%captures) |
|
75
|
273 |
64 |
unless $path eq $self->path |
|
79
|
41 |
88 |
unless $self->_is_valid_request($req) |
|
83
|
0 |
162 |
if exists $params{$key} |
|
98
|
4 |
80 |
unless $self->_validate($$vars{$name}, $self->conditions->{$name}) |
|
113
|
0 |
100 |
unless my $code = $req->can($name) |
|
116
|
100 |
0 |
if ($name eq 'method') |
|
117
|
0 |
100 |
if $value eq 'HEAD' |
|
120
|
41 |
59 |
unless $self->_validate($value, $self->conditions->{$name}) |
|
129
|
0 |
190 |
unless defined $input |
|
130
|
76 |
114 |
unless defined $expected |
|
132
|
15 |
99 |
if ref $expected eq 'Regexp' |
|
133
|
1 |
98 |
if ref $expected eq 'ARRAY' |
|
140
|
1 |
4 |
unless $args |
|
141
|
1 |
5 |
unless $self->_validate($$args{$name}, $self->conditions->{$name}) |