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(qw(es),  42) eq "cuarentay dos";
 ok Text::Numbers::100::translate(qw(de),  42) eq "zwei und vierzig";
 ok Text::Numbers::100::translate(qw(tr), 100) eq "yüz";
 ok Text::Numbers::100::translate(qw(ru),  61) eq "шестьдесят один";

Description

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

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

 cy da de en es fr is it ja nb nl pl pt ro ru sv tr

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.