Der Befehl getc() Liest ein Zeichen aus einer zuvor geöffneten Datei und positioniert den Dateizeiger um ein Zeichen weiter. getc ist die Abkürzung für get Char(akter), zu deutsch hole (ein) Zeichen.
open (my $IN,'<datei.txt') || die "kann datei nicht oeffnen: $!"; while ( !eof($IN) ){ my $zeichen = getc($IN); print $zeichen;
} close $IN;
Es wird die Datei datei.txt geöffnet und so lange ein Zeichen eingelesen und ausgegeben, bis das Dateiende erreicht ist.
Übrigens
Man könnte anstatt getc() auch ein read($IN,$zeichen,1); anwenden.
Und entgegen meiner Einschätzung, daß das wesentlich komplexere read() langsamer sein müßte, hab ich durch eigene Messungen festgestellt, daß read() bis zu dreimal schneller ist als getc()! Selbst wenn nur ein Zeichen eingelesen werden soll, bei mehreren Zeichen sowieso.
Von:Alex2983 Kommentar: Super. Wenn alle so eine Beschreibung abliefern würden, wäre es ein Traum. Besten Dank Zum Beitrag
Von:Daniel Kommentar: Super Tipp, habe sie jetzt auch gefunden, nur bei mir ist es leider eine 16-stellige Nummer...Was mache ich denn jetzt damit?? Zum Beitrag
Von:Mothman Kommentar: Im obigen Kommentar sollten in der Zeile
RSS-Feed