| line |
true |
false |
branch |
|
50
|
1 |
0 |
if (do {
my $u = 'x';
utf8::upgrade($u);
my $e = &Scalar::Util::dualvar(0, $u);
utf8::is_utf8($e)
}) { } |
|
55
|
0 |
1 |
unless eval qq[\n#line 56 "/.cpan/build/I18N-Langinfo-Wide-8-09m9hb/blib/lib/POSIX/Wide/EXTENDED_OS_ERROR.pm"\n sub FETCH {\n return Scalar::Util::dualvar\n (\$^E, I18N::Langinfo::Wide::to_wide("\$^E"));\n }\n 1;\n] |
|
65
|
0 |
0 |
unless eval qq[\n#line 66 "/.cpan/build/I18N-Langinfo-Wide-8-09m9hb/blib/lib/POSIX/Wide/EXTENDED_OS_ERROR.pm"\n sub FETCH {\n my \$e = Scalar::Util::dualvar\n (\$^E, I18N::Langinfo::Wide::to_wide("\$^E"));\n Encode::_utf8_on(\$e);\n return \$e;\n }\n 1;\n] |