| blib/lib/Mail/IMAPClient/BodyStructure.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 19 | 43 | 44.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 33 | 0 | 0 | 91 | $object and ref $object |
| 38 | 0 | 0 | 91 | UNIVERSAL::isa($object, 'HASH') and exists $object->{$thingy} |
| 126 | 21 | 21 | 19 | $partno == 1 and $stype eq 'MESSAGE' |
| 42 | 4 | 15 | $partno == 1 and $stype eq 'MESSAGE' and $ptype eq 'MULTIPART' | |
| 192 | 0 | 3 | 1 | $pn && $pn ne 'NIL' |
| line | l | !l | condition |
|---|---|---|---|
| 84 | 87 | 0 | uc $p->bodytype || '' |
| 110 | 51 | 0 | $self->{'_prefix'} || '' |
| 122 | 61 | 0 | $self->{'bodytype'} || '' |
| 123 | 61 | 0 | $p->{'bodytype'} || '' |
| 156 | 0 | 0 | $self->{'_id'} ||= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 26 | 0 | 10 | 0 | ref $class || $class |
| 31 | 91 | 0 | 0 | shift() || (ref $thingy ? $thingy : undef) |
| 99 | 7 | 0 | 0 | $self->{'_id'} ||= $HEAD |
| 100 | 0 | 7 | 0 | $self->{'_prefix'} ||= $HEAD |
| 133 | 0 | 61 | 0 | $p->{'_id'} ||= "$prefix$pno" |
| 151 | 0 | 0 | 0 | $self->{'_id'} || $self->{'_prefix'} |