Question

I am trying to debug a few regular expressions using:

perl -Mre=debug file.pl

The file.pl script has many regular expression. Some of them are repeated. Using the above syntax, all the regexes in file.pl are being debugged.

Is there a way to tell Perl to debug only a particular regex in a script?

I am familiar with the YAPE::Regex module, but that is not what I require. So please don’t suggest to use that.

Answer 1

As with many other pragmas, you can use no to cancel previous use.

use re 'debug';

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

no re 'debug';

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