| line |
true |
false |
branch |
|
23
|
0 |
19 |
unless defined $args{'boundary'} and length $args{'boundary'} |
|
25
|
0 |
19 |
unless defined $args{'receive'} |
|
51
|
0 |
0 |
if $path and -f $path |
|
64
|
19 |
30 |
unless $current_headers |
|
71
|
18 |
12 |
if (defined $filename) { } |
|
75
|
1 |
17 |
if $file_count > $self->{'max_files'} |
|
78
|
1 |
16 |
if ($current_fh) { } |
|
100
|
1 |
11 |
if $field_count > $self->{'max_fields'} |
|
126
|
49 |
0 |
if ($line =~ /^([^:]+):\s*(.*)$/) |
|
133
|
19 |
14 |
$cd =~ /filename=/i ? : |
|
143
|
19 |
14 |
$current_is_file ? : |
|
144
|
19 |
14 |
$current_is_file ? : |
|
145
|
3 |
30 |
if $current_size > $max_size |
|
149
|
1 |
29 |
if (not $current_fh and $current_size > $self->{'spool_threshold'}) |
|
157
|
0 |
1 |
unless print $current_fh $current_data |
|
162
|
1 |
29 |
if ($current_fh) { } |
|
163
|
0 |
1 |
unless print $current_fh $chunk |
|
180
|
0 |
26 |
unless $message and $message->{'type'} |
|
181
|
0 |
26 |
if $message->{'type'} eq "http.disconnect" |
|
183
|
26 |
0 |
if (defined $message->{'body'} and length $message->{'body'}) |
|
187
|
16 |
7 |
unless $message->{'more'} |
|
193
|
5 |
14 |
if (my $err = $@) |