Datumsvalidierung (Allgemeines zu Perl)

[thread]12944[/thread]

Datumsvalidierung

Gast Gast

2009-12-31 14:45

Hallo,
ich weiß leider nicht, wie man mit Regular Expressions in Perl umgeht.
Ich benötige eine Funktion, die prüft ob ein Datum im Korrekten Format ( YYYY-MM-DD vorliegt.

Danke im Voraus ;-)

Yato

renee

2009-12-31 15:25

User since
2003-08-04
14371 Artikel
ModeratorIn

Wenn Du es auch auf gültige Daten überprüfen willst, dann empfehle ich die Verwendung von Regexp::Common:

Code: (dl )

use Regexp::Common qw(time);

my $date = '2008-12-31';
print "yes" if $date =~ $RE{time}{tf}{-pat=>'yyyy/mm/dd'};

Wenn es Dir nur darum geht zu erkennen, ob erst 4 Zahlen, dann "-", dann 2 Zahlen, usw. dann kannst Du es so machen:

Code: (dl )

1
2

my $date = '2008-12-31';
print "yes" if $date =~ /\d{4}-\d\d-\d\d/;

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Gast Gast

2009-12-31 15:48

danke, das war alles was ich gesucht habe.
Yato

View all threads created 2009-12-31 14:45.