Branch Coverage

blib/lib/Mail/Box/Dir.pm
Criterion Covered Total %
branch 12 16 75.0


line true false branch
44 34 1 if (-d $directory) { }
1 0 elsif ($args->{'create'} and $class->create($directory, %$args)) { }
57 0 25 if ($self->writable and -e $directory and not -w $directory)
78 18 0 ref $thing ? :
52 18 @_ ? :
79 70 0 defined $parent ? :
86 16 75 $name =~ m[^=\/?(.*)] ? :
93 42 738 unless my $fn = $message->filename