| line |
true |
false |
branch |
|
23
|
0 |
230 |
unless &Scalar::Util::blessed($_[0]) |
|
24
|
86 |
144 |
if $#_ |
|
|
0 |
149 |
unless &Scalar::Util::blessed($_[0]) |
|
25
|
63 |
86 |
if $#_ |
|
|
0 |
237 |
unless &Scalar::Util::blessed($_[0]) |
|
26
|
2 |
235 |
if $#_ |
|
|
0 |
103 |
unless &Scalar::Util::blessed($_[0]) |
|
27
|
18 |
85 |
if $#_ |
|
|
0 |
88 |
unless &Scalar::Util::blessed($_[0]) |
|
28
|
0 |
88 |
if $#_ |
|
|
0 |
148 |
unless &Scalar::Util::blessed($_[0]) |
|
29
|
62 |
86 |
if $#_ |
|
|
0 |
84 |
unless &Scalar::Util::blessed($_[0]) |
|
30
|
0 |
84 |
if $#_ |
|
|
0 |
85 |
unless &Scalar::Util::blessed($_[0]) |
|
31
|
1 |
84 |
if $#_ |
|
|
0 |
86 |
unless &Scalar::Util::blessed($_[0]) |
|
32
|
1 |
85 |
if $#_ |
|
|
0 |
80 |
unless &Scalar::Util::blessed($_[0]) |
|
33
|
0 |
80 |
if $#_ |
|
34
|
0 |
238 |
unless &Scalar::Util::blessed($_[0]) |
|
35
|
2 |
236 |
if $#_ |
|
37
|
0 |
668 |
unless &Scalar::Util::blessed($_[0]) |
|
38
|
0 |
668 |
if $#_ |
|
39
|
0 |
86 |
unless &Scalar::Util::blessed($_[0]) |
|
40
|
6 |
80 |
if $#_ |
|
|
0 |
80 |
unless &Scalar::Util::blessed($_[0]) |
|
41
|
0 |
80 |
if $#_ |
|
|
0 |
86 |
unless &Scalar::Util::blessed($_[0]) |
|
42
|
6 |
80 |
if $#_ |
|
|
0 |
80 |
unless &Scalar::Util::blessed($_[0]) |
|
43
|
0 |
80 |
if $#_ |
|
|
0 |
84 |
unless &Scalar::Util::blessed($_[0]) |
|
44
|
0 |
84 |
if $#_ |
|
|
0 |
80 |
unless &Scalar::Util::blessed($_[0]) |
|
45
|
0 |
80 |
if $#_ |
|
|
0 |
80 |
unless &Scalar::Util::blessed($_[0]) |
|
46
|
0 |
80 |
if $#_ |
|
58
|
81 |
192 |
if (@_ or not defined $self->{'uuid'}) |
|
59
|
1 |
80 |
@_ % 2 == 1 ? : |
|
62
|
1 |
80 |
if defined $old_uuid |
|
73
|
12 |
818 |
if (@$entries and not &blessed($entries->[0])) |
|
93
|
282 |
53 |
unless (@entries) |
|
95
|
1 |
311 |
if $searching and not $group->effective_enable_searching |
|
96
|
0 |
311 |
if $auto_type and not $group->effective_enable_auto_type |
|
98
|
1 |
310 |
if $auto_type |
|
99
|
220 |
91 |
if $history |
|
100
|
100 |
211 |
if @entries |
|
110
|
5 |
24 |
@_ % 2 == 1 ? : |
|
117
|
29 |
0 |
if $kdbx |
|
126
|
4 |
0 |
XXX ? : |
|
131
|
0 |
4 |
if $uuid ne $object->uuid |
|
133
|
3 |
1 |
if $args{'signal'} // 1 |
|
144
|
7 |
1200 |
if (@$groups and not &blessed($groups->[0])) |
|
156
|
444 |
0 |
$args{'inclusive'} // 1 ? : |
|
159
|
4 |
440 |
if ($algo eq 2) { } |
|
|
3 |
437 |
elsif ($algo eq 1) { } |
|
162
|
4 |
17 |
unless my $next = shift @groups |
|
163
|
9 |
8 |
unless ($visited{&Hash::Util::FieldHash::id($next)}++) |
|
175
|
3 |
12 |
unless my $next = shift @groups |
|
181
|
393 |
632 |
unless my $next = shift @groups |
|
192
|
1 |
18 |
@_ % 2 == 1 ? : |
|
199
|
19 |
0 |
if $kdbx |
|
208
|
3 |
0 |
XXX ? : |
|
213
|
0 |
3 |
if $uuid ne $object->uuid |
|
215
|
3 |
0 |
if $args{'signal'} // 1 |
|
235
|
247 |
37 |
unless (@entries) |
|
237
|
0 |
152 |
if $searching and not $group->effective_enable_searching |
|
238
|
0 |
152 |
if $auto_type and not $group->effective_enable_auto_type |
|
240
|
0 |
152 |
if $auto_type |
|
241
|
2 |
150 |
if $history |
|
253
|
3 |
1 |
if ($obj->isa('File::KDBX::Entry')) { } |
|
|
1 |
0 |
elsif ($obj->isa('File::KDBX::Group')) { } |
|
266
|
3 |
4 |
if $blessed and $object->isa("File::KDBX::Group") |
|
267
|
4 |
0 |
if $blessed and $object->isa("File::KDBX::Entry") |
|
277
|
0 |
0 |
if defined $sequence |
|
279
|
0 |
0 |
unless my $parent = $self->group |
|
287
|
0 |
1 |
if defined $enabled |
|
289
|
1 |
0 |
unless my $parent = $self->group |
|
297
|
1 |
1 |
if defined $enabled |
|
299
|
1 |
0 |
unless my $parent = $self->group |
|
314
|
0 |
8 |
unless my $kdbx = eval {
do {
$self->kdbx
}
} |
|
321
|
0 |
5 |
unless my $kdbx = eval {
do {
$self->kdbx
}
} |
|
329
|
0 |
0 |
unless my $kdbx = eval {
do {
$self->kdbx
}
} |
|
337
|
0 |
0 |
unless my $kdbx = eval {
do {
$self->kdbx
}
} |
|
345
|
0 |
0 |
unless my $kdbx = eval {
do {
$self->kdbx
}
} |
|
353
|
1 |
2 |
if $self->is_root |
|
354
|
0 |
2 |
unless my $lineage = $self->lineage |
|
367
|
0 |
0 |
$_[0]->is_root ? : |