我正在尝试将 HTML 文档拆分为其头部和主体:
my @contentsArray = split( /<\/head>/is, $fileContents, 1);
if( scalar @contentsArray == 2 ){
$bodyContents = $dbh->quote(trim($contentsArray[1]));
$headContents = $dbh->quote(trim($contentsArray[0]) . "</head>");
}
是我所拥有的。 $fileContents 包含 HTML 代码。当我运行它时，它不会 split 。有谁知道为什么吗？
最佳答案
要拆分的第三个参数是要产生多少个结果，因此如果您只想应用一次表达式，您将传递 2。
请注意，这实际上限制了模式用于拆分字符串的次数(比传递的次数少一次)，而不仅仅是限制返回结果的数量，因此:
print join ":", split /,/, "a,b,c", 2;
输出:
a:b,c
不是:
a:b
关于html - 为什么我用Perl的split函数没有split？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/2216274/