Question

您好我有以下文件：

>101
ADFGLALAL
GHJGKGL
>102
ASKDDJKJS
KAKAKKKPP
>103
AKNCPFIGJ
SKSK

等等;

我需要它采用以下格式：

>101
ADFGLALALGHJGKGL
>102
ASKDDJKJSKAKAKKKPP
>103
AKNCPFIGJSKSK

我该怎么做？也许是perl one liner？

非常感谢！

Answer 1

perl -npe 'chomp if ($.!=1 && !s/^>/\n>/)' input

如果开头没有chomp（>为false），请删除最后一行（!s/^>/\n>/）的换行符。另外，如果这不是第一行（$.!=1）并且在行的开头有>（s/^>/\n>/），请在行的开头添加换行符。

Answer 2

perl -lne '
    if (/^>/) {print}
    else{
        if ($count) {
            print $string . $_;
            $count = 0;
        } else {
            $string = $_;
            $count++;
        }
    }
' file.txt

通过分隔符将文件拆分为单行

2 个答案: