Perl: Zahl Vergleichsoperator

[sacko]

und wie solls jetzt weitergehen? Ich kann $zahl auf keinen Fall so in die Datenbank eintragen, das gibt einen Error wenn ich versuche $zahl in eine INT-Spalte einzutragen.

Da du userinput entgegennimmst wirst du mit einem regulären Ausdruck zuerst ein gültiges Datum herausziehen müssen.

$unclean{zahl} =~/(\d+)/ and $clean{zahl}=$1
   or $clean{zahl}=42;

mfg Beat

was soll ich denn bitte mit /(\d+)/ ??? Das heisst ja nur, dass im String min. 1 Zahl vorkommen muss.
Du meintest wohl eher sowas wie /^\d$/
Und die clean-Lösung durchblick ich auch nicht so richtig. Was soll das bezwecken?