| blib/lib/MIME/Head.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 17 | 25 | 68.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 796 | 247 | 0 | 80 | defined $value and $value ne '' |
| 247 | 3 | 77 | defined $value and $value ne '' and $value =~ /\S/ |
| line | l | !l | condition |
|---|---|---|---|
| 388 | 0 | 2 | shift() || 0 |
| 567 | 7 | 73 | $MIME::Entity::BOUNDARY_DELIMITER || "\n" |
| 670 | 443 | 1225 | $subtag ||= '_' |
| 705 | 159 | 137 | $self->mime_attr('content-transfer-encoding') || '7bit' |
| 740 | 9 | 154 | $self->mime_attr('content-type') || $self->{'MIH_DefaultType'} || 'text/plain' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 389 | 0 | 0 | 2 | $force eq 'I_NEED_TO_FIX_THIS' or $force eq 'I_KNOW_WHAT_I_AM_DOING' |
| 534 | 77 | 0 | 0 | $fh ||= select |
| 742 | 0 | 894 | 0 | $] <= 5.008 or $] >= 5.014 |