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