| line |
true |
false |
branch |
|
107
|
0 |
21 |
unless $args{'receive'} |
|
108
|
1 |
20 |
unless defined $args{'boundary'} and length $args{'boundary'} |
|
142
|
35 |
0 |
if ($line =~ /^([^:]+):\s*(.*)$/) |
|
182
|
2 |
24 |
if $self->{'_failed'} |
|
184
|
13 |
11 |
defined $meta->{'filename'} ? : |
|
185
|
13 |
11 |
if ($is_file) { } |
|
187
|
0 |
13 |
if ++$self->{'_file_count'} > $self->{'max_files'} |
|
190
|
1 |
10 |
if ++$self->{'_field_count'} > $self->{'max_fields'} |
|
192
|
1 |
23 |
if $self->{'_failed'} |
|
200
|
3 |
21 |
if $self->{'_failed'} |
|
202
|
11 |
10 |
$self->{'_cur_is_file'} ? : |
|
203
|
3 |
18 |
if ($self->{'_cur_bytes'} > $max) |
|
205
|
2 |
1 |
$self->{'_cur_is_file'} ? : |
|
217
|
7 |
25 |
if $self->{'_exhausted'} |
|
219
|
4 |
21 |
if (not $msg && $msg->{'type'} or $msg->{'type'} eq "http.disconnect") |
|
221
|
3 |
1 |
if $self->{'_bytes_total'} > 0 |
|
224
|
20 |
1 |
if (defined $msg->{'body'} and length $msg->{'body'}) |
|
226
|
1 |
19 |
if ($self->{'_bytes_total'} > $self->{'max_request_body'}) |
|
233
|
12 |
1 |
if $self->{'_bytes_total'} > 0 |
|
|
13 |
7 |
unless ($msg->{'more'}) |
|
247
|
0 |
15 |
if $self->{'_parser_finished'} |
|
250
|
0 |
15 |
unless eval {
do {
$self->{'_parser'}->finish;
1
}
} |
|
251
|
2 |
13 |
if (not $had_failure and defined $self->{'_failed'}) |
|
278
|
1 |
26 |
if $self->{'_failed'} |
|
279
|
7 |
19 |
if ($self->{'_current'} and not $self->{'_current'}{'_done'}) |
|
281
|
3 |
41 |
if $self->{'_failed'} |
|
283
|
18 |
23 |
if (@{$self->{'_queue'};} and $self->{'_queue'}[0][0] eq "part") |
|
288
|
5 |
18 |
unless XXX |
|
290
|
1 |
4 |
if $self->{'_failed'} |
|
298
|
1 |
29 |
if $self->{'_failed'} |
|
299
|
20 |
9 |
if (@{$self->{'_queue'};}) |
|
301
|
13 |
7 |
if ($kind eq "body") |
|
302
|
7 |
0 |
if $kind eq "part" |
|
304
|
7 |
2 |
unless (XXX) |
|
305
|
2 |
5 |
if $self->{'_failed'} |
|
466
|
3 |
1 |
defined $_[0]{'meta'}{'filename'} ? : |
|
467
|
1 |
1 |
$_[0]->is_file ? : |
|
472
|
0 |
14 |
if $self->{'_done'} |
|
474
|
5 |
6 |
unless defined $chunk |
|
487
|
0 |
2 |
unless $cb |
|
492
|
1 |
0 |
if ref $r and $r->can("get") |
|
497
|
1 |
1 |
unless ($ok) |
|
508
|
0 |
4 |
unless defined $path |
|
509
|
1 |
3 |
unless sysopen my $fh, $path, 131265, 384 |
|
515
|
0 |
1 |
unless print $fh $c |
|
522
|
2 |
1 |
unless ($ok) |
|
523
|
0 |
1 |
unless ($close_ok) |