不知道你想把加上换行后的值保存在什么样类型的变量里。
1.结果保存在标量里：
my $str = "hello world";
my $rst = join "\n",split(/ /, $str);
print "$rst";
输出结果：
hello
world
2.结果保存在列表里
my $str = "hello world";
my @rst = map { $_."\n" } split(/ /, $str);
print "$rst[0]";
print "$rst[1]";
输出结果：
hello
world
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024