Branch Coverage

blib/lib/Maildir/Lite.pm
Criterion Covered Total %
branch 54 114 47.3


line true false branch
104 0 3 exists $args{'create'} ? :
105 0 0 exists $ENV{'HOME'} ? :
3 0 exists $args{'dir'} ? :
107 0 3 exists $args{'mode'} ? :
108 0 3 exists $args{'uniq'} ? :
109 1 2 exists $args{'sort'} ? :
137 1 0 if ($action ne 'close')
142 1 0 if (rename $old, $new) { }
200 0 2 if (not defined $dir) { }
0 2 elsif (not defined $action) { }
0 2 elsif (not defined $func) { }
214 0 2 unless (-d $path)
215 0 0 unless (CORE::mkdir $path)
221 2 0 if ($action ne 'default')
244 0 0 if (defined $dir)
265 0 0 if (defined $mode)
296 0 10 unless (defined $$self{'__dir'})
301 0 10 if ($$self{'__create'} != 1)
308 15 28 unless (-e $path)
309 0 15 unless (CORE::mkdir $path)
315 43 0 if (-d $path) { }
316 0 43 if (chmod($$self{'__mode'}, $path) != 1)
373 0 7 unless (open $fh, '>' . $$self{'__dir'} . "/tmp/$filename")
379 7 0 if (defined $message) { }
0 0 elsif (defined $$self{'__message_fh'}{fileno $fh}) { }
381 0 7 unless (&fsync($fh))
413 0 0 if (defined $$self{'__message_fh'}{fileno $fh})
416 0 0 unless (&fsync($fh))
444 0 0 if ($self->deliver_message($$self{'__message_fh'}{$fno}{'fh'}) == -1)
457 0 7 unless (-e $$self{'__dir'} . "/tmp/$filename")
463 0 7 if (-e $$self{'__dir'} . "/new/$filename")
469 0 7 unless (link $$self{'__dir'} . "/tmp/$filename", $$self{'__dir'} . "/new/$filename")
475 0 7 if (unlink($$self{'__dir'} . "/tmp/$filename") < 1)
530 0 0 if (defined $func)
543 4 3 if (defined $$self{'__read_messages'}{$dir} and $$self{'__last_sort'} eq $$self{'__sort'} and not $$self{'__force_readdir'}) { }
553 0 3 unless (defined $dir)
560 0 3 unless (opendir DIR, $path)
565 7 6 /^(\d[\w.:,_]+)$/ && -f "$path/$1" ? :
579 0 3 if ($$self{'__sort'} =~ /asc|des/i) { }
2 1 elsif ($$self{'__sort'} =~ /non/i) { }
583 0 0 unless (defined $files{$m})
590 0 0 if ($$self{'__sort'} =~ /asc/i) { }
630 1 6 unless (defined $action)
634 0 7 unless ($message)
636 0 7 unless (open $fh, '<' . $$self{'__dir'} . "/$dir/$message")
642 0 7 if (defined $$self{'__message_fh'}{fileno $fh}) { }
649 6 1 if (defined $lines) { }
686 7 0 if (defined $$self{'__message_fh'}{fileno $fh})
688 0 7 unless (&fsync($fh))
716 0 7 unless (defined $fh)
720 0 7 unless (defined $action)
731 0 7 if $action eq 'close'
733 7 0 if (exists $$self{'__folder_actions'}{$dir}) { }
734 6 1 if (exists $$self{'__folder_actions'}{$dir}{$flag}) { }
1 0 elsif (exists $$self{'__folder_actions'}{$dir}{'default'}) { }
735 6 0 if ($$self{'__folder_actions'}{$dir}{$flag} ne 'close')
740 1 0 if ($$self{'__folder_actions'}{$dir}{'default'} ne 'close')