line |
true |
false |
branch |
17
|
0 |
1 |
unless open my $fh, '<:unix', $filename |
18
|
1 |
0 |
if (my $size = -s $fh) { } |
21
|
0 |
1 |
unless defined($read = read($fh, $buf, $size - $pos, $pos)) |
36
|
0 |
3 |
exists $$options{'crlf'} ? : |
37
|
0 |
3 |
if ($encoding =~ /^(latin|iso-8859-)1$/i) { } |
|
3 |
0 |
elsif ($has_utf8_strict and $encoding =~ /^utf-?8\b/) { } |
38
|
0 |
0 |
$crlf ? : |
41
|
0 |
3 |
$crlf ? : |
44
|
0 |
0 |
$crlf ? : |
52
|
0 |
1 |
if $layer eq ':raw' |
54
|
0 |
1 |
unless open my $fh, "<$layer", $filename |
63
|
0 |
2 |
unless open my $fh, "<$layer", $filename |
64
|
1 |
1 |
unless %options |
67
|
1 |
0 |
if $options{'chomp'} |
73
|
0 |
2 |
unless opendir my $dir, $dirname |
75
|
1 |
1 |
if $options{'prefix'} |