Vergleich von Variablen in Perl

[Patric]

Sieht syntaktisch korrekt aus, aber ich kenne die anderen Variablen nicht.
Kannst du den Teil etwas genauer angeben?
Wie ist $index definiert?

Ciao,

»»  Wolfgang

Ein Beispielübergabeparameter ist  "Sachsen/B".
Hier der Auszug aus dem Perl-Script:

if($ENV{'REQUEST_METHOD'} eq 'GET')
{
$daten = $ENV{'QUERY_STRING'};
}
else
{
read(STDIN, $daten, $ENV{'CONTENT_LENGTH'});
}

$div=index($daten,"/");
$bundesland=substr($daten,0,$div);
$buchstabe=substr($daten,$div+1);

...

@buchstaben=("A".."Z");

for($i=0;$i<26;$i++)
{
if($buchtabe eq $buchstaben[$i])
{
    Diese Stelle wird nie erreicht.
        }
        else
           ...
}