Wie kann ich eine Zahl in ihrer englischen Form in Perl konvertieren?

Question

Ich brauche einen Perl-Skript, die Zahlen als Eingabe Beispiel nimmt 222 und es ausgeben sollte als 222 .

Answer 1

Mit Lingua :: EN :: Zahlen -. turn "407" in "407", etc

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";

druckt:

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

Wenn Sie die Dokumentation lesen des Moduls dann werden Sie feststellen, dass das Modul auch folgende Dinge unterstützen wie,

• Es kann behandeln Zahlen wie "12" oder "-3" und reelle Zahlen wie "53.19".
• Es versteht auch Exponentialnotation -. Es stellt sich "4E9" in „viermal zehn bis neunten
• Es stellt sich "INF", "-INF", "NaN" in die "Unendlichkeit", "negative Unendlichkeit" und "keine Zahl" bezeichnet.

Answer 2

Nummer :: Spell können Sie helfen:

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

Answer 3

Hier ist eine:

• Versuchen Sie diese . Vom Autor ...

  Sie können diese frei verwenden und ändern Sie es, wie Sie wollen.

Answer 4

Answer 5

Answer 6

Versuchen Sie