Branch Coverage

blib/lib/CodeGen/Cpppp/AntiCharacter.pm
Criterion Covered Total %
branch 7 10 70.0


line true false branch
17 0 66 unless ref $negate eq "Regexp"
23 15 0 if ($_[2]) { }
27 1 14 if (not length $tmp or $tmp =~ /^$skip\Z/u)
31 14 0 if ($tmp =~ /($negate)$skip\Z/u)
34 1 13 if ($-[1] == 0 and (substr($_[1], 0, 1) . $_[1]) =~ /^($negate)$skip\Z/u)