| 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 |