blib/lib/Mail/POP3/Folder/mbox/parse_to_disk.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 22 | 68.1 |
line | true | false | branch |
---|---|---|---|
43 | 0 | 6 | unless (-d $self->{'TMPDIR'}) |
44 | 0 | 0 | unless mkdir $self->{'TMPDIR'}, 448 |
49 | 0 | 6 | unless (flock $self->{'TMPDIRLOCK'}, 6) |
53 | 0 | 6 | unless $self->{'MESSAGE_FH'} = 'IO::File'->new(">$file") |
61 | 2 | 6 | if $oldmessageno <= 0 |
66 | 6 | 0 | if $self->{'MESSAGE_FH'} |
110 | 2 | 18 | if /^\s*$/ |
116 | 2 | 4 | if ++$cnt > $body_lines |
132 | 2 | 0 | if (not $self->{'DEBUG'}) |
146 | 28 | 48 | unless $mbox_destined |
148 | 48 | 28 | $mbox_destined ? : |