在shell中如何將兩個字符串之間的行整合成一行

Question

在bash shell中，（solaris 5.8上的bash ver可能是舊的）， 使用awk或sed我將如何將行合併爲一個「重複」模式之間的行：

[編輯：更好地解釋自己）

我的文件中包含這樣的一個條目很多：

my-group<--------------------------(main entry) 
<tab>group-code<spcaes>AXZ1<-------(sub-section under main entry) 
<tab>description      
<tab>state<spaces>CA 
<tab>items 
<tab><spaces>item_value_1 
<tab><spaces>item_value_2 
<tab><tab>header_3 <---------------(sub-section under sub-section) (can have upto 5th level) 
<tab><tab>header_3_item_1<spaces>vlaue 

我希望這可以變成： 新行頭開始每次該行的列包含字母數字值。當它沒有的時候，它應該被附加爲： -
所有的TAB被一個「|」替代。以及由「」分隔的參數和值：

my-group|group-code:AXZ1|description:|state:CA|items:something:something2|last-member-name:XYZ 
my-group|group-code:PORTU1|description:|state:CT|items:something:something2|last-member-name:FQRTZ 

我該怎麼做？我唯一能想到的方式就是在內存中打開文件並逐行讀取並執行操作。是唯一的方法還是可以有一個sed/awk命令？

我在這裏把我試圖實現這個bash代碼。 （還沒有工作）

#!/bin/bash 
myFile=$1 

function trim() 
{ 
    local var=$@ 
    var=$(echo $var|sed -e "s/^\s*//" -e "s/\s*$//" -e "s/[ \t]/:/g") 
    echo -n "$var" 
} 

newLine='' 
i=0 
while read line 
do 
    i=$[i + 1] 
    [ -z "$line" ] && continue 
    if [[ $line =~ ^[[:alnum:]] ]] <-----this is not working....matching every line 
     then 
     newLine=$(trim "$line") 
     match="matched ^a-zA-Z0-9" 
    elif [[ $line =~ ^[[:space:]] ]] 
     then 
     line="$(trim "$line")" 
     newLine="${newLine}|${line}" 
     match="matched ^tab/space" 
    fi 
    echo -e "line number=$i match=$match line=$line new-ine value-->"$newLine"<--" 
    echo 
done < $myFile 

ty。

Answer 1

這可以用下面的sed腳本來實現：

:a 
N 
s/\(\n\) \([-a-z][-a-z]*\)/|\2\1/ 
s/\n */:/ 
$!ta 
s/:|/:/g 
P 
d 

在您輸入它產生預期的輸出：

% sed -f script.sed data 
my-group|group-code:AXZ1|description:|state:CA|items:something:something2|last-member-name:XYZ 
my-group|group-code:PORTU1|description:|state:CT|items:something:something2|last-member-name:FQRTZ 

其中script.sed包含前面的腳本。

演練

:a  Label marking the start of our loop 
N  Read next line of input 
s/…/…/ If the structure matches a key:value declaration, translate it 
$!ta  and return to a, to read the next key (unless we're at end of file) 
s/:|/:/g Otherwise, clean the fields, 
P   print text gathered so far, 
d   and start a new cycle 

注意，我的sed在s命令的替換文本不承認\n，這就是爲什麼我必須把它保存在一組。

Answer 2

我在GNU awk和-v RS=和gensub()附近玩耍，但看起來太像其他答案。

這裏是一個awk命令，通過使用-F"[[:space:]]*"使前導空格顯著：

awk -F"[[:space:]]*" ' 
    NF==1 {if(b!="") print b; b=$1} 
    NF==2 {b=b (b~/:$/?"":":") $2} 
    NF==3 {b=b "|"$2":"$3} 
    END {print b}' data 

這裏的演練：

• 當NF==1打印最後b或啓動輸出線b
• 當NF==2捕獲無標籤字段並將它們附加到b與以前的標籤。使用三元運算符來決定何時在前面加上「：」
• 當NF==3格式的鍵/值對，並把它們添加到b
• 在END，打印存儲在b

在其他線下決賽單詞，逐行建立緩衝區，然後在遇到新記錄時或在END處輸出。

---

暫時，這裏是原來的問題數據的副本：

my-group 
    group-code      AXZ1 
    description 
    state       CA 
    items 
            something 
            something2 
    last-member-name    XYZ 

my-group 
    group-code      PORTU1 
    description 
    state       CT 
    items 
            something 
            something2 
    last-member-name    FQRTZ 

Answer 3

我想感謝所有誰回答我最初的問題的人。我會接受你的答案之一。

但是，這是我的工作，它工作正常。

#!/bin/bash 
myfile=$1 

function trim() 
{ 
    local var=$@ 
    var=$(echo "$var"|sed -e "s/^\s*//" -e "s/\s*$//" -e "s/[ \t]\{1,\}/:/") 
    echo -n "$var" 
} 

newLine='' 
i=0 
linesInFile=$(wc -l $myfile|awk '{print $1}') 
while IFS= read line 
do 
    i=$[i + 1] 
    [[ ! $line =~ [[:alnum:]\*] ]] && continue 
    if [[ $line =~ ^[[:alnum:]] ]]; then 
     if [[ $newLine != '' ]]; then 
      echo $newLine 
     fi 
     newLine=$(trim "$line") 
    elif [[ $line =~ ^[[:space:]]{4,} ]]; then 
     newLine="${newLine}:$(trim "$line")" 
    elif [[ $line =~ ^[[:space:]] ]]; then 
     newLine="${newLine}|$(trim "$line")" 
    fi 
    if [[ $linesInFile -eq $i ]]; then 
     echo $newLine 
    fi 
done < $myfile 
IFS=$' \t\n'