line |
true |
false |
branch |
47
|
2 |
10 |
if (my $ref = ref $arg) { } |
51
|
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') { } |
73
|
7 |
3 |
if (_can_exec($arg)) { } |
74
|
1 |
6 |
$FLAG_STR ? : |
82
|
10 |
0 |
wantarray ? : |
88
|
0 |
10 |
unless defined $value |
92
|
1 |
9 |
$flags & 12288 && !($flags & 16384) ? : |
98
|
0 |
10 |
unless defined $arg |
99
|
1 |
9 |
if $DO_NOT_PROCESS_NUMERIC_VALUE and _is_number($arg) |
100
|
6 |
3 |
if &Encode::is_utf8($arg) |
101
|
1 |
0 |
unless $CHECK_ALREADY_ENCODED or &Encode::is_utf8($arg) |