| line |
true |
false |
branch |
|
118
|
1 |
2 |
unless (defined $Default) |
|
122
|
0 |
3 |
defined $fh ? : |
|
128
|
0 |
30 |
unless exists $$keys{$key} |
|
181
|
9 |
88 |
unless (ref $self) |
|
192
|
0 |
207 |
if ($debug) |
|
197
|
207 |
0 |
unless ($$self{'NO_SHIFT_CAPS'}) |
|
202
|
61 |
146 |
if ($char ne lc $char) { } |
|
|
84 |
62 |
elsif ($case) { } |
|
203
|
35 |
26 |
if ($case) |
|
204
|
3 |
32 |
unless ($shift or $start) |
|
211
|
10 |
74 |
if (not $$self{'NO_SENTENCE_CAPS'} and $start and $char =~ /[\w]/) |
|
214
|
2 |
82 |
if ($shift and $char =~ /[\w]/) |
|
220
|
207 |
0 |
unless ($$self{'NO_SENTENCE_CAPS'}) |
|
221
|
185 |
22 |
if $char =~ /[\w]/ |
|
222
|
4 |
203 |
if $char =~ /[\.\!\?]/ |
|
226
|
0 |
207 |
unless exists $$self{'CHAR'}{$char} |
|
229
|
18 |
189 |
if $$self{'CHAR'}{$char}[0] eq ($$self{'CHAR'}{$last}[0] || '') |
|
235
|
0 |
97 |
if ($debug) |