| line |
true |
false |
branch |
|
89
|
0 |
2 |
unless ($fh->print(@_)) |
|
109
|
0 |
0 |
if (defined $thing and not ref $thing) { } |
|
124
|
0 |
0 |
unless wantarray |
|
127
|
0 |
0 |
if (ref $thing eq 'ARRAY') { } |
|
138
|
0 |
0 |
if (ref $thing eq 'ARRAY') { } |
|
152
|
0 |
10 |
if (ref $fh eq 'GLOB' or ref $fh eq 'IO::Handle') { } |
|
168
|
12 |
0 |
if (ref $thing) { } |
|
178
|
10 |
2 |
if (&Scalar::Util::blessed($ref)) { } |
|
|
1 |
1 |
elsif (ref $ref eq 'GLOB' and *{$ref;}{'IO'}) { } |
|
|
0 |
1 |
elsif (ref $ref eq 'ARRAY') { } |
|
|
1 |
0 |
elsif (ref $ref eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $ref eq 'CODE') { } |
|
198
|
10 |
0 |
if ($obj->isa('IO::Handle') or $obj->can('getline') and $obj->can('print')) { } |
|
|
0 |
0 |
elsif ($obj->isa('Path::Class::File')) { } |
|
223
|
8 |
1 |
if (@array) { } |
|
245
|
0 |
0 |
if ($thunk) |
|
250
|
0 |
0 |
if (@lines) { } |
|
289
|
0 |
0 |
if ($reftype eq 'IO' or $reftype eq 'GLOB' and *{$fh;}{'IO'}) { } |
|
301
|
0 |
0 |
unless defined $m_fileno |
|
302
|
0 |
0 |
unless $m_fileno >= 0 |
|
306
|
0 |
0 |
unless defined $f_fileno |
|
307
|
0 |
0 |
unless $f_fileno >= 0 |