Lines Matching defs:NUM
15 PL PL_N PL_V PL_ADJ NO NUM A AN
25 NO NUM A AN PART_PRES )],
28 PL PL_N PL_V PL_ADJ NO NUM
34 ARTICLES => [ qw( classical inflect NUM A AN )],
94 sub NUM # (;$count,$show)
116 my @sections = split /(NUM\([^)]*\))/, $_[0];
121 unless (s/NUM\(\s*?(?:([^),]*)(?:,([^)]*))?)?\)/ NUM($1,$2) /xe)
1744 use Lingua::EN::Inflect qw ( PL PL_N PL_V PL_ADJ NO NUM
1777 print NUM($N1,""), PL("I"), PL_V(" saw"), NUM($N2), PL_N(" saw");
1778 print "There ", NUM($errors,''), PL_V("was"), NO(" error"), "\n";
1881 # "NUM()" AND "ORD()" WITHIN STRINGS:
1886 print inflect("NUM($N1,)PL(I) PL_V(saw) NUM($N2,)PL(a) PL_N(saw)");
1887 print inflect("I saw NUM($cat_count) PL("cat")\nNUM()");
1889 print inflect("There NUM($errors,) PL_V(was) NO(error)\n";
2111 (C<NUM($;$)>) which may be used to set a persistent "default number"
2114 can subsequently be removed by calling C<NUM()> with no arguments.
2117 NUM($errors);
2119 NUM();
2121 Normally, C<NUM()> returns its first argument, so that it may also
2124 print NUM($errors), PL_N(" error"), PL_V(" was"), " detected.\n"
2129 it is preferable that C<NUM()> return an empty string. Hence C<NUM()>
2131 it is defined) and evaluates to false, C<NUM> returns an empty string
2134 print NUM($errors,0), NO("error"), PL_V(" was"), " detected.\n";
2294 effects of any preceding call to C<NUM()>. Hence, another possible
2297 NUM($N);
2594 print NUM($errors), PL_N(" error"), PL_V(" was"), " detected.\n";
2606 print inflect "NUM($errors) PL_N(error) PL_V(was) detected.\n";
2610 Note that C<inflect> also correctly handles calls to the C<NUM()> subroutine
2614 calls to C<NUM()> which are embedded in an C<inflect()>-interpolated
2948 NUM(0);
2954 NUM(0);