line |
true |
false |
branch |
134
|
0 |
165 |
if ($meaning =~ /\(kokuji\)/) { } |
148
|
1431 |
288 |
if ($entry =~ /(^[A-Z]+)(.*)/) { } |
149
|
30 |
1401 |
if ($entry eq 'T1') |
155
|
1401 |
0 |
if ($codes{$field}) { } |
156
|
429 |
972 |
if ($has_dupes{$field}) { } |
160
|
972 |
0 |
if (not $values{$field}) { } |
177
|
90 |
198 |
if ($in_nanori) { } |
182
|
123 |
75 |
if ($entry =~ /^([\x{3042}-\x{3093}\.-]+)$/) { } |
|
75 |
0 |
elsif ($entry =~ /^([\x{30a2}-\x{30f3}\x{30fc}\.-]+)$/) { } |
192
|
0 |
1689 |
if ($AUTHOR and not $found) |
197
|
54 |
3 |
if ($values{'MP'}) |
200
|
54 |
3 |
if ($values{'MN'}) |
203
|
54 |
3 |
if ($values{'MN'} or $values{'MP'}) |
206
|
57 |
0 |
if (@english) |
209
|
57 |
0 |
if (@onyomi) |
212
|
57 |
0 |
if (@kunyomi) |
215
|
30 |
27 |
if (@nanori) |
223
|
12 |
45 |
if $values{'C'} |
241
|
0 |
0 |
if $radval |
243
|
0 |
0 |
if $strokeval |
245
|
0 |
0 |
if $jisval |
258
|
0 |
0 |
if $strokeval |
260
|
0 |
0 |
if $radval |
262
|
0 |
0 |
if $jisval |
276
|
0 |
0 |
if ($valuea->{'G'}) { } |
|
0 |
0 |
elsif ($valueb->{'G'}) { } |
277
|
0 |
0 |
if ($valueb->{'G'}) { } |
279
|
0 |
0 |
if $gradeval |
289
|
0 |
0 |
if $strokeval |
291
|
0 |
0 |
if $jisval |
298
|
0 |
3 |
unless ($file_name) |
305
|
0 |
3 |
unless (-f $file_name) |
309
|
0 |
3 |
unless open $KANJIDIC, '<:encoding(euc-jp)', $file_name |
313
|
3 |
57 |
if /^\#/ |
370
|
0 |
0 |
unless ($kanjidic->{'indices'}) |
380
|
0 |
0 |
unless ($kanjidic->{'order'}) |
400
|
4 |
15 |
unless $kgrade |
401
|
1 |
14 |
if $kgrade == $grade |