RegEx für Zahlen: Alles muss raus! - Wenn's keine Zahl ist - #2930 (Perl/CGI)

steffenw

2004-06-21 11:40

User since
2003-08-15
692 Artikel
BenutzerIn

mit . und , meint er Zahlen wie
1
1,23
1.000
1.000.000,23

Code: (dl )

$string =~ s/-?(?:\d+\.)*\d+(?:,\d+)?//gs;

$SIG{USER} = sub {love 'Perl' or die};