regex - 如何跟踪正则表达式匹配的执行？

Question

在评估 m// 期间，是否有一种方便的方法可以跟踪正则表达式引擎的状态？或 s///表达？

顺便说一句，我知道有一个 Regexp::Debugger package可以通过 CPAN 获得(而且它非常酷)，但我没有看到一种方法可以从中获得任何类似的痕迹；我不想逐步完成大量潜在的步骤。

Answer 1

是的。将正则表达式引擎转为 Debug模式，它将打印正在执行的操作:

use re 'debug'; 

my $str = "abcdefg";
$str =~ m/[ef]+/;

这给出了以下输出:

Compiling REx "[ef]+"
Final program:
   1: PLUS (13)
   2:   ANYOF[ef] (0)
  13: END (0)
stclass ANYOF[ef] plus minlen 1 
Matching REx "[ef]+" against "abcdefg"
Matching stclass ANYOF[ef] against "abcdefg" (7 bytes)
   4 <abcd> <efg>            |  1:PLUS(13)
                                  ANYOF[ef] can match 2 times out of 2147483647...
   6 <abcdef> <g>            | 13:  END(0)
Match successful!
Freeing REx: "[ef]+"