Hier ist ein Fehler
Deutsch verwendet das Komma als Nachkomma Separator.
http://de.wikipedia.org/wiki/Dezimaltrennzeichen
Die Gruppierung in verschiedene Tausenderblöcke ist heikler
Space und . sind in de-Länder üblich, aber auch '
in en-Länder sind es vorwiegend das Komma oder auch '
Perl erlaubt und erkennt den Underscore im Programm
123_456 = 123456
my $integer_de = qr/\d+(?:'\d{3})*/;
# 1 12 123 1'234 12'345 123'456 1'234'567
Am Besten konsultiert man länderspezifische Normen.
my $integer_deISO123456 = qr/.../;
oder Handbücher
my $integer_perl5 = qr/.../
Wichtiger war mir, zu zeigen, dass REs modular zusammengebaut werden sollten.
mfg Beat