perl正则表达式语句?
String $qq="Management Switch 10/100 Mbps Ethernet Network Interface 4"
通过perl去掉没用的得到
String $qq="10/100 Ethernet Interface 4"
就可以了 我记得有个贪婪匹配 忘了
初学 线等
[解决办法]
my $qq="Management Switch 10/100 Mbps Ethernet Network Interface 4";$qq =~ s/Management.*?(?=\d{2})//g;$qq =~ s/(?<=\/\d{3}\s).*?(?=Eth)//g;print $qq;print "\n";