Branch Coverage

blib/lib/Log/Dispatch/CronoDir.pm
Criterion Covered Total %
branch 19 24 79.1


line true false branch
57 7 0 $1 eq 'd' ? :
7 7 $1 eq 'm' ? :
7 14 $1 eq 'Y' ? :
89 8 3 if (not exists $self->{'_current_dir'} or $dirname ne $self->{'_current_dir'})
91 1 7 if $self->{'_current_fh'} and &openhandle($self->{'_current_fh'})
97 1 7 if (defined $self->{'_permissions'})
98 0 1 unless chmod $self->{'_permissions'}, $dirname
103 0 8 unless open my $fh, $self->{'_mode'}, $self->{'_current_filepath'}
105 1 7 if $self->{'_binmode'}
111 8 0 if ($self->{'_autoflush'})
122 0 4 unless print {$self->_get_current_fh;} $args{'message'}
128 7 2 if $self->{'_current_fh'} and &openhandle($self->{'_current_fh'})