Branch Coverage

blib/lib/Mail/Box/Dir.pm
Criterion Covered Total %
branch 12 20 60.0


line true false branch
41 0 35 unless $self->SUPER::init($args)
47 34 1 if (-d $directory) { }
1 0 elsif ($args->{'create'} and $class->create($directory, %$args)) { }
57 0 0 'File::Spec'->file_name_is_absolute($_) ? :
35 0 !defined($_) ? :
66 0 25 if ($self->writable and -e $directory and not -w $directory)
92 18 0 ref $thing ? :
52 18 @_ ? :
93 70 0 defined $parent ? :
101 16 75 $name =~ m[^=\/?(.*)] ? :