line |
true |
false |
branch |
50
|
2 |
11 |
if (my $ref = ref $arg) { } |
54
|
0 |
2 |
if (defined($proto = $seen->{$refaddr})) { } |
|
0 |
2 |
elsif ($ref eq 'ARRAY') { } |
|
2 |
0 |
elsif ($ref eq 'HASH') { } |
|
0 |
0 |
elsif ($ref eq 'REF' or $ref eq 'SCALAR') { } |
76
|
8 |
3 |
if (_can_exec($arg)) { } |
77
|
1 |
7 |
$FLAG_STR ? : |
85
|
11 |
0 |
wantarray ? : |
91
|
1 |
7 |
if (ref $BEFORE_HOOK eq 'CODE') |
97
|
1 |
7 |
if (ref $AFTER_HOOK eq 'CODE') |
107
|
0 |
11 |
unless defined $value |
111
|
1 |
10 |
$flags & 12288 && !($flags & 16384) ? : |
117
|
0 |
11 |
unless defined $arg |
118
|
1 |
10 |
if $DO_NOT_PROCESS_NUMERIC_VALUE and _is_number($arg) |
119
|
7 |
3 |
if &Encode::is_utf8($arg) |
120
|
1 |
0 |
unless $CHECK_ALREADY_ENCODED or &Encode::is_utf8($arg) |