| blib/lib/MIME/Parser/Filer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 29 | 41.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 380 | 0 | 52 | 0 | $self->{'MPF_MaxName'} and length $name > $self->{'MPF_MaxName'} |
| 418 | 0 | 10 | 3 | $last and not $self->evil_filename($last) |
| 558 | 53 | 0 | 0 | $recommended && $recommended =~ /(\.\w+)\Z/ |
| 693 | 0 | 0 | 5 | defined $ex and not $self->evil_filename($ex) |
| line | l | !l | condition |
|---|---|---|---|
| 430 | 10 | 0 | $self->{'MPF_TrimRoot'} || 14 |
| 431 | 10 | 0 | $self->{'MPF_TrimExt'} || 3 |
| 555 | 52 | 1 | $subtype ||= "" |
| 566 | 0 | 0 | $recommended_ext || $self->{'MPF_Ext'}{"$type/$subtype"} || $self->{'MPF_Ext'}{"$type/*"} || $self->{'MPF_Ext'}{'*/*'} || '.dat' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 274 | 0 | 0 | 78 | not defined $dir or $dir eq "" |
| 375 | 0 | 0 | 79 | not defined $name or $name eq "" |
| 922 | 0 | 3 | 0 | -d $self->output_dir or mkdir $self->output_dir, 448 |