調試Perl的正則表達式

Question

我試圖用調試幾個正則表達式：

perl -Mre=debug file.pl 

的file.pl腳本有許多正則表達式。其中一些重複。使用上面的語法，正在調試file.pl中的所有正則表達式。

有沒有辦法讓Perl調試腳本中的特定正則表達式？

我熟悉YAPE :: Regex模塊，但這不是我所需要的。所以請不要使用它。

Answer 1

與許多其他編譯指示一樣，您可以使用no取消以前的use。

use re 'debug'; 

$str=~/\d{3}/; 

no re 'debug'; 

$str=~/\d{3}/; 

Answer 2

作爲5.9.5指令重新使用「調試」和其等價物詞法作用域，作爲其他指令是。

用途：

{ 
    use re 'debug'; 
    # Debugged regexp here. 
}