| line |
true |
false |
branch |
|
17
|
1 |
5 |
defined $options{'buf_ref'} ? :
|
|
19
|
0 |
6 |
unless open my $fh, "<$layer", $filename
|
|
20
|
6 |
0 |
if (my $size = -s $fh) { }
|
|
23
|
0 |
6 |
unless defined($read = read($fh, ${$buf_ref;}, $size - $pos, $pos))
|
|
31
|
1 |
5 |
if not defined wantarray or $options{'buf_ref'}
|
|
32
|
1 |
4 |
$options{'scalar_ref'} ? :
|
|
39
|
0 |
2 |
unless open my $fh, "<$layer", $filename
|
|
40
|
1 |
1 |
unless %options
|
|
43
|
1 |
0 |
if $options{'chomp'}
|
|
44
|
0 |
1 |
$options{'array_ref'} ? :
|
|
50
|
1 |
1 |
$options{'append'} ? :
|
|
51
|
0 |
2 |
defined $options{'buf_ref'} ? :
|
|
53
|
0 |
2 |
unless open my $fh, $mode . $layer, $filename
|
|
55
|
0 |
2 |
unless print $fh ${$buf_ref;}
|
|
56
|
0 |
2 |
unless close $fh
|
|
62
|
0 |
2 |
unless opendir my $dir, $dirname
|
|
64
|
1 |
1 |
if $options{'prefix'}
|