| line |
true |
false |
branch |
|
85
|
0 |
6 |
unless my $type = ref $self |
|
86
|
0 |
6 |
if $$self{'_DEBUG'} or $Debugging |
|
93
|
0 |
6 |
if $method eq 'DESTROY' |
|
97
|
0 |
6 |
unless (exists $$self{'_PERMITTED'}{$name}) |
|
101
|
0 |
0 |
defined $_[0] ? : |
|
|
0 |
6 |
if $$self{'_DEBUG'} |
|
104
|
6 |
0 |
if ($method =~ /_L$/) { } |
|
|
0 |
0 |
elsif ($method =~ /_L_ADD$/) { } |
|
|
0 |
0 |
elsif ($method =~ /_H$/) { } |
|
|
0 |
0 |
elsif ($method =~ /_H_ADD$/) { } |
|
|
0 |
0 |
elsif ($method =~ /_H_BYNAME$/) { } |
|
105
|
1 |
5 |
if $_[0] |
|
106
|
6 |
0 |
defined $$self{$name} ? : |
|
108
|
0 |
0 |
if $$self{'_DEBUG'} |
|
110
|
0 |
0 |
defined $$self{$name} ? : |
|
112
|
0 |
0 |
if $_[0] |
|
113
|
0 |
0 |
defined $$self{$name} ? : |
|
116
|
0 |
0 |
defined $$self{$name} ? : |
|
118
|
0 |
0 |
if $$self{'_DEBUG'} |
|
119
|
0 |
0 |
defined $$self{$name} ? : |
|
122
|
0 |
0 |
@_ ? : |
|
137
|
0 |
0 |
unless @_ == 1 |
|
139
|
0 |
0 |
if (ref $self) { } |