使用 awk（或 sed）根据下一行的第一个字符删除换行符

Question

这是我的情况：我有一个大文本文件，我想从中提取某些信息。我使用 sed 根据正则表达式提取所有相关信息，但是我提取的每条“信息”都在单独的行上，我希望每个“记录”都在自己的行上，以便可以轻松地将其导入到数据库。
这是我现在的数据示例：

92831,499,000
,0644321
79217,999,000
,5417178
,PK91622
,PK90755

理想情况下，我希望此输出如下所示：

92831,499,000 ,0644321
79217,999,000 ,5417178 ,PK91622
79217,999,000 ,5417178 ,PK90755

这可能更难做到，所以我会满足于最后一个“记录”的输出只出现一次，附加的“PK...”是该行的第四个“字段”。< br> 最后，我能想到的最简单的方法是，如果该行以逗号（ ^, ）开头，则换行符应被删除...不过，我对 awk 不太熟悉，所以如果你能给我一个从此开始，我们将不胜感激！谢谢！

Answer 1

$ perl -0pe 's/\n,/,/g' < test.dat
92831,499,000,0644321
79217,999,000,5417178,PK91622,PK90755

翻译：批量读取，无需换行，只需用逗号替换换行符后面的每个逗号。

最短的代码在这里！

Answer 2

好吧，我想当我昨晚试图解决这个问题时，我应该仔细研究一下在 awk 中使用 Records 的情况……在查看它们 10 分钟后，我就开始工作了。对于任何感兴趣的人，我都是这样做的：
在我原来的 sed 脚本中，我在每条记录的开头放置了一个额外的换行符，因此现在有一个空行分隔每条记录。然后我使用以下 awk 命令：

awk 'BEGIN {RS = ""; FS = "\n"}
{
如果 (NF >= 3)
对于 (i = 3; i <= NF; i++)
打印 $1,$2,$i
}'

就像一个魅力，完全按照我想要的方式输出！

Answer 3

sedsed -d -n ':t;/^,/!x;H;n;/^,/{x;$!bt;x;H};x;s/\n//g;p;${x;/^,/!p}' filename

Answer 4

无需特殊外壳字段3，简单。

awk '
    !/^,/   { if (NR > 1) print x ; x = $0 }
    /^,/    { x = x OFS $0 }
    END     { if (NR) print x }
'

有了，更复杂但仍然不太难。

awk '
    !/^,/   { if (n && n < 3) print x ; x = $0 ; n = 1 }
    /^,/    { if (++n > 2) { print x, $0 } else { x = x OFS $0 } }
    END     { if (n && n < 3) print x }
'

Answer 5

这可能对您有用：

# sed ':a;N;s/\n,/,/;ta;P;D' test.dat | sed 's/,/\n/5;s/\(.*,\).*\n/&\1/'
92831,499,000,0644321
79217,999,000,5417178,PK91622
79217,999,000,5417178,PK90755

说明：

这分为两部分：

追加下一行，然后如果追加的行以 , 开头，则删除嵌入的新行 \n并重新开始。如果没有打印到换行符，然后删除到新行符。重复。

将第五个 , 替换为新行。然后将前四个字段插入嵌入的换行符和第六个字段之间。