| line |
true |
false |
branch |
|
103
|
0 |
0 |
unless $dir |
|
110
|
0 |
0 |
if ($opts{'create'}) { } |
|
111
|
0 |
0 |
unless (-d $dir) |
|
112
|
0 |
0 |
unless mkdir $dir |
|
116
|
0 |
0 |
unless -d $dir |
|
122
|
0 |
0 |
$opts{'maildir++'} ? : |
|
134
|
0 |
0 |
unless my(@components) = split(/\./, $mailbox, 0) |
|
138
|
0 |
0 |
if ($first =~ /^\~/) |
|
143
|
0 |
0 |
if $component eq '' |
|
144
|
0 |
0 |
if $component =~ m[/] |
|
157
|
0 |
0 |
if ($mailbox eq $DEFAULT_MAILBOX) |
|
183
|
0 |
0 |
unless $$self{'maildir++'} |
|
187
|
0 |
0 |
unless -d $self->mailbox_dir($mailbox) |
|
220
|
0 |
0 |
if @components |
|
237
|
0 |
0 |
unless $$self{'maildir++'} |
|
238
|
0 |
0 |
unless $self->mailbox_exists(parent_mailbox($mailbox)) |
|
245
|
0 |
0 |
unless mkdir $dir |
|
254
|
0 |
0 |
unless my $from = $args{'from'} |
|
255
|
0 |
0 |
$args{'time'} ? : |
|
259
|
0 |
0 |
if ($$self{'maildir++'}) |
|
262
|
0 |
0 |
if (defined $args{'size'}) { } |
|
|
0 |
0 |
elsif (not ref $from) { } |
|
266
|
0 |
0 |
unless my(@st) = stat $from |
|
270
|
0 |
0 |
if (defined $size) |
|
286
|
0 |
0 |
unless sysopen my $fh_to, $to, &Fcntl::O_CREAT | &Fcntl::O_WRONLY |
|
288
|
0 |
0 |
if (ref $from eq 'CODE') { } |
|
299
|
0 |
0 |
if (ref $from eq 'GLOB') { } |
|
|
0 |
0 |
elsif (ref $from eq '') { } |
|
303
|
0 |
0 |
unless sysopen $fh_from, $from, &Fcntl::O_RDONLY |
|
313
|
0 |
0 |
unless ref $from eq 'GLOB' |
|
354
|
0 |
0 |
unless defined $from |
|
356
|
0 |
0 |
unless my $oldcwd = Cwd::getcwd() |
|
365
|
0 |
0 |
unless chdir $dir |
|
369
|
0 |
0 |
if -e $file_tmp |
|
384
|
0 |
0 |
unless (rename $file_tmp, $file_new) |
|
388
|
0 |
0 |
unless my(@st) = stat $file_new |
|
390
|
0 |
0 |
unless chdir $oldcwd |
|
440
|
0 |
0 |
unless $opts{$key} |
|
444
|
0 |
0 |
unless opendir my $dh, $path |
|
447
|
0 |
0 |
if $item =~ /^\./ |
|
450
|
0 |
0 |
unless my(@st) = stat $file |
|
461
|
0 |
0 |
if (defined $opts{'filter'}) |
|
462
|
0 |
0 |
unless $opts{'filter'}($message) |
|
496
|
0 |
0 |
$time - $$message{'atime'} > $MAX_TMP_LAST_ACCESS ? : |
|
501
|
0 |
0 |
unless unlink $$message{'file'} |