[PERL] Kommastellen

[VIPbanner_de]

In PHP kein Problem.. nur wie löse ich folgendes in Perl:

$daten->{zahl}= "50000000";
Aus 50000000 soll 50.000.000

Es handelt sich um volle Zahlen also kein Komma notwendig.. nur sollen die Punkte gesetzt werden um die Zahl leichter lesen zu können.

Hat wer ne idee?

 

[theHacker]

while $zahl =~ s/^(-?\d+)(\d{3})/$1.$2/;

Quelle: https://www.perl-community.de/bat/poard/thread/6064#ms_79953

 

[tleilax]

Ansonsten gibt's auch noch Number::Format.

 

[VIPbanner_de]

danke.. genau das hab ich gesucht!!!