Komut satırından her iki satırı nasıl birleştirirsiniz?

Aşağıdaki biçime sahip bir metin dosyam var. İlk satır "KEY" ve ikinci satır "VALUE".

KEY 4048:1736 string
3
KEY 0:1772 string
1
KEY 4192:1349 string
1
KEY 7329:2407 string
2
KEY 0:1774 string
1

Anahtar olarak aynı satırda değer gerekir. Yani çıktı böyle görünmeli ...

KEY 4048:1736 string 3
KEY 0:1772 string 1
KEY 4192:1349 string 1
KEY 7329:2407 string 2
KEY 0:1774 string 1

$Veya gibi bir sınırlayıcı kullanabilirsiniz daha iyi olacaktır ,:

KEY 4048:1736 string , 3

İki satırı nasıl birleştiririm?

awk:

awk 'NR%2{printf "%s ",$0;next;}1' yourFile

Not, çıktı sonunda boş bir çizgi var.

sed:

sed 'N;s/\n/ /' yourFile

paste bu iş için iyidir:

paste -d " "  - - < filename

Sed, awk, grep alternatifi:

xargs -n2 -d'\n'

Bu, N satırına katılmak istediğinizde ve yalnızca alanla sınırlı çıktıya ihtiyacınız olduğunda en iyisidir.

Benim asıl cevabım xargs -n2satırlardan ziyade kelimelere ayrılmaktı. -dgirişi herhangi bir tek karaktere bölmek için kullanılabilir.

Bir köpeği öldürmenin asmaktan daha fazla yolu vardır. ^[1]

awk '{key=$0; getline; print key ", " $0;}'

İstediğiniz sınırlayıcıyı tırnak içine alın.

Referanslar:

1. Başlangıçta "Kedinin derisini almanın birçok yolu", evcil hayvanlarla hiçbir ilgisi olmayan daha eski ve potansiyel olarak ortaya çıkan bir ifadeye geri döndü.

İşte bash benim çözüm:

while read line1; do read line2; echo "$line1, $line2"; done < data.txt

Önceki çözümlerin işe yarayacağı görünse de, belgede tek bir anormallik oluşursa çıktı parçalara ayrılır. Aşağıda biraz daha güvenli.

sed -n '/KEY/{
N
s/\n/ /p
}' somefile.txt

İşte ile başka bir yol awk:

awk 'ORS=NR%2?FS:RS' file

$ cat file
KEY 4048:1736 string
3
KEY 0:1772 string
1
KEY 4192:1349 string
1
KEY 7329:2407 string
2
KEY 0:1774 string
1

$ awk 'ORS=NR%2?FS:RS' file
KEY 4048:1736 string 3
KEY 0:1772 string 1
KEY 4192:1349 string 1
KEY 7329:2407 string 2
KEY 0:1774 string 1

Ed Morton tarafından yorumlarda belirtildiği gibi, güvenlik için parantez ve taşınabilirlik için parens eklemek daha iyidir.

awk '{ ORS = (NR%2 ? FS : RS) } 1' file

ORSÇıkış Kayıt Ayırıcı anlamına gelir. Burada yaptığımız NR, satır numarasını saklayan bir koşulu test etmektir. Modulo NRdeğeri gerçek bir değer (> 0) ise, Çıktı Alanı Ayırıcısını FSvarsayılan olarak boşluk olan (Alan Ayırıcı) değerine ayarlarız , aksi RStakdirde satırsonu olan (Kayıt Ayırıcı) değerini atarız .

,Ayırıcı olarak eklemek isterseniz , aşağıdakileri kullanın:

awk '{ ORS = (NR%2 ? "," : RS) } 1' file

"ex" sed, awk, grep, vb. ile aynı ailede olan bir script yazı editörüdür. Bence aradığınız şey bu olabilir. Birçok modern vi klonu / halefi de bir vi moduna sahiptir.

 ex -c "%g/KEY/j" -c "wq" data.txt

Bu eşleşirse "KEY" Bir gerçekleştirin her hat için diyor j aşağıdaki satırın oin. Bu komut tamamlandıktan sonra (tüm satırlara karşı), w rite ve q uit yazın.

Perl bir seçenekse deneyebilirsiniz:

perl -0pe 's/(.*)\n(.*)\n/$1 $2\n/g' file.txt

Awk komutunu 2 çift satırı birleştirmek için kullanabilirsiniz:

awk '{ if (NR%2 != 0) line=$0; else {printf("%s %s\n", line, $0); line="";} } \
     END {if (length(line)) print line;}' flle

Vim kullanan başka çözümler (sadece referans için).

Çözüm 1 :

Dosyayı vim'de açın vim filename, ardından komutu yürütün:% normal Jj

Bu komutun anlaşılması çok kolaydır:

• %: tüm satırlar için,
• normal: normal komutu yürüt
• Jj: Join komutunu yürütün, ardından aşağıdaki satıra geçin

Bundan sonra dosyayı kaydedin ve :wq

Çözüm 2 :

Komutu kabukta yürütün vim -c ":% normal Jj" filename, ardından dosyayı kaydedin ve ile çıkın :wq.

Aşağıdaki vi komutunu da kullanabilirsiniz:

:%g/.*/j

Glen jackson'un aşağıdakileri kullanarak cevabında küçük bir değişiklik varpaste : -dayırıcı seçeneğinin değeri birden fazla karakter içeriyorsa paste, karakterler arasında birer birer geçiş yapar ve -sseçeneklerle birlikte aynı giriş dosyasını işlerken bunu yapmaya devam eder.

Bu \n, her seferinde iki satırı birleştirmek için ayırıcı artı kaçış dizisi olarak istediğimiz her şeyi kullanabileceğimiz anlamına gelir .

Virgül kullanma:

$ paste -s -d ',\n' infile
KEY 4048:1736 string,3
KEY 0:1772 string,1
KEY 4192:1349 string,1
KEY 7329:2407 string,2
KEY 0:1774 string,1

ve dolar işareti:

$ paste -s -d '$\n' infile
KEY 4048:1736 string$3
KEY 0:1772 string$1
KEY 4192:1349 string$1
KEY 7329:2407 string$2
KEY 0:1774 string$1

Ne bu olamaz isimli birden karakterden oluşan bir ayırıcı kullanıyoruz.

Bonus olarak, eğer pastePOSIX uyumluysa, bu dosyadaki son satırın yeni satırını değiştirmez, bu nedenle aşağıdaki gibi tek sayıda satıra sahip bir girdi dosyası için

KEY 4048:1736 string
3
KEY 0:1772 string

paste son satırdaki ayırma karakterine yapışmaz:

$ paste -s -d ',\n' infile
KEY 4048:1736 string,3
KEY 0:1772 string

nawk '$0 ~ /string$/ {printf "%s ",$0; getline; printf "%s\n", $0}' filename

Bu şu şekilde okunur

$0 ~ /string$/  ## matches any lines that end with the word string
printf          ## so print the first line without newline
getline         ## get the next line
printf "%s\n"   ## print the whole line and carriage return

İki satırı birleştirmem gerektiğinde (daha kolay işlem için), ancak belirli verileri aşmasına izin verdiğimde, bunun yararlı olduğunu buldum

data.txt

string1=x
string2=y
string3
string4

cat data.txt | nawk '$0 ~ /string1=/ { printf "%s ", $0; getline; printf "%s\n", $0; getline } { print }' > converted_data.txt

çıktı sonra şöyle görünür:

converted_data.txt

string1=x string2=y
string3
string4

Vim kullanan bir başka yaklaşım:

:g/KEY/join

Bu join, içindeki kelimeyi içeren tüm satırlara (altındaki satıra) uygulanır KEY. Sonuç:

KEY 4048:1736 string 3
KEY 0:1772 string 1
KEY 4192:1349 string 1
KEY 7329:2407 string 2
KEY 0:1774 string 1

En basit yol burada:

1. Çift satırları kaldırın ve geçici dosyaya yazın 1.
2. Tek satırları kaldırın ve geçici bir dosyaya yazın 2.
3. -D ile paste komutunu kullanarak iki dosyayı bir araya getirin (alanı silmek anlamına gelir)

sed '0~2d' file > 1 && sed '1~2d' file > 2 && paste -d " " 1 2

perl -0pE 's{^KEY.*?\K\s+(\d+)$}{ $1}msg;' data.txt > data_merged-lines.txt

-0satır satır okumak yerine tüm dosyayı kaldırır;
pEkodu loop ile sarar ve çıktıyı yazdırır, http://perldoc.perl.org/perlrun.html adresindeki ayrıntılara bakın ;
^KEYsatırın başlangıcında "KEY" ile eşleşir, ardından .*?diziden önce herhangi bir şeyin ( ) açgözlü olmayan eşleşmesi gelir

1. \s+satır kesmeleri dahil her türlü bir veya daha fazla boşluk ;
2. (\d+)yakaladığımız ve daha sonra tekrar eklediğimiz bir veya daha fazla basamak $1;

ardından satır sonu $.

\Ksol tarafındaki her şeyi değiştirmeden hariç tutar, bu nedenle { $1}yalnızca 1-2 dizinin yerini alır, bkz. http://perldoc.perl.org/perlre.html .

Kabuk betiği olarak daha genel bir çözüm (birden fazla takip hattının birleştirilmesine izin verir). Bu, her birine bir çizgi ekler, çünkü görünüme ihtiyacım vardı, ancak bu kolayca çözülebilir. Bu örnek, "anahtar" satırın nerede bittiği ve başka hiçbir satırın bitmediği yerdir.

#!/bin/bash
#
# join "The rest of the story" when the first line of each   story
# matches $PATTERN
# Nice for looking for specific changes in bart output
#

PATTERN='*:';
LINEOUT=""
while read line; do
    case $line in
        $PATTERN)
                echo ""
                echo $LINEOUT
                LINEOUT="$line"
                        ;;
        "")
                LINEOUT=""
                echo ""
                ;;

        *)      LINEOUT="$LINEOUT $line"
                ;;
    esac        
done

Aşağıdaki satırı deneyin:

while read line1; do read line2; echo "$line1 $line2"; done <old.txt>new_file

Sınırlayıcıyı arasına koy

"$line1 $line2";

örneğin, sınırlayıcı ise |:

"$line1|$line2";

Bunun gibi kullanabilirsiniz xargs:

xargs -a file