Perl脚本多行转为一行

您可以使用Perl的正则表达式和替换操作来将多行文本转换为单行。以下是一个简单的Perl脚本示例，可以把多行文本转换为单行：

#!/usr/bin/perl
use strict;
use warnings;

my $input = join("", <>);  # 读取所有输入行并连接为一个字符串
$input =~ s/\s+/ /g;       # 将所有空白字符替换为单个空格
print $input;

您可以使用重定向操作符来将输入文件传递给脚本，例如：

$ perl script.pl < input.txt > output.txt

这将把名为“input.txt”的文件作为输入，并将结果写入名为“output.txt”的文件中。