line |
true |
false |
branch |
57
|
6 |
0 |
$1 eq 'd' ? : |
|
6 |
6 |
$1 eq 'm' ? : |
|
6 |
12 |
$1 eq 'Y' ? : |
89
|
7 |
3 |
if (not exists $self->{'_current_dir'} or $dirname ne $self->{'_current_dir'}) |
91
|
1 |
6 |
if $self->{'_current_fh'} and &openhandle($self->{'_current_fh'}) |
97
|
0 |
7 |
unless chmod $self->{'_permissions'}, $dirname |
101
|
0 |
7 |
unless open my $fh, $self->{'_mode'}, $self->{'_current_filepath'} |
103
|
1 |
6 |
if $self->{'_binmode'} |
109
|
7 |
0 |
if ($self->{'_autoflush'}) |
120
|
0 |
4 |
unless print {$self->_get_current_fh;} $args{'message'} |
126
|
6 |
2 |
if $self->{'_current_fh'} and &openhandle($self->{'_current_fh'}) |