大佬教程收集整理的这篇文章主要介绍了我如何知道Perl正则表达式的哪一部分与字符串匹配？，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。
这样的事情：
@H_256_4@my @regs = (qr/a/,qr/b/,qr/c/); foreach my $line (<ARGV>) { foreach my $reg (@regs) { if ($line =~ /$reg/) { printf("matched %s\n",$reg); } } }但这可能很慢.
似乎正则表达式编译器可以提供帮助.有这样的优化：
@H_256_4@my $master_reg = join("|",@regs); # this is wrong syntax. what's the right way? foreach my $line (<ARGV>) { $line =~ /$master_reg/; my $matched = special_function(); printf("matched the %sth reg: %s\n",$matched,$regs[$matched] }}
其中’special_function’是特殊的酱,告诉我正则表达式的哪一部分匹配.
以上是大佬教程为你收集整理的我如何知道Perl正则表达式的哪一部分与字符串匹配？全部内容，希望文章能够帮你解决我如何知道Perl正则表达式的哪一部分与字符串匹配？所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。