Punkt gegen Komma tauschen mit Nebenbedingungen

[Uwe]

Hallo zusammen

Ich versuche, Punkte gegen Kommata auszutauschen. Dies soll aber nur passieren, wenn es sich um eine normale Zahl handelt. Der zu verarbeitende String sieht z.B. wie folgt aus
my $test="192.168.34.2 <td>-15.34 %</td> +5.644 3.2<p> 13.12.2005</p>";
Der String macht jetzt keinen Sinn, aber demonstriert das Problem. Ich möchte nämlich nur den Punkt in -15.34 und 5.644 und 3.2 gegen ein Komma austauschen. Meine bisher beste Idee war $test =~ s/(\d+?).(\d+?)(?=[^.,\d])/$1,$2/g; welche aber auch nicht ganz das gewünschte Ergebnis liefert.

Hat jemand eine Idee?

Viele Grüße
Uwe