blib/lib/Mail/MboxParser/Mail.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 53 | 18.8 |
line | l | !l | condition |
---|---|---|---|
745 | 0 | 0 | $args{'encode'} and 1 |
910 | 20 | 0 | $file =~ /=\?.*\?=/ and 1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
222 | 4 | 18 | 0 | defined $num and $num >= $self->num_entities |
385 | 0 | 0 | 0 | $name and not $email |
504 | 117 | 328 | 0 | defined $num and $num >= $self->num_entities |
551 | 0 | 0 | 0 | $num < $self->num_entities and $self->get_entities($num)->bodyhandle |
590 | 0 | 0 | 0 | exists $args{'handle'} && ref $args{'handle'} ne 'GLOB' |
711 | 0 | 0 | 0 | defined $args{'code'} and ref $args{'code'} ne 'CODE' |
723 | 0 | 0 | 0 | -e $path and not -d _ |
743 | 0 | 0 | 0 | defined $args{'store_only'} and not $file =~ /$args{'store_only'}/ |
794 | 0 | 0 | 0 | defined $args{'code'} and ref $args{'code'} ne 'CODE' |
957 | 0 | 0 | 0 | $name and not $email |
line | l | !l | condition |
---|---|---|---|
56 | 19 | 0 | eval { do { require Encode; 1 } } || 0 |
58 | 19 | 0 | eval { do { require MIME::Words; 1 } } || 0 |
141 | 4 | 52 | $$self{'ARGS'}{'decode'} || 'NEVER' |
706 | 0 | 0 | $args{'path'} || '.' |
709 | 0 | 0 | $args{'prefix'} || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
590 | 0 | 0 | 0 | $num or not exists $args{'handle'} && ref $args{'handle'} ne 'GLOB' |
803 | 0 | 0 | 0 | not exists $args{'path'} or $args{'path'} eq '' |
992 | 0 | 0 | 690 | $decode eq 'ALL' or $decode eq 'HEADER' |