line |
true |
false |
branch |
19
|
1 |
12 |
if ($kana eq $n) |
22
|
11 |
1 |
if (chouon($kana, $n)) |
24
|
10 |
1 |
if ($gotcha) |
45
|
1 |
10 |
if ($edits =~ /ii|dd|rr/) |
50
|
0 |
1 |
if ($debug) |
60
|
0 |
10 |
if ($debug) |
74
|
0 |
62 |
if ($debug) |
77
|
6 |
56 |
if ($edit eq 'r') { } |
|
5 |
51 |
elsif ($edit eq 'd') { } |
|
0 |
51 |
elsif ($edit eq 'i') { } |
|
51 |
0 |
elsif ($edit eq 'k') { } |
83
|
0 |
6 |
if ($debug) |
86
|
3 |
3 |
if ($k =~ /[\x{30fc}\x{30a3}\x{30a4}]/ and $q =~ /[\x{30fc}\x{30a3}\x{30a4}]/) |
91
|
2 |
1 |
if (ends_in_e(\@kana, $i)) |
94
|
3 |
0 |
if ($k eq "\x{30fc}" and $q eq "\x{30a4}" or $q eq "\x{30fc}" and $k eq "\x{30a4}") |
96
|
1 |
2 |
if (ends_in_i(\@kana, $i)) |
101
|
1 |
5 |
if ($k =~ /[\x{30fc}\x{30c3}]/ and $q =~ /[\x{30fc}\x{30c3}]/) |
108
|
2 |
4 |
if ($k eq "\x{30fc}" and $q eq "\x{30a6}" or $q eq "\x{30fc}" and $k eq "\x{30a6}") |
110
|
2 |
0 |
if (ends_in_ou(\@kana, $i)) |
127
|
3 |
0 |
if ($k eq "\x{30fc}" or $k eq "\x{30fb}" or $k eq "\x{30c3}") |
135
|
5 |
0 |
if ($j < scalar @kana) |
137
|
2 |
3 |
if ($q =~ /[\x{30fc}\x{30a3}\x{30a4}]/) |
138
|
0 |
2 |
if (ends_in_e(\@kana, $i)) |
151
|
0 |
0 |
if ($k eq "\x{30fc}" or $k eq "\x{30fb}" or $k eq "\x{30c3}") |
172
|
0 |
10 |
if ($i != scalar @kana) |
175
|
0 |
10 |
if ($j != scalar @nkana) |
187
|
5 |
0 |
if ($i >= 1) |
190
|
2 |
3 |
if ($prev =~ /e$/) |
203
|
2 |
0 |
if ($i >= 1) |
206
|
2 |
0 |
if ($prev =~ /[ou]$/) |
218
|
3 |
0 |
if ($i >= 1) |
221
|
1 |
2 |
if ($prev =~ /i$/) |
238
|
1 |
11 |
if ($mismatch) |
242
|
0 |
11 |
if ($mismatch) |
245
|
11 |
0 |
if ($found) |
270
|
111 |
18 |
if $xa->{$k} |
271
|
5 |
1 |
if ($k eq "\x{30fc}" or $k eq "\x{30a4}" or $k eq "\x{30a3}" or $k eq "\x{30fb}" or $k eq "\x{30c3}" or $k eq "\x{30a6}") |
282
|
16 |
6 |
if ($ok) |