| line |
true |
false |
branch |
|
15
|
25 |
196 |
if $sym =~ /^[A-Z]+$/ |
|
17
|
10 |
186 |
if (defined *{$from . '::' . $sym;}{'CODE'}) |
|
20
|
196 |
0 |
if (defined *{$from . '::' . $sym;}{'SCALAR'}) |
|
23
|
59 |
137 |
if (defined *{$from . '::' . $sym;}{'HASH'}) |
|
26
|
9 |
187 |
if (defined *{$from . '::' . $sym;}{'ARRAY'}) |
|
30
|
15 |
181 |
if (@args) { } |
|
33
|
10 |
12 |
if ($arg eq 'OK') { } |
|
42
|
5 |
10 |
if ($taged and not $oked) |
|
55
|
2 |
8 |
if $sym =~ /^[A-Z]+$/ |
|
56
|
5 |
3 |
if (defined *{$from . '::' . $sym;}{'CODE'}) |
|
59
|
8 |
0 |
if (defined *{$from . '::' . $sym;}{'SCALAR'}) |
|
62
|
2 |
6 |
if (defined *{$from . '::' . $sym;}{'HASH'}) |
|
65
|
2 |
6 |
if (defined *{$from . '::' . $sym;}{'ARRAY'}) |
|
73
|
44 |
247 |
if ($Already{$pkg}{$name}) { } |