Perl：在没有第一行的情况下连接.txt的所有行

我的问题的目的是将文件的所有行连接成一行，忽略第一行。我有以下代码：

perl -pe 's/\n/ /g;' file

它连接文件的所有行，包括第一行。你知道有什么办法避开第一条线吗

另一种方法是：

foreach $line (<SEQ>) {
    next if $. == 1;
    chomp $line;     
    $one .= $line; }

但这需要太长时间

提前谢谢

perl -pe '$_="" if $.==1; s/\n/ /g;' file

在脚本中：

use File::Slurp 'read_file';
my $out = read_file('filename');
$out =~ s/\A.*?\n//;
$out =~ tr/\n/ /;

---

非常感谢！！这就是我一直在寻找的。你能像在脚本中一样编写它吗？如果我不能使用File:：Slurp怎么办？为什么在安装它之后你就不能使用File:：Slurp呢？如果你不想用正确的方法来编写，那么有很多关于如何出错的咒语；这里有一个非常错误的方法：my$out=map~~readline！开门*{！$\u}，$/=\$\ u0，文件名；尾巴-n+2。。。方法优先。

tail -n +2 file | tr '\n' ' '

use File::Slurp 'read_file';
my $out = read_file('filename');
$out =~ s/\A.*?\n//;
$out =~ tr/\n/ /;