Branch Coverage

blib/lib/Email/LocalDelivery/Mbox.pm
Criterion Covered Total %
branch 12 26 46.1


line true false branch
25 0 1 if (eval { do { $_[0]->isa('Email::Simple') } }) { }
37 0 1 unless my $fh = $class->_open_fh($file)
38 0 1 if tell $fh > 0
43 0 1 unless $email->as_string =~ /\n$/
45 0 1 unless $class->_close_fh($fh)
54 0 0 unless -d $dir or mkpath($dir)
57 0 1 unless open $fh, ">> $file"
58 0 1 unless $class->getlock($fh)
65 0 1 unless $class->unlock($fh)
66 0 1 unless close $fh
83 0 1 if exists $ENV{'UFLINE'}
96 0 1 if $from =~ /<(.*?)>/
108 1 0 if flock $fh, 6