Opened by mika at 2011-02-02 22:49
User since
2010-10-02
168 Artikel
BenutzerIn
2010-10-02
168 Artikel
BenutzerIn
Hallo,
eine Änderung musste ich noch vornehmen.
Ich ärgere mich nicht weite mit dem Modul
Class::Date herum und prüfe die Gültigkeit der Geburtstagsangabe wie folgt.
Das alles weil, beim Error handling der Date Klasse, anscheinend nur E_RANGE wirklich funktioniert.
MfG
mika
Last edited: 2011-02-07 20:20:00 +0100 (CET)
eine Änderung musste ich noch vornehmen.
Ich ärgere mich nicht weite mit dem Modul
Class::Date herum und prüfe die Gültigkeit der Geburtstagsangabe wie folgt.Code (perl): (dl
)
1 2 3 4 5 6 7
my $date = Class::Date->new($row->[0]); if ( $row->[0] !~ m/^\d*-\d\d\-\d\d$/ || $date->error != $date->E_OK ){ print STDERR Dumper($row); print STDERR "E: Invalid date. ".$date->errstr; next; } else { ...
Das alles weil, beim Error handling der Date Klasse, anscheinend nur E_RANGE wirklich funktioniert.
MfG
mika
Last edited: 2011-02-07 20:20:00 +0100 (CET)