| line |
true |
false |
branch |
|
97
|
1 |
24 |
unless defined $filename |
|
98
|
1 |
23 |
if defined $options and ref $options ne 'HASH' |
|
107
|
0 |
23 |
if (ref $filename) { } |
|
|
0 |
23 |
elsif ($filename eq '-') { } |
|
108
|
0 |
0 |
if (ref $filename eq 'GLOB') { } |
|
127
|
0 |
23 |
if ($filename ne $name and $^O =~ /mswin/i) { } |
|
133
|
0 |
0 |
if $^E |
|
134
|
0 |
0 |
unless Win32API::File::OsFHandleOpen('FILE', $fh, 'r') |
|
140
|
0 |
23 |
unless open my $f, '<', $filename |
|
145
|
23 |
0 |
if $options |
|
148
|
0 |
23 |
if ($encoded) { } |
|
|
6 |
17 |
elsif ($data =~ /^\xEF\xBB\xBF/) { } |
|
|
0 |
17 |
elsif ($data =~ /^\xFE\xFF/) { } |
|
|
0 |
17 |
elsif ($data =~ /^\xFF\xFE\x00\x00/) { } |
|
|
6 |
11 |
elsif ($data =~ /^\xFF\xFE/) { } |
|
|
0 |
11 |
elsif ($data =~ /^\x00\x00\xFE\xFF/) { } |
|
|
1 |
10 |
elsif ($options->{'encoding'}) { } |
|
155
|
0 |
6 |
if $options->{'debug'} |
|
160
|
0 |
0 |
if $options->{'debug'} |
|
165
|
0 |
0 |
if $options->{'debug'} |
|
170
|
0 |
6 |
if $options->{'debug'} |
|
175
|
0 |
0 |
if $options->{'debug'} |
|
183
|
0 |
1 |
if $options->{'debug'} |
|
190
|
1 |
9 |
if ($@) { } |
|
|
2 |
7 |
elsif (not $d =~ /[^[:ascii:]]/) { } |
|
191
|
0 |
1 |
if $options->{'debug'} |
|
196
|
0 |
2 |
if $options->{'debug'} |
|
201
|
0 |
7 |
if $options->{'debug'} |
|
207
|
0 |
23 |
unless $options->{'split'} |
|
211
|
23 |
0 |
if ($options->{'chomp'}) { } |
|
213
|
6 |
17 |
if $data =~ /.(?!\r\n|\n|\r)\z/ |
|
222
|
14 |
9 |
wantarray ? : |