line |
true |
false |
branch |
49
|
41 |
97 |
$ref eq 'REF' ? : |
52
|
0 |
138 |
if not $direction or $direction ne 'input' and $direction ne 'output' |
56
|
96 |
42 |
if ($ref eq 'SCALAR') { } |
|
0 |
42 |
elsif ($ref eq 'ARRAY') { } |
|
1 |
41 |
elsif ($ref eq 'HASH') { } |
|
41 |
0 |
elsif ($ref eq 'REF') { } |
59
|
96 |
0 |
unless $skip_latin |
62
|
46 |
50 |
if ($direction eq 'output') { } |
63
|
46 |
0 |
if defined ${$obj;} and utf8::is_utf8(${$obj;}) |
66
|
2 |
48 |
if defined ${$obj;} and not utf8::is_utf8(${$obj;}) |
84
|
12 |
29 |
if ($obj_ref eq 'ARRAY') { } |
|
29 |
0 |
elsif ($obj_ref eq 'HASH') { } |
105
|
137 |
1 |
$ref eq 'REF' || $ref eq 'SCALAR' ? : |