Condition Coverage

blib/lib/Lingua/EN/Inflect.pm
Criterion Covered Total %
condition 144 285 50.5


and 2 conditions

line l !l condition
1067 7664 8 $word =~ /^(?:$PL_sb_prep_dual_compound)$/i and $value = [$2, $3]

and 3 conditions

line !l l&&!r l&&r condition
75 1790 6 5 @_ == 1 and not $_[0] =~ /$classical_mode/
84 6 0 2681 @_ and not $_[0] =~ /$classical_mode/
929 0 2870 874 not $result and $word1 eq $word2
930 874 1711 1159 not $result and $word1 eq &$PL($word2)
931 2033 552 1159 not $result and &$PL($word1) eq $word2
933 3192 366 186 not $result and $word1 eq &$PL($word2)
934 3378 180 186 not $result and &$PL($word1) eq $word2
939 3444 120 0 not $result and _PL_check_plurals_N($word1, $word2)
941 3444 120 0 not $result and _PL_check_plurals_N($word2, $word1)
946 60 0 0 not $result and _PL_check_plurals_ADJ($word1, $word2, $PL)
1001 0 0 0 $word2a and _PL_check_plurals_N($word1a, $word2a) || _PL_check_plurals_N($word2a, $word1a)
1003 0 0 0 $word2b and _PL_check_plurals_N($word1a, $word2b) || _PL_check_plurals_N($word2b, $word1a)
1008 0 0 0 $word2a and _PL_check_plurals_N($word1b, $word2a) || _PL_check_plurals_N($word2a, $word1b)
1010 0 0 0 $word2b and _PL_check_plurals_N($word1b, $word2b) || _PL_check_plurals_N($word2b, $word1b)
1025 365 8618 0 not defined $count and defined $persistent_count
1045 8240 8 726 $word =~ /^($PL_sb_uninflected)$/i and not exists $PL_sb_irregular{$word}
8248 32 694 $word =~ /^($PL_sb_uninflected)$/i and not exists $PL_sb_irregular{$word} and not $word =~ /^($PL_sb_lese_lesen)$/i
1048 2405 5833 42 $classical{'herd'} and $word =~ /^($PL_sb_uninflected_herd)$/i
1062 7672 0 60 $word =~ /^(?:$PL_sb_postfix_adj)$/i and $value = $2
1073 7512 0 152 $word =~ /^(?:$PL_sb_prep_compound)$/i and $value = $2
1146 3737 0 59 $word =~ /^([A-Z].*s)$/ and $classical{'names'}
1162 3253 8 23 $word =~ /([A-Z].*y)$/ and $classical{'names'}
1181 130 3854 0 not defined $count and defined $persistent_count
1238 0 1742 0 not defined $count and defined $persistent_count
1265 132 1888 0 not defined $count and defined $persistent_count
1349 0 0 0 not defined $count and defined $persistent_count
1352 0 0 0 defined $count and not $count =~ /^($PL_count_one)$/io
1414 124 0 0 not defined $count and defined $persistent_count
1425 66 28 27 defined $opt_ref->{'words_below'} && $count < $opt_ref->{'words_below'}
1629 328 743 3883 $_[0] && $_[1]
1682 1259 0 56 @_ % 2 and require Carp
1691 798 231 230 exists $arg{'threshold'} and $num > $arg{'threshold'}
1728 192 26 857 not $group and $first
1744 976 1 52 $ord and @numchunks

or 2 conditions

line l !l condition
1621 3077 11778 $_[0] || 0
1631 11 1076 $_[2] or 0

or 3 conditions

line l !l&&r !l&&!r condition
100 0 0 0 not defined $_[1] or $_[1]
124 0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx or s/\bAN? \( ([^),]*) (, ([^)]*) )? \) /A($1, $3);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx or s/\bAN? \( ([^),]*) (, ([^)]*) )? \) /A($1, $3);/egx or s/\bNO \( ([^),]*) (, ([^)]*) )? \) /NO($1, $3);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx or s/\bAN? \( ([^),]*) (, ([^)]*) )? \) /A($1, $3);/egx or s/\bNO \( ([^),]*) (, ([^)]*) )? \) /NO($1, $3);/egx or s/\bORD \( ([^)]*) \) /&ORD($1);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx or s/\bAN? \( ([^),]*) (, ([^)]*) )? \) /A($1, $3);/egx or s/\bNO \( ([^),]*) (, ([^)]*) )? \) /NO($1, $3);/egx or s/\bORD \( ([^)]*) \) /&ORD($1);/egx or s/\bNUMWORDS \( ([^)]*) \) /NUMWORDS($1);/egx
0 0 0 s/\bPL \( ([^),]*) (, ([^)]*) )? \) /PL($1, $3);/egx or s/\bPL_N \( ([^),]*) (, ([^)]*) )? \) /PL_N($1, $3);/egx or s/\bPL_V \( ([^),]*) (, ([^)]*) )? \) /PL_V($1, $3);/egx or s/\bPL_ADJ \( ([^),]*) (, ([^)]*) )? \) /PL_ADJ($1, $3);/egx or s/\bAN? \( ([^),]*) (, ([^)]*) )? \) /A($1, $3);/egx or s/\bNO \( ([^),]*) (, ([^)]*) )? \) /NO($1, $3);/egx or s/\bORD \( ([^)]*) \) /&ORD($1);/egx or s/\bNUMWORDS \( ([^)]*) \) /NUMWORDS($1);/egx or s/\bPART_PRES \( ([^)]*) \) /PART_PRES($1);/egx
779 0 0 6 not eval "'' =~ m/$_[0]/; 1;" or $@
791 0 0 6 not eval "qq{$_[1]}; 1;" or $@
880 200 1714 0 _PL_special_adjective($word, $count) || _PL_special_verb($word, $count) || _PL_noun($word, $count)
902 376 1742 0 _PL_special_verb($word, $count) || _PL_general_verb($word, $count)
913 96 10 0 _PL_special_adjective($word, $count) || $word
918 3444 60 60 _PL_eq(@_, \&Lingua::EN::Inflect::PL_N) or _PL_eq(@_, \&Lingua::EN::Inflect::PL_V)
937 0 3564 180 $PL == \&Lingua::EN::Inflect::PL or $PL == \&Lingua::EN::Inflect::PL_N
944 0 60 3684 $PL == \&Lingua::EN::Inflect::PL or $PL == \&Lingua::EN::Inflect::PL_ADJ
964 0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i') or _PL_reg_plurals($pair, $PL_sb_C_im, 's', 'im')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i') or _PL_reg_plurals($pair, $PL_sb_C_im, 's', 'im') or _PL_reg_plurals($pair, '.*eau', 's', 'x')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i') or _PL_reg_plurals($pair, $PL_sb_C_im, 's', 'im') or _PL_reg_plurals($pair, '.*eau', 's', 'x') or _PL_reg_plurals($pair, '.*ieu', 's', 'x')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i') or _PL_reg_plurals($pair, $PL_sb_C_im, 's', 'im') or _PL_reg_plurals($pair, '.*eau', 's', 'x') or _PL_reg_plurals($pair, '.*ieu', 's', 'x') or _PL_reg_plurals($pair, '.*tri', 'xes', 'ces')
0 0 240 _PL_reg_plurals($pair, $PL_sb_U_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_C_a_ata, 'as', 'ata') or _PL_reg_plurals($pair, $PL_sb_U_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_is_ides, 'is', 'ides') or _PL_reg_plurals($pair, $PL_sb_C_a_ae, 's', 'e') or _PL_reg_plurals($pair, $PL_sb_C_en_ina, 'ens', 'ina') or _PL_reg_plurals($pair, $PL_sb_C_um_a, 'ums', 'a') or _PL_reg_plurals($pair, $PL_sb_C_us_i, 'uses', 'i') or _PL_reg_plurals($pair, $PL_sb_C_on_a, 'ons', 'a') or _PL_reg_plurals($pair, $PL_sb_C_o_i, 'os', 'i') or _PL_reg_plurals($pair, $PL_sb_C_ex_ices, 'exes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_ix_ices, 'ixes', 'ices') or _PL_reg_plurals($pair, $PL_sb_C_i, 's', 'i') or _PL_reg_plurals($pair, $PL_sb_C_im, 's', 'im') or _PL_reg_plurals($pair, '.*eau', 's', 'x') or _PL_reg_plurals($pair, '.*ieu', 's', 'x') or _PL_reg_plurals($pair, '.*tri', 'xes', 'ces') or _PL_reg_plurals($pair, '.{2,}[yia]n', 'xes', 'ges')
1001 0 0 0 _PL_check_plurals_N($word1a, $word2a) || _PL_check_plurals_N($word2a, $word1a)
1003 0 0 0 _PL_check_plurals_N($word1a, $word2b) || _PL_check_plurals_N($word2b, $word1a)
1008 0 0 0 _PL_check_plurals_N($word1b, $word2a) || _PL_check_plurals_N($word2a, $word1b)
1010 0 0 0 _PL_check_plurals_N($word1b, $word2b) || _PL_check_plurals_N($word2b, $word1b)
1030 0 6 8977 defined $count && $count =~ /^($PL_count_one)$/io || defined $count && $classical{'zero'} && $count =~ /^($PL_count_zero)$/io
1055 506 0 0 $PL_sb_irregular{$1} || $PL_sb_irregular{lc $1}
1057 0 0 0 $PL_sb_irregular{$2} || $PL_sb_irregular{lc $2}
1184 0 0 3984 defined $count && $count =~ /^($PL_count_one)$/io || defined $count && $classical{'zero'} && $count =~ /^($PL_count_zero)$/io
1241 0 0 1742 defined $count && $count =~ /^($PL_count_one)$/io || defined $count && $classical{'zero'} && $count =~ /^($PL_count_zero)$/io
1268 4 1 2015 defined $count && $count =~ /^($PL_count_one)$/io || defined $count && $classical{'zero'} && $count =~ /^($PL_count_zero)$/io
1428 48 8 65 defined $opt_ref->{'comma'} or defined $opt_ref->{'comma_every'}
1431 8 8 40 not defined $opt_ref->{'comma'} or $opt_ref->{'comma'} =~ /^\d+$/
1455 0 0 6 s/ie$/y/ or s/ue$/u/
0 0 6 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/
0 1 5 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/
1 0 5 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$//
1 0 5 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$// or s/^(are|were)$/be/
0 0 5 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$// or s/^(are|were)$/be/ or s/^(had)$/hav/
0 0 5 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$// or s/^(are|were)$/be/ or s/^(had)$/hav/ or s/(hoe)$/$1/
0 1 4 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$// or s/^(are|were)$/be/ or s/^(had)$/hav/ or s/(hoe)$/$1/ or s/([^e])e$/$1/
1 0 4 s/ie$/y/ or s/ue$/u/ or s/([auy])e$/$1/ or s/ski$/ski/ or s/[^b]i$// or s/^(are|were)$/be/ or s/^(had)$/hav/ or s/(hoe)$/$1/ or s/([^e])e$/$1/ or /er$/
1504 44 39 0 $nth{$tail % 100} || $nth{$tail % 10}
1636 2482 307 15 $_[1] || $_[2]
1638 306 6 12 $_[1] or $_[2]
1723 192 857 26 $group || $first