@H_404_2@
编写一个程序,我从一个文件中读取一个单词/符号列表,然后在另一个文本正文中搜索每一个.
所以它是这样的:
while(<FILE>){ $findword = $_; for (@text){ if ($_=~ /$find/){ push(@found,$_); } } }
但是,一旦括号出现,我就遇到了麻烦.它给了我这个错误:
Unmatched ( in regex; marked by <-- HERE in m/( <-- HERE
我意识到这是因为Perl认为(是正则表达式的一部分,但我如何处理这个并使(可搜索?)
解决方法
@H_404_2@