line |
true |
false |
branch |
44
|
2 |
46 |
if $opt->{'handle'} |
46
|
1 |
45 |
unless open $fh, $mode, $path |
47
|
2 |
43 |
if ($opt->{'binmode'}) { } |
|
2 |
41 |
elsif ($opt->{'binary'}) { } |
49
|
0 |
2 |
unless binmode $fh, $opt->{'binmode'} |
51
|
0 |
2 |
unless binmode $fh |
66
|
2 |
20 |
$data ? : |
67
|
1 |
21 |
if ($ref eq 'SCALAR') { } |
|
1 |
20 |
elsif ($ref eq 'CODE') { } |
72
|
0 |
2 |
unless defined $done |
81
|
0 |
2 |
unless defined $done |
83
|
1 |
1 |
if $done |
91
|
0 |
39 |
unless defined $done |
108
|
2 |
23 |
if ($ref eq 'SCALAR') { } |
|
1 |
22 |
elsif ($ref eq 'CODE') { } |
113
|
0 |
2 |
unless defined $done |
123
|
1 |
3 |
unless $length |
127
|
0 |
3 |
unless defined $done |
138
|
0 |
21 |
unless defined $done |
169
|
5 |
18 |
if @_ |
173
|
0 |
22 |
unless close $fh |
193
|
0 |
25 |
unless close $fh |
212
|
0 |
0 |
if (-f $path) { } |
214
|
0 |
0 |
if ($data eq $option{'data'}) { } |
216
|
0 |
0 |
unless $option{'silent'} |
221
|
0 |
0 |
if $option{'diff'} |
222
|
0 |
0 |
if ($option{'noaction'}) { } |
224
|
0 |
0 |
unless $option{'silent'} |
228
|
0 |
0 |
unless $option{'silent'} |
235
|
0 |
0 |
if $option{'diff'} |
236
|
0 |
0 |
if ($option{'noaction'}) { } |
238
|
0 |
0 |
unless $option{'silent'} |
243
|
0 |
0 |
unless $option{'silent'} |