Abend zusammen,
Ich habe eine while-Schleife die eine Datei ausliest, und die enthaltenen Werte auf verschiedene Variabeln aufteilt. Geht alles Prima!
Nun müsste ich ein Array (@LinkCollect) anlegen, welches sich bei jedem Whileschleifendurchlauf mit einem weiteren Wert ($Thema) füllt. Ich habe bis jetzt das. Und so wie es aussieht, füllt sich da nix :-(
$counter = 0;
my $Layout1;
my $Thema;
my $Bild;
my @LinkCollect;
open(LESER, "<public/publisher.csv");
flock(LESER, LOCK_SH);
print "Content-type: text/html\n\n";
while(! eof(LESER)){ <---Schleifenbeginn
$counter = $counter + 1;
my $zeile = <LESER>; <---Füllvorgang klappt
my ($Layout1, $Thema, $Bild) = split(/,/,$zeile); <--- Splitten klappt
my @LinkCollect = ($Thema); <---Array mit Variable $Thema füllen klappt nicht
Komme mit der Selfhtml-Info nicht weiter
Bitte um Hilfe
Grüsse gary