blib/lib/Mail/Message.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 24 | 79 | 30.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
172 | 0 | 0 | 0 | ref $_[0] and $_[0]->isa("Mail::Transport::Send") |
176 | 0 | 0 | 0 | not $args{'via'} and defined $default_mailer |
206 | 0 | 0 | 111 | ref $head and $head->isa("Mail::Message::Head") |
305 | 0 | 0 | 83 | ref $rawbody and $rawbody->isa("Mail::Message::Body") |
316 | 83 | 0 | 0 | defined $oldbody and $body == $oldbody |
395 | 0 | 0 | 0 | $head and $head->isModified |
401 | 0 | 0 | 0 | $body and $body->isModified |
629 | 10 | 0 | 2 | substr($type, 0, 10) eq "multipart/" and not $bodytype->isMultipart |
9 | 0 | 1 | $type eq "message/rfc822" and not $bodytype->isNested |
line | l | !l | condition |
---|---|---|---|
33 | 0 | 0 | $Mail::Box::VERSION || 3 |
49 | 0 | 106 | $args->{'modified'} || 0 |
50 | 0 | 106 | $args->{'trusted'} || 0 |
75 | 0 | 106 | $args->{'labels'} || [] |
180 | 0 | 0 | delete $args{'via'} || 'sendmail' |
225 | 66 | 93 | $self->head->get(shift()) || (return undef) |
244 | 0 | 0 | $self->head->get('Sender') || $self->head->get('From') || (return ()) |
345 | 0 | 0 | (defined $head ? $head->get('Content-Type', 0) : undef) || '' |
353 | 16 | 6 | shift() || 'ACTIVE' |
450 | 0 | 0 | $head->get('status') || '' |
459 | 0 | 0 | $head->get('x-status') || '' |
558 | 0 | 0 | $message->{'MM_modified'} ||= 0 |
594 | 0 | 12 | shift() || $self->{'MM_head_type'} || 'Mail::Message::Head::Complete' |
670 | 41 | 84 | (@_ ? shift() : $self->get('Message-ID')) || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
55 | 0 | 0 | 7 | $args->{'messageId'} || $args->{'messageID'} |
93 | 0 | 0 | 10 | $args{'shallow'} or $args{'shallow_head'} |
96 | 0 | 0 | 10 | $args{'shallow'} or $args{'shallow_body'} |
144 | 31 | 0 | 0 | shift() || select() |
155 | 0 | 0 | 0 | shift() || select() |
356 | 0 | 0 | 22 | $what eq 'RECURSE' || ref $what |
578 | 7 | 0 | 0 | $self->readHead($parser) || 'Mail::Message::Head::Complete'->new('message', $self, 'field_type', $self->{'MM_field_type'}, $self->logSettings) |
612 | 0 | 12 | 0 | $self->{'MM_body_type'} || $lbody |