Bash 从可变长度换行输入创建csv_Bash_Awk

Bash 从可变长度换行输入创建csv

bash awk

Bash 从可变长度换行输入创建csv,bash,awk,Bash,Awk,看起来很简单，但我已经玩了一段时间，找不到优雅的东西所以我有这样的数据： Field1 09:30 Field2 H Field3 Happy Field1 09:35 Field3 Sad Field1 09:40 Field2 C Field1 09:45 Field2 P Field3 Pleased awk -f csv.awk input.txt 。。。基本上，字段1将始终存在，其他字段是可选的。我想将其拆分为csv（遗憾的是我不能使用python），以便适当地保留空格 09:3

看起来很简单，但我已经玩了一段时间，找不到优雅的东西

所以我有这样的数据：

Field1 09:30
Field2 H
Field3 Happy
Field1 09:35
Field3 Sad
Field1 09:40
Field2 C
Field1 09:45
Field2 P
Field3 Pleased

awk -f csv.awk input.txt

。。。基本上，字段1将始终存在，其他字段是可选的。我想将其拆分为csv（遗憾的是我不能使用python），以便适当地保留空格

09:30, H, Happy
09:35, , Sad
09:40, C, 
09:45, P, Pleased

让我们试试这个：

awk 'BEGIN{OFS=", "}
     p && /Field1/
         {    print a["Field1"], a["Field2"], a["Field3"];
              a["Field1"]=a["Field2"]=a["Field3"]=""
         }
     {a[$1]=$2; p=1}
     END{print a["Field1"], a["Field2"], a["Field3"]}
    ' file

它返回：

$ awk 'BEGIN{OFS=", "} p && /Field1/ {print a["Field1"], a["Field2"], a["Field3"]; a["Field1"]=a["Field2"]=a["Field3"]=""} {a[$1]=$2; p=1} END{print a["Field1"], a["Field2"], a["Field3"]}' file
09:30, H, Happy
09:35, , Sad
09:40, C, 
09:45, P, Pleased

解释

```
BEGIN{OFS=“，”}
```
将输出字段分隔符设置为
```
，
```
（逗号，空格）
```
p&&/Field1/{}
```
如果
```
p
```
标志为“开”，且该行包含
```
Field1
```
，则执行
```
{}
```

打印一个[“Field1”]、一个[“Field2”]、一个[“Field3”]

打印

a[]

数组的三个值

a[“Field1”]=a[“Field2”]=a[“Field3”]=”

清空数组

```
{a[$1]=$2；p=1}
```
对于每一行，将第二列值存储在
```
a[]
```
数组中。另外，激活
```
p
```
标志，以便在找到下一个
```
字段1
```
时开始打印行

END{print a[“Field1”]、a[“Field2”]、a[“Field3”}

打印最后一段数据

awk

# new records always starting with Field1
/Field1/ {
  # print record if it isset
  if(length(r[0])>0) {
    printf "%s, %s, %s\n", r[0], r[1], r[2]
  };  

  # reinitialize record
  r[0]=r[1]=r[2]=""

  # copy value
  r[0]=$2
}

/Field2/ {
  # copy value
  r[1]=$2
}

/Field3/ {
  # copy value
  r[2]=$2
}

# the END block idea comes from @fedorqui. Thanks!
END {
  # print record if it isset
  if(length(r[0])>0) {
    printf "%s, %s, %s\n", r[0], r[1], r[2]
  };  
}

csv.awk

awk

Field1 09:30
Field2 H
Field3 Happy
Field1 09:35
Field3 Sad
Field1 09:40
Field2 C
Field1 09:45
Field2 P
Field3 Pleased

awk -f csv.awk input.txt

perl

perl -lane 'if(/Field([\d])/){
               if($1==1 && $.!=1)
                 {
                  print join ",",@a;
                  undef @a 
                 }
                 $a[$1-1]=$F[1]}
             END{print join ",",@a}' your_file

/Field（[\d]）/

$a[$1-1]=$F[1]->

if($1==1 && $.!=1)
                 {
                  print join ",",@a;
                  undef @a 
                 }#

end

> cat temp
Field1 09:30
Field2 H
Field3 Happy
Field1 09:35
Field3 Sad
Field1 09:40
Field2 C
Field1 09:45
Field2 P
Field3 Pleased
> perl -lane 'if(/Field([\d])/){if($1==1 && $.!=1){print join ",",@a;undef @a }$a[$1-1]=$F[1]}END{print join ",",@a}' temp
09:30,H,Happy
09:35,,Sad
09:40,C
09:45,P,Pleased
>

awk-f so.awk input.txt

function dump() { if (a[1]!="") print a[1],a[2],a[3]; a[2]=a[3]=""; }; 
BEGIN { RS="Field"; OFS=", "; a[1]=a[2]=a[3]="" } 
END {dump()}
{ if ($1=="1") dump(); a[$1]=$2; }

END

$a[$1-1]=$F[1]

awk

script.awk

awk-f script.awk运行您的_文件