[quote=weperl,05.04.2006, 17:39]Hallo Crian,
die Ausgabe oben drüber mit: print $link->[0],"\n";
ist für die Bildschirmausgabe! Ich möchte aber alle
Links noch in einer Text-Datei sichern!
Gruß
Werner[/quote]
Ja, aber beides Mal musst du doch das gleiche ausgeben *g
Ob nun
print $link->[0],"\n"; oder
print HANDLE $link->[0],"\n"; ... ;-)
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite