Condition Coverage

blib/lib/Lingua/EN/Inflect/Phrase.pm
Criterion Covered Total %
condition 56 65 86.1


and 3 conditions

line !l l&&!r l&&r condition
105 224 161 1 $want_singular and lc $noun eq 'aliases'
224 160 1 $want_singular and lc $noun eq 'statuses'
158 220 2 $want_plural and lc $noun eq 'two'
124 158 160 60 $want_plural and not $is_plural
160 116 42 $want_singular and $is_plural
159 64 16 32 $number =~ /^\s*1(?:\.0*[Ee]?0*)?\z/ and not $tagged_rest =~ m[^(?:\S+/CC|\d)]
175 0 223 68 $tagged =~ m[^\s*(?:(\S+)/DET)?] and substr($phrase, $+[1] || 0) =~ /^\s*$Lingua::EN::Inflect::Phrase::number_re/
188 68 0 4 length $conj and not $and_zero
250 355 0 2 not $verb || $prefer_nouns and $tagger->get_readable(_inflect_noun($noun, 1, 0)) =~ /$VERB_TAG/
269 0 0 25 $verb eq $plural_verb and $tagger->get_readable(_inflect_noun($verb, 1)) =~ /$MAYBE_NOUN/
0 24 1 $verb eq $plural_verb and $tagger->get_readable(_inflect_noun($verb, 1)) =~ /$MAYBE_NOUN/ and substr($tagged, $verb_pos[1]) =~ m[^\s*/VB\s*$]
302 3 1 2 $want_plural and $number ne 'p'
1 2 1 $want_singular and $number ne 's'

or 2 conditions

line l !l condition
148 236 853 $_ ||= ''
175 22 269 $+[1] || 0
184 174 186 $_ ||= ''
202 260 80 $_ || ''

or 3 conditions

line l !l&&r !l&&!r condition
151 359 4 0 $tagger ||= 'Lingua::EN::Tagger'->new
227 60 293 10 ($noun) = $tagged =~ /$MAYBE_NOUN (?! .* $MAYBE_NOUN_TAG .* $PREPOSITION_OR_CONJUNCTION_TAG) .* $PREPOSITION_OR_CONJUNCTION_TAG/x or ($noun) = $tagged =~ /$MAYBE_NOUN (?!.*$MAYBE_NOUN_TAG)/x
353 0 10 ($noun) = $tagged =~ /$MAYBE_NOUN (?! .* $MAYBE_NOUN_TAG .* $PREPOSITION_OR_CONJUNCTION_TAG) .* $PREPOSITION_OR_CONJUNCTION_TAG/x or ($noun) = $tagged =~ /$MAYBE_NOUN (?!.*$MAYBE_NOUN_TAG)/x or ($noun) = $tagged =~ /$NOUN_OR_VERB (?!.*$NOUN_OR_VERB_TAG .* $PREPOSITION_OR_CONJUNCTION_TAG) .* $PREPOSITION_OR_CONJUNCTION_TAG/x
293 4 6 ($noun) = $tagged =~ /$MAYBE_NOUN (?! .* $MAYBE_NOUN_TAG .* $PREPOSITION_OR_CONJUNCTION_TAG) .* $PREPOSITION_OR_CONJUNCTION_TAG/x or ($noun) = $tagged =~ /$MAYBE_NOUN (?!.*$MAYBE_NOUN_TAG)/x or ($noun) = $tagged =~ /$NOUN_OR_VERB (?!.*$NOUN_OR_VERB_TAG .* $PREPOSITION_OR_CONJUNCTION_TAG) .* $PREPOSITION_OR_CONJUNCTION_TAG/x or ($noun) = $tagged =~ /$NOUN_OR_VERB (?! .* $NOUN_OR_VERB_TAG)/x
250 33 322 2 $verb || $prefer_nouns
269 6 0 25 $tagger->get_readable($plural_verb) =~ /$MAYBE_NOUN/ or $verb eq $plural_verb and $tagger->get_readable(_inflect_noun($verb, 1)) =~ /$MAYBE_NOUN/ and substr($tagged, $verb_pos[1]) =~ m[^\s*/VB\s*$]