line |
true |
false |
branch |
49
|
0 |
15 |
unless defined $key |
75
|
0 |
1 |
if ref $class |
88
|
10 |
4 |
unless exists $$allowed_keys{$class} |
103
|
0 |
0 |
if ref $class |
109
|
0 |
0 |
if exists $_[1] |
126
|
0 |
1 |
unless $key |
143
|
0 |
13 |
unless ref $self |
144
|
3 |
10 |
unless $self->exists($key) |
151
|
0 |
11 |
unless ref $self |
179
|
2 |
14 |
unless ref $self |
190
|
1 |
13 |
if ($subname =~ /^set_(.*)$/) { } |
|
2 |
11 |
elsif ($subname =~ /^get_(.*)$/) { } |
192
|
0 |
1 |
unless $class->allows_key($key) |
194
|
0 |
1 |
unless exists $_[1] |
201
|
0 |
2 |
unless $class->allows_key($key) |
208
|
2 |
9 |
unless $class->allows_key($key) |
210
|
4 |
11 |
if (exists $_[1]) { } |