perl - Perl系统命令拆分忽略html

Question

my $hosts = qx{cat /home/user/hostlist};
my @hostfield = split(/\\n/, $hosts);
print "$_<br />\n" foreach (@hostfield);

输出给了我主机列表但没有插入 br 语句，一旦我开始插入其他命令以执行而不是打印，这将非常重要。我错过了什么吗？

Answer 1

\n由于您的双反斜杠 ( )，您正在拆分文字反斜杠后跟 n ( \\)。

您应该更改的只是删除\split() 中的多余部分。

Answer 2

cat仅仅为了读取文件而掏空是很浪费的。

相反，你可以写这个

our @ARGV = ('/home/user/hostlist');
print s|$|<br/>|r while <>;