| line |
true |
false |
branch |
|
54
|
201 |
129 |
if $opts{'validate'} |
|
58
|
63 |
267 |
if ($error_rsv) |
|
61
|
203 |
127 |
unless (defined $mount) |
|
62
|
0 |
203 |
if ($error_rsv) { } |
|
80
|
0 |
1804968 |
unless &fetch_by_key($self->{'mount'}, $key, $value) |
|
105
|
0 |
63 |
if ($scalar_has_slash) |
|
117
|
127 |
0 |
if $self->{'mount'} |
|
139
|
0 |
64 |
unless my $ofile = $opts{'file'} |
|
141
|
0 |
64 |
unless my $source_hash = $opts{'source_hash'} |
|
142
|
1 |
63 |
unless defined $opts{'comment'} |
|
143
|
1 |
63 |
unless defined $opts{'variant'} |
|
154
|
1 |
63 |
if not defined $opts{'seed'} and $deterministic |
|
157
|
0 |
64 |
if delete $opts{'no_dedupe'} |
|
158
|
1 |
63 |
if $deterministic |
|
161
|
0 |
64 |
if delete $opts{'filter_undef'} |
|
163
|
0 |
64 |
if $variant > 3 or $variant < 0 |
|
166
|
0 |
64 |
if index($comment, "\000") >= 0 |
|
176
|
63 |
1 |
ref $seed ? : |
|
181
|
63 |
1 |
if ref $seed |
|
184
|
0 |
64 |
unless open my $ofh, '>', $tmp_file |
|
186
|
0 |
64 |
unless print $ofh $buf |
|
188
|
0 |
64 |
unless close $ofh |
|
190
|
0 |
64 |
unless rename $tmp_file, $ofile |
|
198
|
0 |
63 |
unless my $file = $opts{'file'} |
|
204
|
63 |
0 |
if ($self) { } |
|
225
|
0 |
63 |
if ($verbose) |
|
226
|
0 |
0 |
if (defined $variant) { } |