如何合并不以特定字符开头的行

【问题标题】：how to merge lines that do not begin with certain character如何合并不以特定字符开头的行
【发布时间】：2016-09-28 10:49:33
【问题描述】：

如果我有以下情况：

>A13P0
ACCATAGAGAG
CCCGAGATTTA
>03HK2
ACACAGTGTGT
TTAGAGGGAGA

如何合并不以> 开头的行？

即

>A13P0
ACCATAGAGAGCCCGAGATTTA
>03HK2
ACACAGTGTGTTTAGAGGGAGA

谢谢！

【问题讨论】：

【解决方案1】：

perl -ne'
   if (/^>/) {
      print("\n") if $. != 1;
   } else {
      chomp;
   }
   print;
} {
   print("\n") if $. != 1;
'

【讨论】：

【解决方案2】：

我知道这已经被问/回答了一千次，但我找不到它：

$ awk '/^>/{print (NR>1?ORS:"") $0; next} {printf "%s", $0} END{print ""}' file
>A13P0
ACCATAGAGAGCCCGAGATTTA
>03HK2
ACACAGTGTGTTTAGAGGGAGA

【讨论】：

【解决方案3】：

使用 perl 命令行：

perl -pE '$.>1 && !s/^>/\n>/ && chomp; END{say}' file

【讨论】：

【解决方案4】：

使用 sed ：

$ sed ':a;$!N;/>/!{s/\n\([^>]\)/\1/;ta};P;D' file
>A13P0
ACCATAGAGAGCCCGAGATTTA
>03HK2
ACACAGTGTGTTTAGAGGGAGA

【讨论】：