regex - 在 Perl 正则表达式中转义 @

Question

我使用 perl 将密码与 bash 脚本中的正则表达式匹配。

在测试密码的正则表达式时，我遇到了这个问题:

这有效:

perl -e 'if ( "Bomba\@2071"  =~ /^(?=.*[A-Z])(?=.*[!@#$&*])(?=.*[0-9])(?=.*[a-z].*[a-z].*[a-z]).{8,}$/ ) { print 1; } '

虽然这永远不会匹配:

perl -e 'if ( "Bomba@2071"  =~ /^(?=.*[A-Z])(?=.*[!@#$&*])(?=.*[0-9])(?=.*[a-z].*[a-z].*[a-z]).{8,}$/ ) { print 1; } '

正如您所注意到的，它之所以有效，是因为我转义了 @ 符号。我从未在其他编程语言中看到过这样的事情，在坚持了一个多小时之后，我偶然找到了原因。

所以，我的问题是，这里发生了什么？为什么我需要转义像@ 这样的奇怪字符？

Answer 1

这是因为 @在 perl 中表示 array variable ，所以不转义它下面的内容将被解释为数组变量。

除了逃避@ , 您也可以使用单引号代替双引号，例如'Bomba@2071' ，这样字符串就不会被解释，尽管在这种情况下它会产生一个新问题，因为您在 shell 命令中使用单引号来引用整个 perl 源。所以在这种情况下坚持逃避。