The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

Name

Text::Numbers::100 - Translate the numbers from 0 to 100 into various languages

Synopsis

 use Text::Numbers::100;

 ok Text::Numbers::100::translate(q(es),  42) eq "cuarentay dos";
 ok Text::Numbers::100::translate(q(de),  42) eq "zweiundvierzig";
 ok Text::Numbers::100::translate(q(tr), 100) eq "yüz";
 ok Text::Numbers::100::translate(q(ru),  61) eq "шестьдесят один";

Description

 Text::Numbers::100::translate($language, $number)

Translates a number from 0 to 100 into text in the following languages:

Code Description

  cy  Welsh
  da  Danish
  de  German
  en  English
  es  Spanish; Castilian
  fr  French
  is  Icelandic
  it  Italian
  ja  Japanese
  ko  Korean
  nb  Norwegian
  nl  Dutch; Flemish
  pl  Polish
  pt  Portuguese
  ro  Romanian; Moldavian; Moldovan
  ru  Russian
  sv  Swedish
  tr  Turkish

Please <a href="mailto:philiprbrenan@gmail.com">email</a>email me the language code and numbers from zero to one hundred for languages not included above.

See also

ISO::639

Installation

Standard Module::Build process for building and installing modules:

  perl Build.PL
  ./Build
  ./Build test
  ./Build install

Author

philiprbrenan@gmail.com

http://www.appaapps.com

Copyright

Copyright (c) 2017 Philip R Brenan.

This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.