regex - 合并以 "+"开头的连续行

Question

我知道这是一个被问过很多次的问题，但我没有找到可以回答我的具体问题的答案。

本质上，我有一个输入文件，其中一些行以 + 字符串开头。这些行必须附加在上一行的末尾，并且必须删除 + 字符。所以

abc
def
+ ghj
klm

应该变成

abc
def ghj
klm

这是我通过查看其他答案制作的 perl 命令

perl -pe 's/\n\+ //m' < input

但它打印输入文件而不更改它。奇怪的是，在 regex101.com 这样的网站上，我的正则表达式产生了预期的结果。

我错过了什么？

Answer 1

大概这些是相对较小的文件，因此很容易装入内存？

这是最简单的方法

use strict;
use warnings 'all';

my $data = do {
    local $/;
    <DATA>;
};

$data =~ s/\n\+//g;

print $data;

__DATA__
abc
def
+ ghj
klm

输出

abc
def ghj
klm

在 Perl 单行代码中会是

perl -0777 -pe 's/\n\+//g' < input