Come posso convertire un numero alla sua forma inglese in Perl?

Question

ho bisogno di uno script Perl che prende i numeri come esempio di ingresso 222 E dovrebbe uscita come 222 .

Answer 1

Usa Lingua :: IT :: Numbers -. svolta "407" in "407", ecc

use Lingua::EN::Numbers qw(num2en num2en_ordinal);

    my $x = 234;
    my $y = 54;
    print "You have ", num2en($x), " things to do today!\n";
    print "You will stop caring after the ", num2en_ordinal($y), ".\n";

stampe:

You have two hundred and thirty-four things to do today!
You will stop caring after the fifty-fourth.

Se leggete il documentazione del modulo, allora vi accorgerete che il modulo supporta anche le seguenti cose come,

• E 'in grado di gestire interi come "12" o "-3" e numeri reali come "53.19".
• Si capisce anche notazione esponenziale -. Si scopre "4E9" in "quattro volte dieci alla nona
• Risulta "INF", "-INF", "NaN" in "infinito", "infinito negativo", e "non un numero", rispettivamente.

Answer 2

Numero :: Spell può aiutare a:

use Number::Spell;
my $str = spell_number(222);

Answer 3

Qui è uno:

• Numero to Word Converter - Perl Project Engineering Scarica

  

Descrizione: Questo trasforma fondamentalmente un   numero in parole. E 'possibile convertire solo   Numeri minore o uguale di   quantità novemdecillion. Ha un   completo processo di convalida di ingresso.

Answer 4

questo . Dall'autore ...

È possibile utilizzare questa liberamente e modificarlo nel modo desiderato.