Text-Datei erzeugen

[Siechfred]

Tag michi.

also ich habe absolut keinen Plan von Perl: wie kann man eine Text-Datei erzeugen anstatt das ergebnis direkt auf dem bildschirm auszugeben? danke!

Jesses, eine Unmenge an Quellcode, das ist ja schon fast Quälcode :)
Aber ich nehme an, dass dir das hier:

print "[Adblock]\n";
foreach my $regexp (@filters) { print "$regexp\n"; }

Sorgen bereitet, dabei ist es relativ einfach:

• Datei öffnen
• Daten in eine Datei schreiben
• Datei schließen

also z.B. so:

open(DATEI, ">textdatei.txt") || die $!;
print DATEI "[Adblock]\n";
foreach my $regexp (@filters) { print DATEI "$regexp\n"; }
close(DATEI);

Übrigens, vergiss das Flocken nicht, use Fcntl ':flock' sollte dabei helfen.

[dsf 3.6]
Siechfred