| line |
true |
false |
branch |
|
27
|
102 |
155 |
if $caller->can('t')
|
|
32
|
0 |
1041 |
unless &_STRINGLIKE($name)
|
|
36
|
0 |
1041 |
unless exists $types->{$name}
|
|
40
|
1016 |
25 |
unless @_
|
|
44
|
0 |
25 |
unless $found->can('parameterize')
|
|
65
|
1866 |
0 |
if &_STRING($_[0])
|
|
67
|
0 |
0 |
if &blessed($_[0]) and overload::Method($_[0], '""') and length "$_[0]"
|
|
77
|
1866 |
0 |
defined $_[0] && !ref($_[0]) && length $_[0] ? :
|
|
81
|
29 |
0 |
if ($] >= 5.01 and eval {
|
|
98
|
0 |
78 |
if exists $stash->{'ISA'}
|
|
99
|
2 |
76 |
if exists $stash->{'VERSION'}
|
|
105
|
23 |
0 |
ref \$globref eq 'GLOB' ? :
|
|
|
21 |
2 |
if ref \$globref eq 'GLOB' ? *{$globref;}{'CODE'} : ref $globref
|