Use of uninitialized value in numeric gt (>) at...

[Alain]

hallo,

$ENV{'CONTENT_LENGTH'} ||= 0; # entweder gesetzt, oder nimmt Wert 0 an.
if ($ENV{'CONTENT_LENGTH'} > 100) {...}

Use of uninitialized value in numeric gt (>) at...

Tja, $ENV{CONTENT_LENGTH} ist nicht definiert. GET-Formularmethode
gewählt?

nö das formular sollte auf jedenfall mit POST gesendet werden.

welches zeichen wäre dann angebracht um die länge des strings zu messen bzw. zu zählen wie lange
der string ist?

Irrelevant, dich interessiert ja nicht die Länge von
$ENV{CONTENT_LENGTH}, sondern dessen Wert, welcher die Länge des
Inputstreams bei POST definiert.

Verwende:

perldoc CGI

das habe ich und sogar mit use strict;
Ich habs jetzt so geschrieben:
my $len  = $ENV{'CONTENT_LENGTH'} || '101';
if (($len > 100) or ($ENV{'REQUEST_METHOD'} eq "GET"))
{
die("401 error 3\n");
}

Gruss vom Alain