timelocal - scriptabbruch bie falscher datumseingabe verhindern

[batooh]

Hallo.

wie kann ich den abbruch des scripts verhindern und eine vernünftig formatierte fehlermeldung mit eigenem print in den browser drucken ? mit software-error allein kann ein user ja nichts anfangen.

Du könntest den Fehler mit eval abfangen und anschließend die Variable $@ abfragen:

#!perl -w  
  
use strict;  
use Time::Local;  
  
my $year = 107;  
my $month = 13;  
my $day = 65;  
  
my $unix = eval { timelocal(59, 59, 23, $day, $month, $year) };  
  
if($@) {  
  print "Something went wrong: $@";  
 }  
else {  
  print "Everything is fine.";  
 }

Das sollte den erwünschten Effekt bringen.

Schöne Grüße.