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 <>;