Bir dosyadaki son karakterse yeni satırı nasıl silebilirim?

Bir dosyadaki son karakter ise son satırsonu silmek istiyorum bazı dosyaları var. od -cçalıştırdığım komutun dosyayı yeni bir satırla yazdığını gösteriyor:

0013600   n   t  >  \n

Sed ile birkaç numara denedim ama aklıma gelen en iyisi hile yapmıyor:

sed -e '$s/\(.*\)\n$/\1/' abc

Bunun nasıl yapıldığına dağir fikri olan?

perl -pe 'chomp if eof' filename >filename2

veya dosyayı yerinde düzenlemek için:

perl -pi -e 'chomp if eof' filename

^{[Editörün notu: -pi -ebaşlangıçta -pie, ancak birkaç yorumcu tarafından belirtildiği ve @hvd tarafından açıklandığı gibi, ikincisi çalışmıyor.]}

Bu gördüğüm awk web sitesinde 'perl küfür' olarak tanımlandı.

Ancak, bir testte işe yaradı.

Kabuk komutu değiştirmelerinin sondaki yeni satır karakterlerini kaldırması gerçeğinden yararlanabilirsiniz :

Bash, ksh, zsh biçiminde çalışan basit biçim:

printf %s "$(< in.txt)" > out.txt

Taşınabilir (POSIX uyumlu) alternatif (biraz daha az verimli):

printf %s "$(cat in.txt)" > out.txt

Not:

• Eğer in.txtsahip biter çoklu satır karakterleri, komut ikamesi kaldırır tüm bunların - teşekkür, @Sparhawk. (Sondaki yeni satırlar dışındaki boşluk karakterlerini kaldırmaz.)
• Bu yaklaşım giriş dosyasının tamamını belleğe okuduğundan , yalnızca küçük dosyalar için önerilir.
• printf %sçıktıya yeni satır eklenmemesini sağlar (standart dışı duruma POSIX uyumlu bir alternatiftir echo -n; bkz. http://pubs.opengroup.org/onlinepubs/009696799/utilities/echo.html ve https: //unix.stackexchange. com / a / 65819 )

Diğer cevaplar için bir rehber :

• Eğer Perl kullanılabilir, gitmek kabul cevap - Bu basit ve bellek verimli (bir kerede bütün giriş dosyasını okumaz).

• Aksi takdirde, ghostdog74'ün Awk cevabını düşünün - karanlık, aynı zamanda bellek tasarruflu ; Bir daha okunabilir eşdeğer (POSIX uyumlu) aşağıdaki gibidir:

  • awk 'NR > 1 { print prev } { prev=$0 } END { ORS=""; print }' in.txt
  • Baskı bir satır geciktirilir, böylece son satır ENDblokta işlenebilir , burada \nçıktı-kayıt ayırıcısının ( OFS) boş bir dizgiye ayarlanması nedeniyle iz bırakmadan yazdırılabilir .

• Yerinde gerçekten düzenleyen ayrıntılı, ancak hızlı ve sağlam bir çözüm istiyorsanız (orijinalin yerini alan geçici bir dosya oluşturmanın aksine), jrockway'in Perl komut dosyasını düşünün .

Bunu headGNU coreutils ile yapabilirsiniz , dosyanın sonuna göre olan argümanları destekler. Son bayt kullanımını bırakmak için:

head -c -1

Bir bitiş kullanabilirsiniz Yenisatır için sınamak için tailve wc. Aşağıdaki örnek sonucu geçici bir dosyaya kaydeder ve daha sonra orijinalin üzerine yazar:

if [[ $(tail -c1 file | wc -l) == 1 ]]; then
  head -c -1 file > file.tmp
  mv file.tmp file
fi

Ayrıca sponge, moreutils"yerinde" düzenleme yapmak için de kullanabilirsiniz :

[[ $(tail -c1 file | wc -l) == 1 ]] && head -c -1 file | sponge file

Ayrıca, bunu .bashrcdosyanızda doldurarak genel bir yeniden kullanılabilir işlev de yapabilirsiniz :

# Example:  remove-last-newline < multiline.txt
function remove-last-newline(){
    local file=$(mktemp)
    cat > $file
    if [[ $(tail -c1 $file | wc -l) == 1 ]]; then
        head -c -1 $file > $file.tmp
        mv $file.tmp $file
    fi
    cat $file
}

Güncelleme

Tarafından belirtildiği gibi KarlWilbur yorumlarda ve kullanılan Sorentar en cevabı , truncate --size=-1yerine head -c-1ve yerinde destekler düzenleme.

head -n -1 abc > newfile
tail -n 1 abc | tr -d '\n' >> newfile

Düzenleme 2:

Potansiyel olarak büyük bir dizi biriktirmeyen bir awksürüm (düzeltildi) :

awk '{if (line) baskı hattı; line = $ 0} END {printf $ 0} 'abc

gawk

   awk '{q=p;p=$0}NR>1{print q}END{ORS = ""; print p}' file

Coreutils'ten GNU yankısı gerektiren tek satırlı dosyalar için çok basit bir yöntem:

/bin/echo -n $(cat $file)

Doğru yapmak istiyorsanız, böyle bir şeye ihtiyacınız var:

use autodie qw(open sysseek sysread truncate);

my $file = shift;
open my $fh, '+>>', $file;
my $pos = tell $fh;
sysseek $fh, $pos - 1, 0;
sysread $fh, my $buf, 1 or die 'No data to read?';

if($buf eq "\n"){
    truncate $fh, $pos - 1;
}

Dosyayı okumak ve eklemek için açıyoruz; ekleme için açılmak seek, dosyanın sonuna kadar düzenlenmiş olduğumuz anlamına gelir . Daha sonra ile dosyanın sonunun sayısal konumunu elde ederiz tell. Bu sayıyı bir karakteri geri aramak için kullanırız ve sonra o karakteri okuruz. Yeni satırsa, dosyayı yeni satırın önündeki karaktere kısaltırız, aksi takdirde hiçbir şey yapmayız.

Bu, herhangi bir giriş için sabit zaman ve sabit alanda çalışır ve daha fazla disk alanı gerektirmez.

İşte güzel, düzenli bir Python çözümü. Burada kandırılmak için hiçbir girişimde bulunmadım.

Bu, dosyanın bir kopyasını oluşturmak ve yeni satırı kopyanın son satırından çıkarmak yerine dosyayı yerinde değiştirir. Dosya büyükse, bu en iyi yanıt olarak seçilen Perl çözümünden çok daha hızlı olacaktır.

Son iki bayt CR / LF ise bir dosyayı iki bayt veya son bayt LF ise bir bayt olarak keser. Son bayt (lar) LF değilse dosyayı değiştirmeye çalışmaz. Hataları işler. Python 2.6'da test edilmiştir.

Bunu "striplast" ve bir dosyaya koyun chmod +x striplast.

#!/usr/bin/python

# strip newline from last line of a file


import sys

def trunc(filename, new_len):
    try:
        # open with mode "append" so we have permission to modify
        # cannot open with mode "write" because that clobbers the file!
        f = open(filename, "ab")
        f.truncate(new_len)
        f.close()
    except IOError:
        print "cannot write to file:", filename
        sys.exit(2)

# get input argument
if len(sys.argv) == 2:
    filename = sys.argv[1]
else:
    filename = "--help"  # wrong number of arguments so print help

if filename == "--help" or filename == "-h" or filename == "/?":
    print "Usage: %s <filename>" % sys.argv[0]
    print "Strips a newline off the last line of a file."
    sys.exit(1)


try:
    # must have mode "b" (binary) to allow f.seek() with negative offset
    f = open(filename, "rb")
except IOError:
    print "file does not exist:", filename
    sys.exit(2)


SEEK_EOF = 2
f.seek(-2, SEEK_EOF)  # seek to two bytes before end of file

end_pos = f.tell()

line = f.read()
f.close()

if line.endswith("\r\n"):
    trunc(filename, end_pos)
elif line.endswith("\n"):
    trunc(filename, end_pos + 1)

PS "Perl golf" ruhuyla, benim en kısa Python çözümü. Tüm dosyayı standart girdiden belleğe kaydırır, tüm yeni satırları sondan çıkarır ve sonucu standart çıktıya yazar. Perl kadar kısa değil; Bunun gibi biraz zor hızlı şeyler için Perl'i yenemezsin.

Çağrısından "\ n" işaretini kaldırın, .rstrip()birden çok boş satır da dahil olmak üzere dosyanın sonundaki tüm beyaz boşlukları şeritleyecektir.

Bunu "slurp_and_chomp.py" içine koyun ve çalıştırın python slurp_and_chomp.py < inputfile > outputfile.

import sys

sys.stdout.write(sys.stdin.read().rstrip("\n"))

Hızlı bir çözüm gnu yardımcı programını kullanıyor truncate:

[ -z $(tail -c1 file) ] && truncate -s-1 file

Dosyada yeni bir satır varsa test doğru olur.

Kaldırma işlemi çok hızlı, gerçekten yerinde, yeni bir dosyaya gerek yok ve arama da sadece bir bayt ( tail -c1).

Yine başka bir perl WTDI:

perl -i -p0777we's/\n\z//' filename

$ perl -e 'yerel $ /; $ _ = <>; s / \ n $ //; print 'a-text-file.txt

Ayrıca bkz . Sed'deki herhangi bir karakteri eşleştirme (yeni satırlar dahil) .

Dd kullanma:

file='/path/to/file'
[[ "$(tail -c 1 "${file}" | tr -dc '\n' | wc -c)" -eq 1 ]] && \
    printf "" | dd  of="${file}" seek=$(($(stat -f "%z" "${file}") - 1)) bs=1 count=1
    #printf "" | dd  of="${file}" seek=$(($(wc -c < "${file}") - 1)) bs=1 count=1

perl -pi -e 's/\n$// if(eof)' your_file

Unix dosya türünü varsayarsak ve bu yalnızca son satırsonu için çalışır.

sed -e '${/^$/d}'

Birden fazla satırda çalışmaz ...

* Yalnızca son satır boşsa çalışır.

Yine başka bir cevap FTR (ve benim favorim!): Yankılamak / çıkartmak ve çıktıyı backticks üzerinden yakalamak istediğiniz şeyi yankı / kedi. Son satırsonu kaldırılacaktır. Örneğin:

# Sadly, outputs newline, and we have to feed the newline to sed to be portable
echo thingy | sed -e 's/thing/sill/'

# No newline! Happy.
out=`echo thingy | sed -e 's/thing/sill/'`
printf %s "$out"

# Similarly for files:
file=`cat file_ending_in_newline`
printf %s "$file" > file_no_newline

POSIX SED:

'$ {/ ^ $ / D}'

$ - match last line


{ COMMANDS } - A group of commands may be enclosed between { and } characters. This is particularly useful when you want a group of commands to be triggered by a single address (or address-range) match.

Bir dosyadan / dosyaya okumak / çıktı almak yerine borular / yeniden yönlendirme ile çalışmanız gerekiyorsa bu iyi bir çözümdür. Bu, tek veya birden çok satırla çalışır. Sonunda bir satırsonu olsun ya da olmasın çalışır.

# with trailing newline
echo -en 'foo\nbar\n' | sed '$s/$//' | head -c -1

# still works without trailing newline
echo -en 'foo\nbar' | sed '$s/$//' | head -c -1

# read from a file
sed '$s/$//' myfile.txt | head -c -1

Detaylar:

• head -c -1karakterin ne olduğuna bakılmaksızın dizenin son karakterini keser. Eğer dize bir satırsonu ile bitmezse, o zaman bir karakteri kaybedersiniz.
• Yani sorun, biz bir yoksa bir eğik yeni satır katacak başka komut eklemek o adrese: sed '$s/$//'. İlk $yöntem komutu yalnızca son satıra uygular. s/$//"satır sonu" nu "hiçbir şey" ile değiştirir, ki bu temelde hiçbir şey yapmaz. Ama sondaki satırsonu eklemenin yan etkisi var, biri yok.

Not: Mac'in varsayılanı seçeneği headdesteklemez -c. Bunun yerine yapabilir brew install coreutilsve kullanabilirsiniz ghead.

Bunu yapmak istediğim tek zaman kod golf için, ve sonra sadece kodumu dosyadan kopyaladım ve bir echo -n 'content'>fileifadeye yapıştırdım .

sed ':a;/^\n*$/{$d;N;};/\n$/ba' file

Benzer bir sorun vardı, ama bir windows dosyası ile çalışıyordu ve bu CRLF - linux benim çözüm tutmak gerekiyor:

sed 's/\r//g' orig | awk '{if (NR>1) printf("\r\n"); printf("%s",$0)}' > tweaked

sed -n "1 x;1 !H
$ {x;s/\n*$//p;}
" YourFile

\ N dosyasının son oluşumunu kaldırmalıdır. Büyük dosya üzerinde çalışmıyor (sed arabellek sınırlaması nedeniyle)

yakut:

ruby -ne 'print $stdin.eof ? $_.strip : $_'

veya:

ruby -ane 'q=p;p=$_;puts q if $.>1;END{print p.strip!}'