Branch Coverage

blib/lib/Test/utf8.pm
Criterion Covered Total %
branch 12 12 100.0


line true false branch
103 5 7 unless (&Encode::is_utf8($string))
109 4 3 if (_ok(!defined($pos), $name))
128 4 3 if $pos == length $string
210 1 1 if (&Encode::is_utf8($string)) { }
253 2 1 unless $string =~ /([^\x{00}-\x{7f}])/
277 3 1 unless $string =~ /([^\x{00}-\x{ff}])/