Michael Schröpl: Script für Dateiausgabe

Beitrag lesen

Hi,

nur leider weiß ich nicht wie ich immer nach jeder Zeile eine neue Datei mit anderm Namen erstelle.

Genauso, wie nur *eine* Datei - aber innerhalb der entsprechenden Schleife.

open(NEUE, ">$NEUE") die "Datei "+$NEUE+" konnte nicht angelegt werden\n";
for(@Zeilen)
{
print NEUE $_;
}
close(NEUE);

Wenn Du open() und close() in die Schleife hinein verschiebst und dabei jeweils den Wert für $NEUE passend berechnest, dann hast Du gewonnen.

Elegant wäre es, wenn Du mit
   for my $diese_url (@Zeilen)
den jeweiligen Inhalt einer Eingabezeile einer lokalen Variablen zuweisen würdest, denn $_ geht Dir während der anderen Operationen innerhalb der Schleife kaputt.

mfG - Michael