Wo liegt der Fehler

[Alex]

Hallo,
kann mir jemand helfen, irgendwo ist hier ein fehler drin. bin cgi neuling und vor zwei tagen erst angefangen.
$AnzahlArtikel ist "", warum???

vieln dank für eure hilfe

my $ArtikelStringAll = $data{'artikel'};
my $ArtikelSplit = split(/####/,$ArtikelStringAll);
my $AnzahlArtikel = length($ArtikelSplit);
print MAIL "Die Anzahl der Artikel lautet : $ArtikelAnzahl";
#my @ArtNr;

for(my $i=0; $i<$ArtikelAnzahl; $i++)
{
 #my $ArtikelString[$i] = substr($ArtikelSplit,$i,1);

#my $ArtikelDetails = split(/~/,$ArtikelString);

#my $ArtNr = substr($ArtikelDetails,1,1);
 #my $ArBez = substr($ArtikelDetails,2,1);
 #my $ArtGruppe = substr($ArtikelDetails,3,1);
 #my $ArtAnzahl = substr($ArtikelDetails,4,1);
 #my $ArtPreis = substr($ArtikelDetails,5,1);
 #my $ArtInfo = substr($ArtikelDetails,6,1);

print MAIL "<table width="100%" border="0">";
.
.
.
print MAIL "</table>";
print MAIL "\n";

}

[Michael Schröpl]

Hi Alex,

kann mir jemand helfen, irgendwo ist hier ein fehler drin.

wie wäre das Verhalten des Programms denn "richtig"?

$AnzahlArtikel ist "", warum???
my $ArtikelSplit = split(/####/,$ArtikelStringAll);

Das läßt sich ohne Ansicht Deiner verarbeiteten Daten kaum sagen.

Wenn Du weder eine Aufgabenstellung noch vernünftige Diagnoseinformationen mitlieferst, kannst Du auch gleich zu einer Wahrsagerin auf dem Jahrmarkt gehen ...

Viele Grüße
      Michael