Branch Coverage

blib/lib/Mail/Server/IMAP4/User.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
27 0 0 unless $self->SUPER::init($args)
39 0 0 unless my $index = $_[0]->index
46 0 0 unless my $index = $self->index->startModify
48 0 0 unless ($self->_delete($index, $name))
61 0 0 unless $self->_delete($index, $subf)
65 0 0 unless my $info = $index->folder($name)
69 0 0 if (my $dir = $info->{'Directory'})
71 0 0 if (remove(\1, $dir) != 0 and -d $dir)
85 0 0 unless my $index = $self->index->startModify
87 0 0 if (my $info = $index->folder($name))
99 0 0 unless -d $dir or mkdir $dir, 488
105 0 0 unless open $namefh, ">:encoding(utf-8)", $namefile
110 0 0 unless $namefh->close
123 0 0 if $self->write