regex - 当我将它包含在另一个正则表达式中时如何转义正则表达式？

Question

我试图在另一个正则表达式中使用一个字符串作为正则表达式:

my $e = "a+b";
if ('foo a+b bar' =~ /foo ${e} bar/) {
    print 'match!';
}

不起作用，因为 Perl 将 + 视为特殊字符。如何在不更改 $e 的值的情况下转义它？

Answer 1

您可以使用 \Q and \E ，它将它们之间的正则表达式元字符视为文字:

#!/usr/bin/env perl
use strict;
use warnings;
use feature qw/say/;

my $e = "a+b";
if ('foo a+b bar' =~ /foo \Q$e\E bar/) {
    say 'match!';
}