如何在正则表达式模式中使用包含方括号的字符串变量?

ajc*_*125 0 perl

试图用方括号匹配一个字符串。

例如:

my $foo = "debug_bus[0]";
my $bar = "debug_bus[0][12:0] = some_value;";

if ($bar =~ $foo)
{
    print "Match\n";
}
else
{
    print "No Match\n";
}
Run Code Online (Sandbox Code Playgroud)

我会期望“匹配”,但是我不断收到“不匹配”,这使我相信“​​ [0]”中的括号可能会引起问题?

Mat*_*cob 5

您需要使用(内部)或(外部)在正则表达式中正确转义(“引号”)元字符\Q...\Equotemeta

因此,您需要:

$bar =~ m/\Q$foo\E/;
Run Code Online (Sandbox Code Playgroud)

要不就:

$bar =~ /\Q$foo/;
Run Code Online (Sandbox Code Playgroud)

您可以省略m定界符为的时间//,而\E在这种情况下则不需要,因为模式中没有其他内容。