line |
true |
false |
branch |
45
|
2 |
29 |
unless ref $arg_ref eq 'HASH' |
48
|
0 |
29 |
unless $name |
64
|
68 |
106 |
if (defined $contents) |
65
|
29 |
39 |
if ($method eq 'scalar') |
69
|
17 |
12 |
unless defined $contents |
77
|
145 |
12 |
unless exists $arg_ref->{$method} |
81
|
7 |
5 |
if (defined $override) |
93
|
14 |
4 |
if (defined $value) |
98
|
18 |
0 |
!ref($return_value) ? : |
|
0 |
18 |
!defined($return_value) ? : |
105
|
19 |
5 |
if (defined $value) { } |
106
|
1 |
18 |
wantarray ? : |
110
|
1 |
4 |
wantarray ? : |
116
|
18 |
5 |
if (defined $value) { } |
117
|
1 |
17 |
wantarray ? : |
121
|
1 |
4 |
wantarray ? : |
127
|
13 |
4 |
if (defined $value) { } |
137
|
14 |
50 |
if ($slot_to_be_replaced eq 'SCALAR') { } |
144
|
0 |
0 |
unless &reftype($value) eq $slot_to_be_replaced or &reftype($value) eq 'REF' and $slot_to_be_replaced eq 'SCALAR' |
167
|
8 |
0 |
if (defined $slot_to_delete) |
177
|
0 |
8 |
unless $package |
187
|
0 |
8 |
unless defined $slot_to_delete |
190
|
8 |
40 |
if $method eq $slot_to_delete |
194
|
6 |
34 |
if $method eq 'scalar' |
201
|
15 |
25 |
if defined $storage_ref->{$self} |