regex - Perl 正規表現のデバッグ

Question

以下を使用して、いくつかの正規表現をデバッグしようとしています。

perl -Mre=debug file.pl

file.plスクリプトには多くの正規表現があります。それらのいくつかは繰り返されます。上記の構文を使用すると、file.pl内のすべての正規表現がデバッグされます。

スクリプト内の特定の正規表現のみをデバッグするように Perl に指示する方法はありますか?

私はYAPE::Regexモジュールに精通していますが、それは私が必要としているものではありません。したがって、それを使用することを提案しないでください。

score 13 · Accepted Answer

他の多くのプラグマと同様に、を使用noして前のをキャンセルできますuse。

use re 'debug';

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

no re 'debug';

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

score 6 · Accepted Answer

5.9.5 の時点で、ディレクティブ use re 'debug' とそれに相当するものは、他のディレクティブと同様にレキシカルスコープです。

使用する：

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

2 に答える 2