| line |
true |
false |
branch |
|
120
|
8 |
0 |
if defined $self->{'_filehandle'} and ref $self->{'_filehandle'} and UNIVERSAL::can($self->{'_filehandle'}, 'isa') and $self->{'_filehandle'}->isa('IO::File') and defined fileno $self->{'_filehandle'} |
|
126
|
0 |
5 |
$self->{'dir'} =~ /\w/ ? : |
|
132
|
0 |
5 |
unless defined $self->{'_filehandle'} |
|
161
|
11 |
0 |
if defined $self->{'formatter'} |
|
163
|
0 |
11 |
unless print $fh $msg |
|
168
|
1 |
10 |
if ($self->{'autoclose'}) |
|
171
|
0 |
1 |
unless $fh->close |
|
193
|
0 |
7 |
if ($self->{'file'} =~ m[^/|^[A-Za-z]:\\]) { } |
|
|
7 |
0 |
elsif (not defined $self->{'dir'} && -d $self->{'dir'}) { } |
|
202
|
0 |
7 |
unless defined $self->{'file'} |
|
206
|
0 |
7 |
unless defined $self->{'autoflush'} |
|
210
|
6 |
1 |
unless defined $self->{'autoclose'} |
|
230
|
0 |
5 |
if defined $self->{'_filehandle'} and ref $self->{'_filehandle'} and UNIVERSAL::can($self->{'_filehandle'}, 'isa') and $self->{'_filehandle'}->isa('IO::File') and defined fileno $self->{'_filehandle'} |