Branch Coverage

blib/lib/String/ToIdentifier/EN.pm
Criterion Covered Total %
branch 27 28 96.4


line true false branch
196 412 33 if (ord $char < 128) { }
17 16 elsif ($is_utf8) { }
213 2 15 if ($bad_chars)
224 2 0 if $charname_bad_chars < $bad_chars
241 438 7 if (length $replacement_phrase > 1) { }
242 396 42 if $pos == 0
244 146 292 if $count > 1
248 16 422 $use_underscore ? :
250 290 148 if ($sep_char) { }
254 28 262 unless $pos == 0
259 30 260 unless $pos + length($to_replace) == length $str
269 156 282 unless $sep_char
275 2 5 if (substr($str, $pos, 1) =~ /^\p{Lu}\z/) { }
286 396 413 if $phrase_at_start