Thread perl one liner : Anzeigen der ersten und letzten Zeilen
(12 answers)
Opened by bora99 at 2017-09-25 16:49
Hallo Linuxer,
2017-09-28T21:54:52 Linuxer In diesem Fall, weil es wesentlich langsamer ist als meine einfache Lösung (Faktor 5 bei einer Datei mit 100.000.000 Zeilen und 1,86 GB). Außerdem soll ein Einzeiler ja möglichst kurz sein. Bei dieser Gelegenheit hier noch eine kürzere Fassung meines Vorschlags: Code: (dl
)
perl -ne '($.<6 and print) or shift @a; push @a,$_; END {print @a}' file 2017-09-28T21:54:52 LinuxerKleiner Verbesserungsvorschlag: nach say jeweils for einfügen, damit die Zeilen auch wirklich zeilenweise ausgegeben werden. (Auch wenn der Einzeiler dadurch noch etwas länger wird.) Viele Grüße payx Last edited: 2017-10-03 14:50:11 +0200 (CEST) View full thread perl one liner : Anzeigen der ersten und letzten Zeilen |