line |
true |
false |
branch |
23
|
0 |
2 |
if (@_) |
46
|
0 |
25 |
if (@_) |
74
|
1 |
0 |
if not $self->persist_parts |
91
|
0 |
0 |
if (@_) |
111
|
4 |
0 |
if $@ |
131
|
0 |
0 |
unless $1 |
137
|
0 |
0 |
unless $self->parts |
142
|
0 |
0 |
defined $context ? : |
143
|
0 |
0 |
$soapversion == 1.1 ? : |
166
|
1 |
0 |
unless defined $self->parser |
167
|
0 |
0 |
unless my $entity = eval {
do {
$self->parser->parse_data($raw_input)
}
} |
172
|
0 |
0 |
if (lc $entity->head->mime_type eq 'multipart/form-data') { } |
|
0 |
0 |
elsif (lc $entity->head->mime_type eq 'multipart/related') { } |
|
0 |
0 |
elsif (lc $entity->head->mime_type eq 'text/xml') { } |
185
|
0 |
0 |
if ($env) { } |
|
0 |
0 |
elsif ($entity->bodyhandle->as_string) { } |
199
|
0 |
0 |
$name eq 'payload' ? : |
209
|
0 |
0 |
unless $entity->head->mime_attr('content-type') =~ m[^multipart/related]i |
222
|
0 |
0 |
if (not defined $start or $start eq '') |
230
|
0 |
0 |
unless UNIVERSAL::isa($part, 'MIME::Entity') |
239
|
0 |
0 |
if $pid eq '' |
247
|
0 |
0 |
if ($start and $pid eq $start) { } |
272
|
0 |
0 |
if (@_) |
290
|
0 |
0 |
if $@ |
297
|
0 |
0 |
unless $self->parts |
303
|
0 |
0 |
defined $context ? : |
304
|
0 |
0 |
$soapversion == 1.1 ? : |
311
|
0 |
0 |
unless $part->isa('DIME::Payload') |
329
|
0 |
0 |
unless defined $self->parser |
330
|
0 |
0 |
unless my $message = eval {
do {
$self->parser->parse_data(\$raw_input)
}
} |