for Schleife

[Struppi]

Tach auch,
ich muss grade was in Perl basteln und stehe mit programierung auf dem Kriegsfuss.
Ich habe 25 Artikel, die ich oben im Script definiere

Artikel 1 - 25 jeweils untereinander aufgelistet

my $namart1 = "HP EVO N1050V CEL-1.6G 30GB" ;
my $preisart1 = 990.00 ;
my $artno1art1 = "114093" ;
my $artno2art1 = "DC767T#ABD" ;

Das willst du nicht wirklich so machen????

Du kennst Arrays? Und in Perl noch mächtiger HASHes?
das was du als Lösung angeboten bekommen hast ist ein allerletzer Notnagel, der nur angewand werden sollte, wenn man genau weiss was man tut, was ich aber in deinem Falle bezweifeln darf.

Dein Datenstruktur kann z.b. so aussehen:

my @artikelListe = (

Artikel 1

{
       name => "HP EVO N1050V CEL-1.6G 30GB",
       preis => 990.00,
       no1 => "114093",
       no2 => "DC767T#ABD",
       anzahl => 1
    },

Artikel 2

{
       name => "HP EVO N1050V CEL-1.6G 30GB",
       preis => 990.00,
       no1 => "114093",
       no2 => "DC767T#ABD"
       anzahl => 1
    },
);

jetzt will ich nach Berechnung von Anzahl mit Preis und Mehrwertsteuer die Gesammte Bestellung in einer HTML Seite auflisten

print "<FONT FACE="Arial" SIZE=2 color="#000000">";

Nebenbei, das Font Tag ist veraltet und sollte angesichts von CSS nicht mehr verwendet werden.

foreach my $artikel(@artikelListe)
{
     next unless $artikel->{anzahl};
     print <<TEXT;
<tr>
<td>$artikel->{no1}
</td><td>
$artikel->{name}
</td><td>
$artikel->{preis}
</td><td>
$artikel->{anzahl}
</td></tr>
<br>
TEXT
}

Les mal die Hilfe Dokumente über Variabeln, Datentypen, Listen usw. du findest (wenn du Perl installiert hast) die Doku auf deiner Festplatte.

Ansonsten wirst du mit Perl nicht glücklich werden.

Struppi.