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 |