| line |
true |
false |
branch |
|
77
|
16 |
18 |
unless ($class eq $CLASS) |
|
84
|
11 |
23 |
if (@_) { } |
|
97
|
10 |
24 |
if (exists $args{'declare'}) |
|
100
|
9 |
1 |
unless defined &{$callpkg . "::declare";} |
|
103
|
31 |
3 |
if (exists $args{'qv'}) |
|
106
|
27 |
4 |
unless defined &{$callpkg . "::qv";} |
|
109
|
23 |
11 |
if (exists $args{'UNIVERSAL::VERSION'}) |
|
115
|
0 |
34 |
if (exists $args{'VERSION'}) |
|
119
|
1 |
33 |
if (exists $args{'is_strict'}) |
|
121
|
1 |
0 |
unless defined &{$callpkg . "::is_strict";} |
|
124
|
1 |
33 |
if (exists $args{'is_lax'}) |
|
126
|
1 |
0 |
unless defined &{$callpkg . "::is_lax";} |