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'} |