| line |
true |
false |
branch |
|
23
|
2 |
7 |
ref $_ eq 'GLOB' ? : |
|
|
2 |
9 |
ref $_ eq 'ARRAY' ? : |
|
|
0 |
11 |
!ref($_) ? : |
|
|
0 |
11 |
unless !ref($_) ? 'IO::File'->new($_) : (ref $_ eq 'ARRAY' ? 'IO::File'->new(@$_) : (ref $_ eq 'GLOB' ? bless($_, 'IO::Handle') : $_)) |
|
48
|
0 |
4 |
unless $fh->$method(@_) |
|
72
|
0 |
0 |
unless print $fh $^A |
|
80
|
0 |
1 |
if @_ <= 1 |
|
83
|
1 |
0 |
if (ref $self) { } |
|
108
|
0 |
1 |
ref $self ? : |
|
132
|
0 |
8 |
unless print $fh @_ |
|
141
|
0 |
4 |
unless printf $fh $fmt, @_ |
|
149
|
5 |
0 |
if (length $input) |
|
153
|
0 |
4 |
unless print {$self->[$i];} $input |
|
163
|
1 |
0 |
if $bytes |
|
171
|
0 |
2 |
if (wantarray) { } |
|
185
|
2 |
0 |
if defined $data |
|
194
|
1 |
0 |
if defined $data |
|
202
|
1 |
0 |
if $bytes |