regex - Perl：m/^.*\.(\d+)$/ 是什么意思？

Question

我有一个：

 my ($pid) = ($_ =~ m/^.*\.(\d+)$/);

$pid 匹配什么？

Answer 1

您不是$pid在这里匹配，而是匹配$_正则表达式 - m/^.*\.(\d+)$/。将存储与正则表达式模式$pid匹配的结果。$_

这是正则表达式模式的解释：

m/       # Delimiter
   ^     # Match beginning of string
   .*    # Match 0 or more repetition of any character except a newline
   \.    # Match a dot (.)
   (     # Start a capture group
     \d+ # Match 1 or more repetition of digits.
   )     # Close capture group
   $     # Match end of string
/        

因此，如果 中的值$_与上述模式匹配，$pid则将包含在第一个捕获的组中捕获的值，因为您在 周围有一个括号$pid，因此您的匹配操作将在列表上下文中进行评估。

您的匹配实际上与以下内容相同：

# Note you can remove the `m`, if you use `/` as delimiter.
my ($pid) = /^.*\.(\d+)$/   

还要注意的一件事是，由于您对开头匹配的文本没有做任何事情，因此您实际上不需要匹配它。因此，您可以.*完全删除，但在这种情况下，您必须从那里删除插入符号 (^)。因此，您的正则表达式现在可以替换为：

my $(pid) = /\.(\d+)$/