Frage zu Regex - Datum

[Beat]

Aber das Durchschauen der Gesamtlogik, die zu deinem Ziel führt ist nicht einfacher.

... als ein Ausdruck über mehrere Zeilen oder was?

Wenn ich deine Logik betrachte:

my($jahr, $monat, $tag) = reverse (1970, 1, 1, (split /\./, $datum));

...fällt mir ein gravierender Fehler auf. Dir auch?

Wie viele Zeilen du für den Schuss in den Fuss brauchst, ist hier Nebensache.

mfg Beat