正则表达式匹配包含句号perl的“单词”

Question

我正在浏览一个TCPDUMP文件（格式为.txt）并尝试拉出包含使用＆＃34; word＆＃34; V.I.D.C.A.M.它嵌入在一堆时期之间，并且包含了让我搞砸的时期，这是一个例子：

  

电子..）.. @ 8Q ... obr.f ... $ [...... TP..P＆LT; ........中小企业..... ................................. NTLMSSP ......... 0 ...... ...`BM ......... LL＆LT; ... VIDCAM .... .... VIDCAM .... VIDCAM .... VIDCAM ......... VIDCAM ....视窗0.5 ... 1 ... W.i.n.d.o.w.s。 .2.0.0.0。 .L.A.N。 .M.a.n.a.g.e.r ..

你如何处理这样的事情？

Answer 1

你需要逃避时期：

if ($string =~ m{V\.I\.D\.C\.A\.M\.}) {
    ...
}

或者如果你的字符串是完全引用的，请使用\Q来逃避后面的任何元字符。

if ($string =~ m{\QV.I.D.C.A.M.})