| line |
true |
false |
branch |
|
75
|
60 |
6 |
ref $_[0] eq 'HASH' ? : |
|
81
|
2 |
857 |
if (not exists $options->{$key}) { } |
|
84
|
62 |
795 |
if ($key eq 'output_format') |
|
86
|
1 |
61 |
unless exists $VALID_OUTPUT_FORMAT{$args{$key}} |
|
100
|
8 |
4044 |
unless defined $msg |
|
123
|
14 |
3994 |
if $rear_index > $#{$chars_ref;} |
|
125
|
4008 |
0 |
if (join('', @{$chars_ref;}[$index .. $rear_index]) =~ /^(\x{203b}\x{ff3b}\x{ff03}.*?\x{6c34}\x{6e96}(\d+\-\d+\-\d+).*?\x{ff3d})/) |
|
129
|
2004 |
2004 |
if ($self->{'78hosetsu_tekiyo'} and exists $AozoraBunko::Checkerkun::KUTENMEN_78HOSETSU_TEKIYO->{$kutenmen}) { } |
|
|
2004 |
0 |
elsif ($self->{'hosetsu_tekiyo'} and exists $AozoraBunko::Checkerkun::KUTENMEN_HOSETSU_TEKIYO->{$kutenmen}) { } |
|
131
|
1002 |
1002 |
if ($self->{'output_format'} eq 'plaintext') { } |
|
|
1002 |
0 |
elsif ($self->{'output_format'} eq 'html') { } |
|
144
|
1002 |
1002 |
if ($self->{'output_format'} eq 'plaintext') { } |
|
|
1002 |
0 |
elsif ($self->{'output_format'} eq 'html') { } |
|
166
|
4004 |
12 |
if $@ |
|
174
|
1 |
58 |
unless defined $text |
|
186
|
16 |
48 |
if ($self->{'simplesp'} and $char eq ' ' || $char eq "\x{3000}") |
|
188
|
8 |
8 |
if ($output_format eq 'plaintext') { } |
|
|
8 |
0 |
elsif ($output_format eq 'html') { } |
|
190
|
4 |
4 |
if ($char eq ' ') { } |
|
|
4 |
0 |
elsif ($char eq "\x{3000}") { } |
|
195
|
4 |
4 |
if ($char eq ' ') { } |
|
|
4 |
0 |
elsif ($char eq "\x{3000}") { } |
|
202
|
8 |
8644 |
if ($char =~ /[\x{0000}-\x{0009}\x{000B}\x{000C}\x{000E}-\x{001F}\x{007F}-\x{009F}]/) { } |
|
|
8 |
8636 |
elsif ($char =~ /\p{InHalfwidthKatakana}/) { } |
|
|
4 |
8632 |
elsif ($self->{'hansp'} and $char eq ' ') { } |
|
|
4 |
8628 |
elsif ($self->{'zensp'} and $char eq "\x{3000}") { } |
|
|
8 |
8620 |
elsif ($self->{'hanpar'} and $char eq '(' || $char eq ')') { } |
|
|
4008 |
4612 |
elsif ($char eq "\x{203b}" and $self->{'78hosetsu_tekiyo'} || $self->{'hosetsu_tekiyo'}) { } |
|
206
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
217
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
228
|
2 |
2 |
if ($output_format eq 'plaintext') { } |
|
|
2 |
0 |
elsif ($output_format eq 'html') { } |
|
239
|
2 |
2 |
if ($output_format eq 'plaintext') { } |
|
|
2 |
0 |
elsif ($output_format eq 'html') { } |
|
250
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
263
|
4008 |
0 |
if ($replace) |
|
276
|
4 |
4608 |
if ($self->{'78'} and $AozoraBunko::Checkerkun::J78->{$char}) { } |
|
|
4 |
4604 |
elsif ($self->{'jyogai'} and $AozoraBunko::Checkerkun::JYOGAI->{$char}) { } |
|
|
8 |
4596 |
elsif ($self->{'kouetsukun'} and $AozoraBunko::Checkerkun::KYUJI->{$char}) { } |
|
|
4 |
4592 |
elsif ($self->{'kouetsukun'} and $AozoraBunko::Checkerkun::ITAIJI->{$char}) { } |
|
|
8 |
4584 |
elsif ($self->{'gonin1'} and $AozoraBunko::Checkerkun::GONIN1->{$char}) { } |
|
|
8 |
4576 |
elsif ($self->{'gonin2'} and $AozoraBunko::Checkerkun::GONIN2->{$char}) { } |
|
|
8 |
4568 |
elsif ($self->{'gonin3'} and $AozoraBunko::Checkerkun::GONIN3->{$char}) { } |
|
|
4004 |
564 |
elsif ($self->{'gaiji'} and _is_gaiji($char)) { } |
|
278
|
2 |
2 |
if ($output_format eq 'plaintext') { } |
|
|
2 |
0 |
elsif ($output_format eq 'html') { } |
|
289
|
2 |
2 |
if ($output_format eq 'plaintext') { } |
|
|
2 |
0 |
elsif ($output_format eq 'html') { } |
|
300
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
311
|
2 |
2 |
if ($output_format eq 'plaintext') { } |
|
|
2 |
0 |
elsif ($output_format eq 'html') { } |
|
322
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
333
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
344
|
4 |
4 |
if ($output_format eq 'plaintext') { } |
|
|
4 |
0 |
elsif ($output_format eq 'html') { } |
|
357
|
2002 |
2002 |
if ($output_format eq 'plaintext') { } |
|
|
2002 |
0 |
elsif ($output_format eq 'html') { } |