line |
true |
false |
branch |
20
|
2 |
7 |
unless $self->formats and %{$self->formats;} |
24
|
6 |
1 |
unless ($self->formats->{'_'}{'type'}) |
26
|
1 |
9 |
unless $self->formats->{$_}{'type'} |
31
|
1 |
5 |
if (not $self->app) |
47
|
16 |
0 |
if ($format and $format ne '_' and $self->formats->{$format}) |
66
|
16 |
0 |
unless ($$fields{'Content-Type'}) |
68
|
3 |
13 |
if $$format{'charset'} |
73
|
0 |
16 |
if $$format{'language'} and not $$fields{'Content-Language'} |
81
|
11 |
6 |
if (defined $self->parameter) |
84
|
8 |
3 |
$$env{'QUERY_STRING'} =~ /(^|&)$param=([^&]+)/ ? : |
86
|
5 |
6 |
unless ($self->known($format)) |
90
|
7 |
4 |
if ($self->known($format)) |
92
|
5 |
2 |
unless ($$env{'QUERY_STRING'} =~ s/&$param=([^&]+)//) |
99
|
2 |
0 |
if ($self->extension and $req->path =~ /\.([^.]+)$/ and $self->formats->{$1}) |
101
|
2 |
0 |
if $self->extension eq 'strip' |
107
|
8 |
0 |
if (not $self->explicit) |
117
|
1 |
30 |
unless defined $name and $name ne '_' |