Zeichenkette immer nach zwei Zeichen spliten - reg Ausdruck

[Helmut]

Hallo,

freilich gern.
Machste gleich noch das dazu, das setzt Tausender Trennpunkte vorm Komma ein.

$var = "123457890765498543298,3322";

$text = reverse $var;
$text =~ s/(\d\d\d)(?=\d)(?!\d*,)/$1./g;
print scalar reverse $text;

Ausgabe: 123.457.890.765.498.543.298,3322

Kann man auch mal brauchen...

Gruß Helmut