regex - 如何匹配 perl 正则表达式中最后一次出现某个 char 之后的所有内容？

Question

例如，返回 axghdfx445 中最后一个 x 之后的字符串部分(应返回 445)。

Answer 1

my($substr) = $string =~ /.*x(.*)/;

来自 perldoc perlre:

By default, a quantified subpattern is "greedy", that is, it will match as many times as possible (given a particular starting location) while still allowing the rest of the pattern to match.

这就是为什么 .*x 将匹配最后一次出现的 x。