Opened by Gast at 2007-07-08 19:49
User since
2006-05-20
533 Artikel
BenutzerIn
2006-05-20
533 Artikel
BenutzerIn
Hi.
Den letzten Punkt kannst du auch durch einLeerzeichen ersetzen, dann sollte er dir das anstatt durch Punkte, durch Leerzeichen trennen.
MfG
Code: (dl
)
1
2
3
4
5
sub add_spaces {
my $text = reverse $_[0];
$text =~ s/(\d\d\d)(?=\d)(?!\d*\,)/$1./g;
return scalar reverse $text;
}Den letzten Punkt kannst du auch durch einLeerzeichen ersetzen, dann sollte er dir das anstatt durch Punkte, durch Leerzeichen trennen.
MfG
Pörl.