| line |
true |
false |
branch |
|
6
|
9 |
22 |
$#_ ? : |
|
|
9 |
9 |
if (@{$M . 'EXPORT';}) |
|
|
9 |
6 |
if not exists $$s{$_} |
|
|
3 |
18 |
unless exists $a{'default'} |
|
|
8 |
3 |
'CODE' eq $r ? : |
|
|
0 |
11 |
'ARRAY' eq $r ? : |
|
|
0 |
6 |
'HASH' eq ($r = ref $d) ? : |
|
|
4 |
10 |
exists $a{'lazy'} ? : |
|
|
4 |
8 |
unless $i |
|
|
0 |
9 |
!exists($_[0]{$n}) ? : |
|
|
5 |
3 |
$#_ ? : |
|
|
0 |
9 |
unless $#_ % 2 |
|
|
11 |
3 |
@_ == 1 ? : |
|
|
5 |
11 |
@_ == 2 && !$_[1] ? : |
|
19
|
1 |
1 |
@_ ? : |
|
31
|
0 |
0 |
if (@_) |
|
35
|
0 |
0 |
unless exists $$self{$field} |
|
44
|
3 |
9 |
if defined &{"${package}::$field";} |
|
48
|
0 |
0 |
unless (exists $$self{$field}) |
|
49
|
0 |
0 |
ref $default eq 'HASH' ? : |
|
|
0 |
0 |
ref $default eq 'ARRAY' ? : |
|
54
|
0 |
0 |
unless @_ |