| blib/lib/Mail/Box/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 35 | 66 | 53.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 58 | 1 | 0 | 9 | $args->{'create'} and $class->create($args->{'folder'}, %$args) |
| 86 | 17 | 31 | 0 | $self->writable and not -w $filename |
| 107 | 11 | 0 | 0 | -f $dir and defined $subext |
| 115 | 10 | 0 | 1 | -d $filename and defined $subext |
| 189 | 0 | 0 | 1 | $out->close and $ok |
| 261 | 312 | 0 | 39 | builtin::blessed($_) and ref($_) =~ /^Mail::/ |
| 312 | 39 | 0 | builtin::blessed($_) and ref($_) =~ /^Mail::/ and $_->weaken | |
| 289 | 14 | 0 | 0 | not @{$args->{'messages'};} and $self->removeEmpty |
| 374 | 0 | 0 | 10 | $old->close and $ok |
| 411 | 3 | 1 | 0 | @messages == 0 and $msgnr == $self->messages |
| line | l | !l | condition |
|---|---|---|---|
| 44 | 869 | 77 | (shift())->guessBodySize || 0 |
| 51 | 0 | 49 | $args->{'body_type'} ||= \&Mail::Box::File::_default_body_type |
| 52 | 0 | 49 | $args->{'lock_file'} ||= "--" |
| 73 | 0 | 48 | $args->{'lock_extension'} || '.lock' |
| 202 | 39 | 0 | $self->access || 'r' |
| 296 | 5 | 9 | $policy ||= "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 50 | 46 | 3 | 0 | $args->{'folderdir'} ||= $default_folder_dir |
| 99 | 0 | 11 | 0 | ref $thingy || $thingy |
| 100 | 11 | 0 | 0 | $args{'folderdir'} || $default_folder_dir |
| 112 | 9 | 2 | 0 | -d $dir or mkdir $dir, 493 |
| 134 | 0 | 0 | 0 | $name ||= $args{'folder'} |
| 136 | 0 | 0 | 0 | $args{'folderdir'} || $default_folder_dir |
| 203 | 22 | 0 | 17 | $mode eq "rw" or $mode eq "a" |
| 406 | 1 | 2 | 84 | $next->isModified or $next->seqnr != $msgnr++ |