Branch Coverage

blib/lib/POSIX/Wide/EXTENDED_OS_ERROR.pm
Criterion Covered Total %
branch 2 6 33.3


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 "\n#line 55 \"/root/.cpan/build/POSIX-Wide-12-0/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 "\n#line 65 \"/root/.cpan/build/POSIX-Wide-12-0/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"