| line |
true |
false |
branch |
|
33
|
102 |
159 |
if *{$caller . "::t";}{"CODE"}
|
|
39
|
0 |
1061 |
unless &_STRINGLIKE($name)
|
|
43
|
0 |
1061 |
unless exists $types->{$name}
|
|
47
|
1036 |
25 |
unless @_
|
|
51
|
0 |
25 |
unless $found->can("parameterize")
|
|
72
|
1905 |
0 |
if &_STRING($_[0])
|
|
74
|
0 |
0 |
if &blessed($_[0]) and overload::Method($_[0], "\"\"") and length "$_[0]"
|
|
84
|
1905 |
0 |
defined $_[0] && !ref($_[0]) && length $_[0] ? :
|
|
88
|
30 |
0 |
if ($] >= 5.01 and eval {
|
|
105
|
0 |
78 |
if exists $stash->{'ISA'}
|
|
106
|
2 |
76 |
if exists $stash->{'VERSION'}
|
|
112
|
30 |
0 |
ref \$globref eq 'GLOB' ? :
|
|
|
21 |
9 |
if ref \$globref eq "GLOB" ? *{$globref;}{"CODE"} : ref $globref
|