Branch Coverage

blib/lib/Leyland/Negotiator.pm
Criterion Covered Total %
branch 0 58 0.0


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