Bu dosyayı düzeltmek için sed komutu nedir, bu yüzden her satırdaki son değer iki katıdır.

İki milyon satırlık form içeren bir dosyam var:

"00005cea-668e-4475-9e19-92a25c8b74fb",129.24728",D#

Son değer aslında olmalı:

"00005cea-668e-4475-9e19-92a25c8b74fb",129.24728,"D#"

Lütfen, bu dosyayı düzeltmek için sed komutunu nasıl kullanırım, böylece sahte "kaldırılır ve son değer iki kez gösterilir.

Gibi bir şey deneyebilirsiniz:

sed -r 's/",([^,]*)$/,"\1"/' input-file

Bunu , dosyanın sonuna kadar ",virgül ( [^,]) olmayan bir şey izler $. \1parantez içinde eşleşen kısımdır - ([^,]*).

Değil sed, ama perl:

perl -F, -ane '($f1)=$F[1]=~/(.*)"/; $F[2]=~s/\n//g; print "$F[0],$f1,\"$F[2]\"\n";'

Açıklama:

• perl -F, -ane giriş satırındaki bilgiyi okur ve çizgiyi a ,
• ($f1)=$F[1]=~/(.*)"/;"ikinci sütunda kaldırır
• $F[2]=~s/\n//g; sonunda yeni satırı kaldırır
• print "$F[0],$f1,\"$F[2]\"\n";çıktıyı yazar ve "son değere ekler

Düzenleme - kısaltılmış Versiyon (@kos sayesinde):

perl -F, -lane '$F[1]=~s/"$//; print "$F[0],$F[1],\"$F[2]\"";'

Alanlarınız virgüllerle tanımlanmış gibi görünüyor. Eğer öyleyse, bunu içinde yapabilirsiniz sed:

sed -i -r 's/",([^,]*)$/,"\1"/' file

Veya, Perl'de:

perl  -i -lpe 's/",([^,]*)$/,"\1"/' file

Her iki durumda da, regex sadece virgül, daha sonra 0 veya daha fazla virgül olmayan satır sonuna kadar arar. Parantezler, sonra \1(veya $1perl olarak) başvurabileceğimiz son alanları yakalar . Bu daha sonra çift tırnak içinde kendiliğinden yer değiştirir. -iYerinde dosyasını düzenleme için, değişiklikler orijinal dosyaya yapılır edilir.

Ayrıca awkşunları da kullanabilirsiniz :

awk -F, -vOFS=, '{sub(/"/,"",$(NF-1)); $NF="\""$NF"\""}1;' file

Veya, sürümünüz destekliyorsa:

awk -iinplace -F, -vOFS=, '{sub(/"/,"",$(NF-1)); $NF="\""$NF"\""}1;' file