line |
true |
false |
branch |
89
|
14 |
11 |
unless defined $lm |
90
|
5 |
20 |
unless defined $io |
91
|
15 |
10 |
unless defined $ref |
93
|
3 |
22 |
if ref $lm or not $lm =~ /^\d+$/ |
95
|
5 |
17 |
unless ref $ref eq "CODE" |
99
|
0 |
17 |
if (ref $io eq 'GLOB' and ref *{$io;}{'IO'} eq 'IO::Handle') { } |
|
11 |
6 |
elsif (ref $io eq 'SCALAR') { } |
107
|
5 |
1 |
unless defined $fno and $fno >= 0 |
111
|
0 |
12 |
unless $fh |
127
|
1 |
2 |
if $self->{'closed'} |
128
|
1 |
1 |
if (@_) { } |
145
|
14 |
3 |
$nl ? : |
|
17 |
1 |
defined $l ? : |
152
|
1 |
19 |
if $self->{'closed'} |
154
|
10 |
9 |
defined $, ? : |
155
|
1 |
18 |
defined $\ ? : |
167
|
1 |
2 |
if $self->{'closed'} |
175
|
1 |
1 |
if $self->{'closed'} |
188
|
3 |
9 |
if defined $line and $line ne "" |
189
|
11 |
1 |
unless $self->{'closed'} |
196
|
6 |
5 |
unless $self->{'closed'} |
202
|
0 |
11 |
unless $self->{'closed'} |