Perl IP地址范围的正则表达式

Question

我有一些互联网流量数据需要分析.我只需要分析某个IP范围内的数据包.所以,我需要写一个if声明.我想我需要一个正则表达式来测试条件.我对regexp的了解有点弱.有人能告诉我如何构建该条件的正则表达式.示例范围可能是

Group A
56.286.75.0/19 
57.256.106.0/21 
64.131.14.0/22 

Group B
58.176.44.0/21 
58.177.92.0/19 

该if声明会像

if("IP in A" || "IP in B") {
        do something
}

else { do something else }

所以我需要为"IP in A"和"IP in B"条件制作等效的regexp.

Answer 1

我不认为regexps为这个问题提供了很多优势.

而是使用Net :: Netmask模块."匹配"方法应该做你想要的.