line |
true |
false |
branch |
49
|
1 |
0 |
if (do {
my $u = 'x';
utf8::upgrade($u);
my $e = &Scalar::Util::dualvar(0, $u);
utf8::is_utf8($e)
}) { } |
54
|
0 |
1 |
unless eval qq[\n#line 55 "/.cpan/build/POSIX-Wide-10-jnW8ZU/blib/lib/POSIX/Wide/EXTENDED_OS_ERROR.pm"\n sub FETCH {\n return Scalar::Util::dualvar\n (\$^E, POSIX::Wide::_to_wide("\$^E"));\n }\n 1;\n] |
64
|
0 |
0 |
unless eval qq[\n#line 65 "/.cpan/build/POSIX-Wide-10-jnW8ZU/blib/lib/POSIX/Wide/EXTENDED_OS_ERROR.pm"\n sub FETCH {\n my \$e = Scalar::Util::dualvar\n (\$^E, POSIX::Wide::_to_wide("\$^E"));\n Encode::_utf8_on(\$e);\n return \$e;\n }\n 1;\n] |