line |
true |
false |
branch |
44
|
0 |
6 |
if defined $args->{'-package'} |
46
|
0 |
2 |
if defined $default and $args->{'-weak'} |
47
|
0 |
6 |
if defined &{"${package}::$field";} |
48
|
0 |
6 |
if $args->{'-weak'} |
49
|
1 |
4 |
ref $default eq 'HASH' && !keys(%$default) ? : |
|
1 |
5 |
ref $default eq 'ARRAY' && !@$default ? : |
57
|
2 |
4 |
if ($args->{'-init'}) |
58
|
0 |
2 |
if ($args->{'-weak'}) { } |
64
|
2 |
4 |
if defined $default |
69
|
0 |
6 |
if $args->{'-weak'} |
72
|
1 |
0 |
unless $#_ > 0 or defined $_[0]{'x'} |
|
1 |
0 |
unless $#_ > 0 |
73
|
0 |
6 |
if $@ |
79
|
2 |
4 |
if defined wantarray |
100
|
0 |
1 |
if defined $args->{'-package'} |
102
|
0 |
1 |
if defined &{"${package}::$field";} |
113
|
0 |
12 |
if (defined $elem and defined $booleans{$elem}) { } |
|
2 |
10 |
elsif (defined $elem and defined $pairs{$elem} and @_) { } |
114
|
0 |
0 |
@_ && $_[0] =~ /^[01]$/ ? : |
125
|
7 |
0 |
wantarray ? : |