line |
true |
false |
branch |
105
|
0 |
0 |
unless $dir |
112
|
0 |
0 |
if ($opts{'create'}) { } |
113
|
0 |
0 |
unless (-d $dir) |
114
|
0 |
0 |
unless mkdir $dir |
118
|
0 |
0 |
unless -d $dir |
126
|
0 |
0 |
$opts{'maildir++'} ? : |
136
|
0 |
0 |
unless my @components = split(/\./, $mailbox, 0) |
140
|
0 |
0 |
if ($first =~ /^\~/) |
145
|
0 |
0 |
if $component eq '' |
146
|
0 |
0 |
if $component =~ m[/] |
159
|
0 |
0 |
if ($mailbox eq $DEFAULT_MAILBOX) |
185
|
0 |
0 |
unless $self->{'maildir++'} |
189
|
0 |
0 |
unless -d $self->mailbox_dir($mailbox) |
222
|
0 |
0 |
if @components |
239
|
0 |
0 |
unless $self->{'maildir++'} |
240
|
0 |
0 |
unless $self->mailbox_exists(parent_mailbox($mailbox)) |
247
|
0 |
0 |
unless mkdir $dir |
256
|
0 |
0 |
unless my $from = $args{'from'} |
257
|
0 |
0 |
$args{'time'} ? : |
261
|
0 |
0 |
if ($self->{'maildir++'}) |
264
|
0 |
0 |
if (defined $args{'size'}) { } |
|
0 |
0 |
elsif (not ref $from) { } |
268
|
0 |
0 |
unless my(@st) = stat $from |
272
|
0 |
0 |
if (defined $size) |
288
|
0 |
0 |
unless sysopen my $fh_to, $to, &Fcntl::O_CREAT | &Fcntl::O_WRONLY |
290
|
0 |
0 |
if (ref $from eq 'CODE') { } |
301
|
0 |
0 |
if (ref $from eq 'GLOB') { } |
|
0 |
0 |
elsif (ref $from eq '') { } |
305
|
0 |
0 |
unless sysopen $fh_from, $from, &Fcntl::O_RDONLY |
315
|
0 |
0 |
unless ref $from eq 'GLOB' |
356
|
0 |
0 |
unless defined $from |
358
|
0 |
0 |
unless my $oldcwd = Cwd::getcwd() |
367
|
0 |
0 |
unless chdir $dir |
371
|
0 |
0 |
if -e $file_tmp |
386
|
0 |
0 |
unless (rename $file_tmp, $file_new) |
390
|
0 |
0 |
unless my(@st) = stat $file_new |
392
|
0 |
0 |
unless chdir $oldcwd |
442
|
0 |
0 |
unless $opts{$key} |
446
|
0 |
0 |
unless opendir my $dh, $path |
449
|
0 |
0 |
if $item =~ /^\./ |
452
|
0 |
0 |
unless my(@st) = stat $file |
463
|
0 |
0 |
if (defined $opts{'filter'}) |
464
|
0 |
0 |
unless $opts{'filter'}->($message) |
498
|
0 |
0 |
$time - $message->{'atime'} > $MAX_TMP_LAST_ACCESS ? : |
503
|
0 |
0 |
unless unlink $message->{'file'} |