Perl替换运算符可以匹配数组中的元素吗?

前端之家收集整理的这篇文章主要介绍了Perl替换运算符可以匹配数组中的元素吗?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有这样的数组
my @stopWords = ("and","this",....)

我的文字在这个变量中

my $wholeText = "....and so this is...."

我想匹配标量wholeText中我的stopWords数组的每个元素的每个出现,并用空格替换它.

一种方法如下:

foreach my $stopW (@stopWords)
{
   $wholeText =~ s/$stopW/ /;
}

这可以工作并替换所有停用词的每次出现.我只是想知道,如果有更短的方法.

像这样:

$wholeText =~ s/@stopWords/ /;

以上似乎并不奏效.

解决方法

grep{$wholeText =~ s/\b$_\b/ /g}@stopWords;

猜你在找的Perl相关文章