EOF'da birden fazla yeni satır nasıl kaldırılır?

Bir veya daha fazla yeni satırda biten ve yalnızca bir yeni satırda bitmesi gereken dosyalarım var. Bash / Unix / GNU araçlarıyla bunu nasıl yapabilirim?

Örnek kötü dosya:

1\n
\n
2\n
\n
\n
3\n
\n
\n
\n

Örnek düzeltilmiş dosya:

1\n
\n
2\n
\n
\n
3\n

Başka bir deyişle: EOF ile dosyanın son olmayan yeni satır karakteri arasında tek bir satır olmalıdır.

Referans uygulaması

Dosya içeriğini okuyun, sonunda yeni bir satır ekleninceye kadar tek bir satırsonu kesin, geri yazın:

#! /bin/python

import sys

with open(sys.argv[1]) as infile:
    lines = infile.read()

while lines.endswith("\n\n"):
    lines = lines[:-1]

with open(sys.argv[2], 'w') as outfile:
    for line in lines:
        outfile.write(line)

Açıklama: Tabii ki, daha şıksa, borulara izin verilir.

awk '/^$/ {nlstack=nlstack "\n";next;} {printf "%s",nlstack; nlstack=""; print;}' file

Gönderen kullanışlı tek satırlık komut dosyaları için sed .

# Delete all trailing blank lines at end of file (only).
sed -e :a -e '/^\n*$/{$d;N;};/\n$/ba' file

Zaten sed ve awk daha uygun araçlarla cevaplarınız olduğundan; $(< file)Boş satırları takip eden olaydan yararlanabilirsiniz .

a=$(<file); printf '%s\n' "$a" > file

Bu ucuz kesmek, boşluk veya diğer yazdırılamayan karakterler içerebilen izleyen boş satırları kaldırmak için çalışmaz, yalnızca izleyen boş satırları kaldırmak için çalışmaz. Dosyada boş bayt varsa, çalışmaz.

Bash ve zsh dışındaki kabuklarda, $(cat file)yerine kullanın $(<file).

Bu numarayı cat& ile kullanabilirsiniz printf:

$ printf '%s\n' "`cat file`"

Örneğin

$ printf '%s\n' "`cat ifile`" > ofile
$ cat -e ofile
1$
$
2$
$
$
3$

$Satır sonunu gösterir.

Referanslar

• Sondaki boş satırları kaldırma

Bu soru ed ile etiketlendi , ancak kimse bir edçözüm önerdi .

Işte bir tane:

ed -s file <<'ED_END'
a

.
?^..*?+1,.d
w
ED_END

Veya eşdeğer olarak,

printf '%s\n' a '' . '?^..*?+1,.d' w | ed -s file

ed Başlangıçta varsayılan olarak sizi düzenleme tamponunun son satırına yerleştirir.

İlk komut ( a) arabelleğin sonuna boş bir satır ekler (düzenleme komut dosyasındaki boş satır bu satırdır ve nokta ( .) sadece komut moduna geri dönmek içindir).

İkinci komut ( ?), bir şey içeren en yakın önceki satırı arar (beyaz boşluk karakterleri bile) ve daha sonra bir sonraki satırdan itibaren arabelleğin sonuna kadar olan her şeyi siler.

Üçüncü komut ( w) dosyayı diske geri yazar.

Eklenen boş satır, orijinal dosyanın sonunda boş satır olmaması durumunda dosyanın geri kalanının silinmesini önler.

İşte Perl çözüm gelmez bir anda belleğe birden fazla satır okumaya gerektirir:

my $n = 0;
while (<>) {
    if (/./) {
        print "\n" x $n, $_;
        $n = 0;
    } else {
        $n++;
    }
}

veya tek gömlek olarak:

perl -ne 'if (/./) { print "\n" x $n, $_; $n = 0 } else { $n++ }'

Bu, dosyayı her seferinde bir satır okur ve her satırın satır içi olmayan bir karakter içerip içermediğini kontrol eder. Olmazsa, bir sayacı artırır; eğer öyleyse, sayaç tarafından gösterilen yeni satır sayısını, ardından satırın kendisini yazdırır ve ardından sayacı sıfırlar.

Teknik olarak, bellekte tek bir satırın tamponlanması bile gerekli değildir; Bu problemi sabit miktarda bellek kullanarak dosyayı sabit uzunlukta parçalarda okuyarak ve bir durum makinesi kullanarak karakter karakteriyle işleyerek çözmek mümkün olacaktır. Ancak, bunun tipik kullanım durumu için gereksiz yere karmaşık olacağından şüpheleniyorum.

Dosyanız belleğe sığacak kadar küçükse, bunu kullanabilirsiniz.

perl -e 'local($/);$f=<>; $f=~s/\n*$/\n/;print $f;' file

Python'da (ne istediğinizi bilmiyorum, ancak optimize edildiğinden ve bash versiyonunun başlangıcına göre daha iyi olduğunu) dosyayı yeniden yazmadan ve tüm dosyayı okumadan (dosya iyi bir şeyse) çok büyük):

#!/bin/python
import sys
infile = open(sys.argv[1], 'r+')
infile.seek(-1, 2)
while infile.read(1) == '\n':
  infile.seek(-2, 1)
infile.seek(1, 1)
infile.truncate()
infile.close()

EOL karakterinin '\ n' olmadığı dosyalarda çalışmadığını unutmayın.

Python algoritmasını uygulayan fakat birçok işleme ihtiyaç duyduğu için daha az verimli olan bir bash versiyonu:

#!/bin/bash
n=1
while test "$(tail -n $n "$1")" == ""; do
  ((n++))
done
((n--))
truncate -s $(($(stat -c "%s" "$1") - $n)) "$1"

Bu, hızlı yazılır ve eğer sed biliyorsanız, hatırlanması kolay:

tac < file | sed '/[^[:blank:]]/,$!d' | tac

Önde gelen boş satırları , yukardaki Alexey tarafından referans verilen sed için taranan tek satırlık komut dosyalarından silmek için sed komutunu ve tac (reverse cat) komutunu kullanır .

Hızlı bir testte, 18 MB'lık 64.000 satırlık bir dosyada, Alexey'in yaklaşımı daha hızlıydı (0.036 vs 0.046 saniye).