Branch Coverage

blib/lib/Dancer2/Core/Request.pm
Criterion Covered Total %
branch 118 142 83.1


line true false branch
65 0 783 unless @args % 2 == 0
73 85 698 if (my $s = $opts{'serializer'})
74 1 84 unless $s->$Dancer2::Core::Request::_does("Dancer2::Core::Role::Serializer")
87 53 729 if $opts{'body_params'}
104 8 4 @_ == 2 ? :
148 310 23 unless $_[0]{'is_behind_proxy'}
153 3 157 if ($self->is_behind_proxy and exists $self->env->{'HTTP_X_FORWARDED_HOST'}) { }
171 7 6 unless $_[0]->env->{'HTTP_X_FORWARDED_PROTO'} or $_[0]->env->{'HTTP_X_FORWARDED_PROTOCOL'}
176 14 158 $self->is_behind_proxy ? :
191 7 775 if ($self->content_type and $self->content_type =~ m[^multipart/form-data]i)
199 692 83 unless my $serializer = $self->serializer
206 52 31 unless grep {$self->method eq $_;} "PUT", "POST", "PATCH", "DELETE"
211 1 30 unless $body and length $body > 0
230 29 1 unless $self->serializer->has_request
232 3 27 if $serializer_fail
241 25 2 is_hashref($data) ? :
295 110 7 if ($uri->path eq "/")
324 15 13 if $params
328 3 25 $dont_escape ? :
334 0 0 unless is_coderef($self->{'uri_for_route'})
343 31 234 if wantarray and @_ == 1
344 218 16 if @_ == 1
346 5 11 if ($source eq 'query') { }
10 1 elsif ($source eq 'body') { }
347 0 0 unless $self->_query_params
0 5 if wantarray
351 0 0 unless $self->_body_params
0 10 if wantarray
354 1 0 if ($source eq 'route') { }
355 0 1 if wantarray
366 43 4 if ($XS_PARSE_QUERY_STRING) { }
376 2 8 if (is_arrayref($query->{$key})) { }
412 0 3 if ($type)
426 1 1 unless +(shift())->params->{'captures'}
428 1 30 unless +(shift())->params->{'splat'}
435 43 24280 unless defined $h
437 21570 2710 if (not is_ref($h) || utf8::is_utf8($h)) { }
702 2008 elsif (ref $h eq 'Hash::MultiValue') { }
1918 90 elsif (is_hashref($h)) { }
80 10 elsif (is_arrayref($h)) { }
459 0 23176 if utf8::is_utf8($bytes)
460 23147 29 unless $bytes =~ /[\x80-\xFF]/
462 27 2 if __valid($bytes)
472 1 1 if $strict
475 0 1 if (my $logger = $self->env->{'psgix.logger'}) { }
490 0 0 unless defined $self->headers
491 0 0 unless defined $self->header("X-Requested-With")
492 0 0 if $self->header("X-Requested-With") ne "XMLHttpRequest"
502 12 9 unless wantarray
503 3 6 unless defined $res
504 3 3 is_arrayref($res) ? :
512 48 567 $self->_has_params ? :
519 1917 543 is_hashref($_) ? :
530 32 32 if $XS_URL_DECODE
539 43 572 if defined $self->{'_query_params'}
544 541 31 if not defined $source or $source eq ""
546 21 10 if ($XS_PARSE_QUERY_STRING)
555 0 32 unless defined $key
556 32 0 defined $val ? :
561 6 26 if (exists $query_params->{$key}) { }
563 2 4 if (is_arrayref($prev_val)) { }
598 6 9 @uploads > 1 ? :
602 6 9 @filenames > 1 ? :
617 457 64 unless defined $http_cookie
619 63 1 if ($XS_HTTP_COOKIES) { }
629 2 65 is_arrayref($value) ? :
644 0 53 unless $options
653 38 15 unless $self->{'_query_params'}
656 44 9 unless $params
692 1 1 if $self->serializer
694 0 1 if keys %{$$self{"_body_params"};}