| line |
true |
false |
branch |
|
16
|
1 |
26 |
if (ref $proto) { } |
|
|
25 |
1 |
elsif ($proto) { } |
|
30
|
22 |
5 |
if ($#_ != -1) |
|
42
|
1 |
1 |
$self->{$package} ? : |
|
54
|
2 |
2 |
$self->{$package} ? : |
|
68
|
22 |
1 |
$self->{$package} ? : |
|
83
|
2 |
2 |
$self->{$package} ? : |
|
89
|
2 |
2 |
unless (exists $vars->{'-legal_parms'}{$parmname}) |
|
104
|
3 |
3 |
$self->{$package} ? : |
|
117
|
16 |
4 |
if ($#_ == 0) { } |
|
|
2 |
2 |
elsif ($#_ > 0) { } |
|
126
|
10 |
10 |
$self->{$package} ? : |
|
132
|
2 |
26 |
unless (exists $vars->{'-legal_parms'}{$keyname}) |
|
149
|
2 |
2 |
$self->{$package} ? : |
|
153
|
2 |
2 |
unless (exists $vars->{'-legal_parms'}{$keyname}) |
|
167
|
2 |
22 |
if ($#_ == -1) |
|
173
|
11 |
11 |
$self->{$package} ? : |
|
178
|
6 |
24 |
unless (exists $vars->{'-parm_values'}{$keyname}) |
|
184
|
2 |
14 |
if (wantarray) |