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 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]