Condition Coverage

blib/lib/Lingua/EN/Inflect/Phrase.pm
Criterion Covered Total %
condition 57 65 87.6


and 3 conditions

line !l l&&!r l&&r condition
100 228 165 1 $want_singular and lc $noun eq 'aliases'
228 164 1 $want_singular and lc $noun eq 'statuses'
162 224 2 $want_plural and lc $noun eq 'two'
125 160 161 61 $want_plural and not $is_plural
161 117 43 $want_singular and $is_plural
160 64 16 32 $number =~ /^\s*1(?:\.0*[Ee]?0*)?\z/ and not $tagged_rest =~ m[^(?:\S+/CC|\d)]
176 0 231 68 $tagged =~ m[^\s*(?:(\S+)/DET)?] and substr($phrase, $+[1] || 0) =~ /^\s*$Lingua::EN::Inflect::Phrase::number_re/
189 68 0 4 length $conj and not $and_zero
251 363 0 2 not $verb || $prefer_nouns and $tagger->get_readable(_inflect_noun($noun, 1, 0)) =~ /$VERB_TAG/
270 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*$]
303 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
149 236 877 $_ ||= ''
176 22 277 $+[1] || 0
185 174 186 $_ ||= ''
203 260 80 $_ || ''

or 3 conditions

line l !l&&r !l&&!r condition
152 367 4 0 $tagger ||= 'Lingua::EN::Tagger'->new
228 60 301 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
361 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
301 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
251 33 330 2 $verb || $prefer_nouns
270 6 1 24 $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*$]