| line |
true |
false |
branch |
|
45
|
15 |
15 |
if (defined $format) { } |
|
|
0 |
15 |
elsif (not defined $version) { } |
|
|
0 |
15 |
elsif ($self->kdbx->sig2 == 3041655653) { } |
|
|
15 |
0 |
elsif (&looks_like_number($version)) { } |
|
61
|
0 |
15 |
if ($major == 131072) |
|
65
|
0 |
15 |
unless $subclass = $subclasses{$major} |
|
87
|
0 |
2 |
if &openhandle($dst) |
|
88
|
0 |
2 |
if XXX |
|
89
|
2 |
0 |
if defined $dst and not XXX |
|
96
|
9 |
4 |
XXX ? : |
|
97
|
0 |
13 |
@_ % 2 == 0 ? : |
|
107
|
0 |
13 |
unless open my $fh, ">", $ref |
|
109
|
0 |
13 |
unless ref $self |
|
119
|
1 |
1 |
@_ % 2 == 0 ? : |
|
130
|
1 |
1 |
if ($atomic) { } |
|
133
|
0 |
1 |
if (not $fh or my $err = $@) |
|
141
|
0 |
1 |
unless open $fh, ">:raw", $filepath |
|
145
|
0 |
2 |
unless ref $self |
|
152
|
1 |
1 |
if ($filepath_temp) |
|
153
|
0 |
0 |
defined $m ? : |
|
156
|
1 |
0 |
if defined $mode |
|
158
|
0 |
1 |
unless rename $filepath_temp, $filepath |
|
169
|
0 |
0 |
@_ % 2 == 0 ? : |
|
171
|
0 |
0 |
if $fh eq "-" |
|
176
|
0 |
0 |
unless ref $self |
|
183
|
0 |
456 |
unless ref $self |
|
184
|
0 |
456 |
if @_ |
|
186
|
0 |
15 |
unless &Scalar::Util::blessed($_[0]) |
|
187
|
0 |
15 |
unless &Scalar::Util::blessed($_[0]) |
|
188
|
0 |
7 |
unless &Scalar::Util::blessed($_[0]) |
|
189
|
0 |
15 |
unless &Scalar::Util::blessed($_[0]) |
|
194
|
0 |
0 |
unless $_[0]{'fh'} |
|
204
|
7 |
8 |
if ($kdbx->version < $min_version and $self->allow_upgrade) |
|
211
|
15 |
0 |
if (ref($self) =~ /::(?:KDB|V[34])$/) |
|
212
|
0 |
0 |
$kdbx->key ? : |
|
213
|
0 |
15 |
unless defined $key |
|
232
|
8 |
7 |
if ($kdbx->version < 262144) |
|
240
|
14 |
1 |
if $self->randomize_seeds |
|
249
|
0 |
15 |
unless $kdbx->sig1 == 2594363651 |
|
250
|
0 |
15 |
if $kdbx->version < 131072 or 262145 < $kdbx->version |
|
256
|
0 |
15 |
unless $fh->print($buf) |