Guten Abend
Ich wäre sehr dankbar, wenn mir jemand helfen würde.
gerne doch. Vielleicht erzählst Du zuerst einmal, was Du bisher versucht hast und woran Dein Vorhaben gescheitert ist.
$zahl = 0;
open (DATA, ">$datei");
@zeilen = <DATA>;
($zahl) = split(//,@zeilen);
$zahl++;
print DATA ("$zahl");
close (DATA);
$zahl = 0;
open (DATA, ">$datei");
$zahl = <DATA>;
$zahl++;
print DATA ("$zahl");
close (DATA);
Hilft alles nichts.
Darf ich mich jetzt deiner Hilfe erfreuen?
Roland