line |
true |
false |
branch |
81
|
0 |
1 |
$ENV{'PLACK_SSI_TRACE'} ? : |
111
|
1 |
0 |
if ($content_type =~ m[^text/] or $content_type =~ m[^application/xh?t?ml\b]) |
148
|
6 |
15 |
unless (defined $chunk) |
149
|
5 |
1 |
if delete $$ssi_variables{$BUF} |
158
|
25 |
6 |
unless $$ssi_variables{$SKIP} |
159
|
31 |
0 |
$is_complete ? : |
163
|
0 |
31 |
unless $is_complete |
165
|
31 |
0 |
$expression =~ s/^(\w+)// ? : |
166
|
30 |
1 |
$self->can($method) ? : |
170
|
25 |
6 |
unless $$ssi_variables{$SKIP} |
173
|
15 |
0 |
unless ($do_keep_buffer) |
174
|
13 |
2 |
length $$out ? : |
|
15 |
0 |
unless $$ssi_variables{$SKIP} |
187
|
5 |
0 |
$expression =~ /var="([^"]+)"/ ? : |
188
|
5 |
0 |
$expression =~ /value="([^"]*)"/ ? : |
190
|
5 |
0 |
if (defined $name) { } |
202
|
7 |
0 |
$expression =~ /var="([^"]+)"/ ? : |
204
|
7 |
0 |
if (defined $name) |
214
|
2 |
0 |
$expression =~ /(\w+)="([^"]*)"/ ? : |
216
|
2 |
0 |
if (defined $key) |
225
|
1 |
0 |
$expression =~ /cmd="([^"]+)"/ ? : |
227
|
1 |
0 |
if (defined $cmd) |
237
|
0 |
1 |
unless my $file = $self->_expression_to_file($expression) |
244
|
0 |
1 |
unless my $file = $self->_expression_to_file($expression) |
252
|
0 |
1 |
unless my $file = $self->_expression_to_file($expression) |
276
|
9 |
0 |
$expression =~ /expr="([^"]+)"/ ? : |
278
|
0 |
9 |
unless (defined $condition) |
283
|
3 |
6 |
if (defined $$ssi_variables{$SKIP} and $$ssi_variables{$SKIP} != 1) { } |
|
3 |
3 |
elsif ($ANON->__eval_condition($condition, $ssi_variables)) { } |
305
|
2 |
1 |
if ($expression =~ /file="([^"]+)"/) { } |
|
1 |
0 |
elsif ($expression =~ /virtual="([^"]+)"/) { } |
307
|
2 |
0 |
if (open my $FH, '<', $file) |
316
|
1 |
0 |
unless defined $request->uri->scheme |
317
|
1 |
0 |
unless defined $request->uri->host |
320
|
1 |
0 |
if ($response->code == 200) |
336
|
1 |
2 |
unless defined $tmp |
363
|
14 |
1 |
if ($expression =~ /\$/) |
371
|
5 |
9 |
if (my $mtime = $$ssi_variables{'LAST_MODIFIED_TS'}) |
376
|
14 |
221 |
if $key eq '__eval_condition' |
380
|
0 |
253 |
if $key eq '__eval_condition' |
387
|
11 |
4 |
if (my $res = eval $expression) |
390
|
0 |
4 |
if ($@) |