| line |
true |
false |
branch |
|
24
|
0 |
2 |
if exists $$option{'startmask'} |
|
25
|
1 |
1 |
unless exists $$option{'sm'} |
|
33
|
0 |
3 |
ref $v eq 'ARRAY' ? : |
|
|
5 |
3 |
ref $v eq 'HASH' ? : |
|
52
|
3 |
3 |
if (defined $option) |
|
56
|
2 |
1 |
if ($$option{'ic'}) |
|
57
|
2 |
1 |
if (exists $$option{'alias'}) |
|
59
|
2 |
0 |
if (exists casealias()->{$$option{'alias'}}) { } |
|
|
0 |
0 |
elsif (defined $$option{'alias'}) { } |
|
65
|
0 |
0 |
unless ref $$option{'alias'} eq 'CODE' |
|
73
|
2 |
4 |
unless defined *{$caller . '::getmask';} |
|
78
|
0 |
6 |
if (exists $$option{'handle'}) { } |
|
83
|
0 |
0 |
ref $refhandle ? : |
|
|
0 |
0 |
if ($handle_isnew = ref $refhandle ? ref $$refhandle ne $class : !defined(*{$caller . '::' . $refhandle;})) { } |
|
91
|
0 |
0 |
if ($$option{'default'} and exists $pkgDefaultHandle{$caller}) |
|
100
|
0 |
0 |
if (ref $refhandle) { } |
|
115
|
0 |
0 |
if (ref $refhandle) { } |
|
129
|
2 |
4 |
if ($handle_isnew = !exists($pkgDefaultHandle{$caller})) { } |
|
141
|
4 |
2 |
unless ($handle_isnew) |
|
145
|
1 |
3 |
if (exists $$option{'sm'}) |
|
152
|
0 |
6 |
unless @_ |
|
153
|
1 |
5 |
$_[0] =~ qr/\A\d+\Z/ ? : |
|
158
|
0 |
22 |
if (exists ${$caller . '::';}{$flagname}) { } |
|
167
|
0 |
0 |
$context == $handle ? : |
|
176
|
22 |
0 |
defined $alias ? : |
|
186
|
0 |
13 |
ref $cand ? : |
|
187
|
0 |
13 |
unless defined $handle |
|
192
|
13 |
0 |
defined $alias ? : |
|
195
|
30 |
2 |
if (exists $$handle{'flagmap'}{$v}) { } |