| line |
true |
false |
branch |
|
15
|
0 |
0 |
if (my $charset = $entity->head->mime_attr('content-type.charset')) |
|
23
|
0 |
0 |
unless $body =~ /\n\z/u |
|
27
|
0 |
0 |
if (my $charset = $entity->head->mime_attr('content-type.charset')) |
|
32
|
0 |
0 |
unless ($encoding_ok) |
|
34
|
0 |
0 |
unless $head->mime_attr('content-type') |
|
40
|
0 |
0 |
unless my $fh = $entity->bodyhandle->open('w') |
|
45
|
0 |
0 |
unless $fh->close |
|
50
|
0 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif (defined wantarray) { } |
|
54
|
0 |
0 |
if (not defined $self->{'enriched'} and defined(my $plain = $self->plain)) |
|
64
|
0 |
0 |
if @_ |
|
70
|
0 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif (defined wantarray) { } |
|
74
|
0 |
0 |
if (not defined $self->{'html'} and defined(my $plain = $self->plain)) |
|
76
|
0 |
0 |
unless defined &MIME::Signature::encode_entities |
|
87
|
0 |
0 |
if @_ |
|
93
|
0 |
0 |
if @_ |
|
99
|
0 |
0 |
if @_ |
|
105
|
0 |
0 |
if @_ |
|
111
|
0 |
0 |
unless defined(my $signature = $self->$type) |
|
124
|
0 |
0 |
unless defined &MIME::Signature::encode_utf8 |
|
126
|
0 |
0 |
grep((lc $_->mime_type eq 'text/enriched'), $entity->parts) ? : |
|
|
0 |
0 |
grep((lc $_->mime_type eq 'text/html'), $entity->parts) ? : |
|
152
|
0 |
0 |
unless $self->unsign |
|
157
|
0 |
0 |
if @parts != 2 |
|
194
|
0 |
0 |
if lc $tagname eq 'body' |
|
213
|
0 |
0 |
if length ref $package |
|
214
|
0 |
0 |
if @_ % 2 |
|
229
|
0 |
0 |
if @_ |
|
235
|
0 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif (not $self->{'parser'}) { } |
|
271
|
0 |
0 |
unless my $entity = shift() || $self->{'entity'} |
|
275
|
0 |
0 |
unless $self->can($handler_method) and $self->$handler_method($entity) |
|
295
|
0 |
0 |
if $version_pod =~ /^Version \Q$v\E$/mu |