reguläre Ausdrücke

[Christian Kruse]

Hoi,

...ich habe ein kleines Problem mit den regulären Ausdrücken...
Ich möchte ein Feld auf folgende (fehlerhafte) Eingaben überprüfen:

1. es dürfen nur Zahlen eingegeben werden
2. es darf keine führende Null eingegeben werden..

if($a =~ /^[1]\d*$/) {
  print "valide Eingabe!\n";
}

$a ist der Feldwert

if(($a eq "0"))||($d =~m/(\D)|(0\d)/)||($a =~m/(\D)|(0\d)/))

Ein bisserl kompliziert ;-)

So... alle schön abgelacht...

Wie kommst du darauf?

Gruesse,
 CK

---

1. 1-9 ↩︎