Regulärer Ausdruck zum Überprüfen von Preisfeldern

[ArneB]

Hi!

$i = <STDIN>;
chomp($i);
if ($i =~ /[^0-9,]/) {
print "Bad format!\n";
} else {
print "Ok!\n";
}

Ok, muß für nen CGI natürlich angepasst werden, sollte dich aber in die richtige Richtung weisen.

CU
ArneB