| blib/lib/Mail/Box/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 35 | 66 | 53.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 67 | 1 | 0 | 9 | $args->{'create'} and $class->create($args->{'folder'}, %$args) |
| 101 | 15 | 33 | 0 | $self->writable and not -w $filename |
| 124 | 11 | 0 | 0 | -f $dir and defined $subext |
| 132 | 10 | 0 | 1 | -d $filename and defined $subext |
| 212 | 0 | 0 | 1 | $out->close and $ok |
| 299 | 468 | 0 | 39 | ref $_ and ref($_) =~ /^Mail::/ |
| 468 | 39 | 0 | ref $_ and ref($_) =~ /^Mail::/ and $_->weaken | |
| 325 | 14 | 0 | 0 | not @{$args->{'messages'};} and $self->{'MB_remove_empty'} |
| 418 | 0 | 0 | 10 | $old->close and $ok |
| 458 | 3 | 1 | 0 | @messages == 0 and $msgnr == $self->messages |
| line | l | !l | condition |
|---|---|---|---|
| 46 | 869 | 77 | (shift())->guessBodySize || 0 |
| 53 | 0 | 49 | $args->{'body_type'} ||= \&Mail::Box::File::_default_body_type |
| 54 | 0 | 49 | $args->{'lock_file'} ||= "--" |
| 85 | 0 | 48 | $args->{'lock_extension'} || '.lock' |
| 234 | 39 | 0 | $self->{'MB_access'} || 'r' |
| 332 | 5 | 9 | $policy ||= "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 52 | 46 | 3 | 0 | $args->{'folderdir'} ||= $default_folder_dir |
| 116 | 0 | 11 | 0 | ref $thingy || $thingy |
| 117 | 11 | 0 | 0 | $args{'folderdir'} || $default_folder_dir |
| 129 | 9 | 2 | 0 | -d $dir or mkdir $dir, 493 |
| 150 | 0 | 0 | 0 | $name ||= $args{'folder'} |
| 152 | 0 | 0 | 0 | $args{'folderdir'} || $default_folder_dir |
| 235 | 24 | 0 | 15 | $mode eq "rw" or $mode eq "a" |
| 453 | 1 | 2 | 84 | $next->isModified or $next->seqnr != $msgnr++ |