| line |
true |
false |
branch |
|
191
|
412 |
33 |
if (ord $char < 128) { } |
|
|
17 |
16 |
elsif ($is_utf8) { } |
|
208
|
2 |
15 |
if ($bad_chars) |
|
219
|
2 |
0 |
if $charname_bad_chars < $bad_chars |
|
236
|
438 |
7 |
if (length $replacement_phrase > 1) { } |
|
237
|
396 |
42 |
if $pos == 0 |
|
239
|
146 |
292 |
if $count > 1 |
|
243
|
16 |
422 |
$use_underscore ? : |
|
245
|
290 |
148 |
if ($sep_char) { } |
|
249
|
28 |
262 |
unless $pos == 0 |
|
254
|
30 |
260 |
unless $pos + length($to_replace) == length $str |
|
264
|
156 |
282 |
unless $sep_char |
|
270
|
2 |
5 |
if (substr($str, $pos, 1) =~ /^\p{Lu}\z/) { } |
|
281
|
396 |
413 |
if $phrase_at_start |