| line |
true |
false |
branch |
|
37
|
0 |
18 |
unless ($self->content_type =~ /boundary=\"?([^\";]+)\"?/) |
|
57
|
482 |
0 |
if ($$self{'state'} =~ /^(preamble|boundary|header|body)$/) { } |
|
59
|
35 |
447 |
unless $self->$method |
|
127
|
0 |
18 |
unless ($index >= 0) |
|
146
|
143 |
19 |
if (index($$self{'buffer'}, $self->delimiter_begin . $self->crlf) == 0) |
|
155
|
16 |
3 |
if (index($$self{'buffer'}, $self->delimiter_end . $self->crlf) == 0) |
|
177
|
7 |
143 |
unless ($index >= 0) |
|
187
|
0 |
209 |
if (s/^[ \t]+//) { } |
|
203
|
0 |
209 |
if (exists $$self{'part'}{'headers'}{$field}) { } |
|
205
|
0 |
0 |
unless ref $_ eq 'ARRAY' |
|
228
|
9 |
143 |
if ($index < 0) |
|
233
|
4 |
5 |
unless ($length > 0) |
|
267
|
140 |
8 |
unless (exists $$part{'name'}) |
|
276
|
65 |
75 |
if (defined $filename) |
|
279
|
51 |
14 |
if ($filename ne '') |
|
281
|
49 |
2 |
$basename =~ /$basename_regexp/ ? : |
|
291
|
51 |
97 |
if ($$part{'fh'} and my $length = length $$part{'data'}) |
|
295
|
143 |
5 |
if ($$part{'done'}) |
|
297
|
67 |
76 |
if (exists $$part{'filename'}) { } |
|
298
|
53 |
14 |
if ($$part{'filename'} ne '') |
|
299
|
51 |
2 |
if defined $$part{'fh'} |