line |
true |
false |
branch |
21
|
2 |
7 |
unless $self->formats and %{$self->formats;} |
25
|
6 |
1 |
unless ($self->formats->{'_'}{'type'}) |
27
|
1 |
9 |
unless $self->formats->{$_}{'type'} |
32
|
1 |
5 |
if (not $self->app) |
48
|
16 |
0 |
if ($format and $format ne '_' and $self->known($format)) |
66
|
16 |
0 |
unless (Plack::Util::header_exists($headers, 'Content-Type')) |
68
|
3 |
13 |
if $$format{'charset'} |
73
|
16 |
0 |
unless (Plack::Util::header_exists($headers, 'Content-Language')) |
74
|
3 |
13 |
if $$format{'language'} |
86
|
11 |
6 |
if (defined $self->parameter) |
89
|
8 |
3 |
$$env{'QUERY_STRING'} =~ /(^|&)$param=([^&]+)/ ? : |
91
|
5 |
6 |
unless ($self->known($format)) |
95
|
7 |
4 |
if ($self->known($format)) |
97
|
5 |
2 |
unless ($$env{'QUERY_STRING'} =~ s/&$param=([^&]+)//) |
104
|
2 |
0 |
if ($self->extension and $req->path =~ /\.([^.]+)$/ and $self->known($1)) |
106
|
2 |
0 |
if $self->extension eq 'strip' |
112
|
8 |
0 |
if (not $self->explicit) |
122
|
1 |
30 |
unless defined $name and $name ne '_' |