| line |
true |
false |
branch |
|
172
|
0 |
0 |
$1 eq uc $1 ? : |
|
211
|
0 |
1824 |
unless (exists $Text::Capitalize::defaults_capitalize_title{$_}) |
|
239
|
12 |
1218 |
if ($2 ne '' or $1 or $3 or $4 ne '') |
|
254
|
1335 |
1335 |
unless ($keep_ws) |
|
255
|
1020 |
315 |
if length $spc > 0 |
|
259
|
258 |
2412 |
if $keep_mixups and $word =~ /[[:upper:]]/ |
|
262
|
40 |
2372 |
if $keep_acronyms and $word =~ /^[[:upper:]]+$/ |
|
265
|
10 |
2362 |
if ($word =~ /^[dl]'/) |
|
270
|
6 |
4 |
if ($i == $first or $i == $last) |
|
277
|
1070 |
1292 |
if ($i == $first or $i == $last) |
|
283
|
496 |
796 |
if ($word =~ /$exception_rule/) { } |
|
299
|
228 |
228 |
unless ($keep_ws) |
|
377
|
1191 |
1256 |
if ($uppity) { } |
|
405
|
1243 |
1204 |
if ($uppity) { } |
|
433
|
0 |
0 |
if /\Q$word\E/i |
|
439
|
0 |
0 |
if ($uppity) { } |