line |
true |
false |
branch |
78
|
0 |
0 |
unless 'Leyland::Negotiator'->_negotiate_charset($c) |
89
|
0 |
0 |
unless scalar @$routes |
98
|
0 |
0 |
unless scalar @$routes |
106
|
0 |
0 |
unless scalar @$routes |
114
|
0 |
0 |
unless scalar @$routes |
132
|
0 |
0 |
unless scalar @$routes |
156
|
0 |
0 |
if $meth eq 'del' |
171
|
0 |
0 |
if ($$args{'method'}) { } |
189
|
0 |
0 |
unless $suffix |
205
|
0 |
0 |
unless $app_routes->EXISTS($pref_name) |
209
|
0 |
0 |
unless $pref_routes |
214
|
0 |
0 |
unless my(@captures) = $$_{'route'} =~ /$r/ |
216
|
0 |
0 |
if scalar @captures == 1 and $captures[0] eq '1' |
221
|
0 |
0 |
unless $a eq 'any' |
223
|
0 |
0 |
unless $$route_meths{$m}{'rules'}{'is'} |
224
|
0 |
0 |
if $rule eq 'internal' and not $internal |
239
|
0 |
0 |
unless $class->method_name($$_{'method'}) eq $method |
245
|
0 |
0 |
unless my $ct = $c->content_type |
251
|
0 |
0 |
if ($ct =~ /^([^;]+)/) |
259
|
0 |
0 |
unless (exists $$_{'rules'}{'accepts'}) |
266
|
0 |
0 |
if ($accept eq $ct) |
290
|
0 |
0 |
if ($$_{'rules'}{'returns_all'}) |
298
|
0 |
0 |
exists $$_{'rules'}{'returns'} ? : |
302
|
0 |
0 |
if (@{$c->wanted_mimes;}) { } |
310
|
0 |
0 |
if ($$want{'mime'} eq '*/*' and $$want{'q'} > 0) |
318
|
0 |
0 |
if ($$want{'mime'} eq $have) |
339
|
0 |
0 |
if ($c->header('Accept-Charset')) |
343
|
0 |
0 |
unless defined $pref |
344
|
0 |
0 |
if $charset =~ /utf-?8/i and $pref == 0 |