Four is the number of letters in the ...: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) (Rename Perl 6 -> Raku, alphabetize, minor clean-up) |
Thundergnat (talk | contribs) m (Fix Perl 6 -> Raku links) |
||
Line 717: | Line 717: | ||
=={{header|Perl}}== |
=={{header|Perl}}== |
||
Uses <code>Lingua::EN::Numbers</code> module to generate number names. State variable in <tt>extend_to</tt> routine keeps track of last word tallied. |
Uses <code>Lingua::EN::Numbers</code> module to generate number names. State variable in <tt>extend_to</tt> routine keeps track of last word tallied. |
||
{{trans| |
{{trans|Raku}} |
||
<lang perl>use feature 'state'; |
<lang perl>use feature 'state'; |
||
use Lingua::EN::Numbers qw(num2en num2en_ordinal); |
use Lingua::EN::Numbers qw(num2en num2en_ordinal); |