正则表达式 – 在perl中搜索括号

前端之家收集整理的这篇文章主要介绍了正则表达式 – 在perl中搜索括号前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
@H_404_2@
编写一个程序,我从一个文件中读取一个单词/符号列表,然后在另一个文本正文中搜索每一个.

所以它是这样的:

while(<FILE>){
    $findword = $_;

    for (@text){
        if ($_=~ /$find/){
            push(@found,$_);
        }
    }
}

但是,一旦括号出现,我就遇到了麻烦.它给了我这个错误

Unmatched ( in regex; marked by <-- HERE in m/( <-- HERE

我意识到这是因为Perl认为(是正则表达式的一部分,但我如何处理这个并使(可搜索?)

解决方法

你可以使用 \Q and \E

if ($_ =~ /\Q$find\E/){

或者只是使用index,如果你只是寻找文字匹配:

if(index($_,$find) >= 0) {
@H_404_2@

猜你在找的正则表达式相关文章