line |
true |
false |
branch |
34
|
23 |
6 |
if ($arg1) |
35
|
23 |
0 |
if (ref $arg1 eq '') { } |
37
|
19 |
4 |
if ($arg2) |
43
|
19 |
4 |
if ($fields) |
53
|
19 |
10 |
if ($fields) |
71
|
0 |
57 |
if (ref $field eq '') |
75
|
0 |
57 |
if ($$self{'fields'}{$$field{'name'}}) { } |
94
|
0 |
0 |
if (not ref $field eq '') { } |
100
|
0 |
0 |
if (not $$self{'fields'}{$$field{'name'}}) { } |
111
|
0 |
0 |
if ($fields) { } |
115
|
0 |
0 |
if ($$self{'fields'}{$field}) |
136
|
0 |
0 |
if ($keys_locked) { } |
137
|
0 |
0 |
$keys_locked ? : |
148
|
0 |
0 |
if ($values_readonly) { } |
149
|
0 |
0 |
$values_readonly ? : |
161
|
2 |
21 |
if ($other->isa('DS::TypeSpec::Any')) { } |
181
|
4 |
0 |
if ($arg1) |
182
|
4 |
0 |
if (ref $arg1 eq '') { } |
184
|
4 |
0 |
if ($arg2) |
204
|
7 |
2 |
if (my $field = $$self{'fields'}{$$new_fields{$new_field}}) { } |