Re: Sv: [PERL] Tal Formatering

[Christian Borup <sslug@sslug>]

Kim Christensen wrote:

> Det er nogle udemærket kommandoer men jeg kan kun få den til at bruge
> engelsk . , sætning.
> Eks. 1345,4 bliver til 1,345.40

Følgende plejer at virke meget fint:
  1 while $str =~ s/(\d)(\d{3}($|\.))/$1\.$2/;

Under forudsætning af at $str indeholder tallet naturligvis.

./borup