| line |
true |
false |
branch |
|
84
|
0 |
0 |
unless open my $cont, '<', $file |
|
97
|
0 |
0 |
if ($folder) { } |
|
114
|
0 |
0 |
if (not -e "$folder") |
|
115
|
0 |
0 |
unless mkdir $folder |
|
123
|
0 |
0 |
if ($$hash1{$key}) { } |
|
124
|
0 |
0 |
if (not ref $$hash1{$key}) { } |
|
139
|
0 |
0 |
unless defined $body |
|
140
|
0 |
0 |
if (not ref $body) { } |
|
|
0 |
0 |
elsif (ref $body eq 'GLOB') { } |
|
159
|
8 |
0 |
if ($namespace) |
|
160
|
6 |
2 |
unless ($class =~ s/^\+//) |
|
169
|
4 |
4 |
if ($require) |
|
170
|
4 |
0 |
unless ($$INC{$package}) |
|
172
|
0 |
4 |
if ($@) |
|
182
|
0 |
0 |
if ($$env{'http.version'} and $$env{'http.version'} == 1) |
|
220
|
0 |
0 |
unless $num |
|
222
|
0 |
0 |
if ($$types{$type}) { } |
|
236
|
0 |
0 |
if $CRLF |
|
237
|
0 |
0 |
unless ($$self{'app.crlf'}) |
|
239
|
0 |
0 |
$OS =~ /VMS/i ? : |
|
284
|
0 |
0 |
if (exists $self->env->{'run_once'}) |