In TCL, öffne ich eine Datei aus dem Schwanz

Question

Ich habe dieses Problem:
Ich brauche manchmal große Textdateien zu verarbeiten.
In einigen Fällen weiß ich, dass die Daten, die mir wichtig sind, im Endstück der Datei sind. Wenn ich normal geöffnet benutze, muss ich durch die Zeilen scrollen. Gibt es eine Möglichkeit, "vom Ende zu starten" und Zeit zu sparen, vielleicht die Datei rückwärts zu lesen?

Answer 1

Sie können den seek Befehl:

set linesz 256 ; # assume an approximate line size 
set fh [open myfile.txt] 
seek $fh [expr {$linesz*-5}] end 
gets $fh line ; # this first line is probably a partial line, ignore it. 
while { [gets $fh line] >= 0 } { 
    # process 
} 
close $fh 

Referenzen: seek