Leere Zeilen am Ende einer Datei löschen

Vom einfachen Programm zum fertigen Debian-Paket, Fragen rund um Programmiersprachen, Scripting und Lizenzierung.
Antworten
Benutzeravatar
dmeister
Beiträge: 258
Registriert: 05.07.2002 08:01:53
Wohnort: Zürich
Kontaktdaten:

Leere Zeilen am Ende einer Datei löschen

Beitrag von dmeister » 28.10.2004 10:46:38

Hallo zusammen

Ich habe hier verschieden Dateien, die am Ende jeweils mehrere leere Zeilen haben. Weiss jemand gerade eine Möglichkeit, wie ich diese leeren Zeilen entfernen kann? Es hat zum Teil auch innerhalb des Textes Leerzeilen; diese sollten beibehalten werden.

Merci für eure Hilfe.
Jabber: neptoon@jabber.org
It's only Rock'n'Roll but I like it

Benutzeravatar
se8i
Beiträge: 1017
Registriert: 08.11.2002 17:02:20
Wohnort: nähe Karlsruhe
Kontaktdaten:

Re: Leere Zeilen am Ende einer Datei löschen

Beitrag von se8i » 28.10.2004 11:11:23

dmeister hat geschrieben:Hallo zusammen

Ich habe hier verschieden Dateien, die am Ende jeweils mehrere leere Zeilen haben. Weiss jemand gerade eine Möglichkeit, wie ich diese leeren Zeilen entfernen kann? Es hat zum Teil auch innerhalb des Textes Leerzeilen; diese sollten beibehalten werden.

Merci für eure Hilfe.
ich weiß zwar nicht direkt wie es geht, aber mit sed sollte sowas gehen. Und wenn das nicht geht, geht es auf jeden Fall mit perl.
Jazz is not dead, it just smells funny.

Benutzeravatar
Joghurt
Beiträge: 5244
Registriert: 30.01.2003 15:27:31
Wohnort: Hamburg
Kontaktdaten:

Beitrag von Joghurt » 28.10.2004 12:46:35

Code: Alles auswählen

perl -ne 'BEGIN { $buf=""; } if (/^\s*$/) { $buf .= $_; } else { print $buf.$_; $buf="";}' Datei
oder als richtige Perl-Datei

Code: Alles auswählen

#!/usr/bin/perl -w
$buf = "";
while (<>) {
  if (/^\s*$/) {
    $buf .= $_;
  } else {
    print $buf.$_;
    $buf = "";
  }
}
Zuletzt geändert von Joghurt am 28.10.2004 13:27:43, insgesamt 1-mal geändert.

Benutzeravatar
dmeister
Beiträge: 258
Registriert: 05.07.2002 08:01:53
Wohnort: Zürich
Kontaktdaten:

Beitrag von dmeister » 28.10.2004 13:00:41

Vielen Dank. Scheint zu funktionieren!
Jabber: neptoon@jabber.org
It's only Rock'n'Roll but I like it

Antworten