blib/lib/CodeGen/Cpppp/AntiCharacter.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 10 | 70.0 |
line | true | false | branch |
---|---|---|---|
12 | 0 | 46 | unless ref $negate eq "Regexp" |
18 | 15 | 0 | if ($_[2]) { } |
22 | 1 | 14 | if (not length $tmp or $tmp =~ /^$skip\Z/u) |
26 | 14 | 0 | if ($tmp =~ /($negate)$skip\Z/u) |
29 | 1 | 13 | if ($-[1] == 0 and (substr($_[1], 0, 1) . $_[1]) =~ /^($negate)$skip\Z/u) |