Select Code to Download

perl -MYAPE::Regex::Explain -E 'say YAPE::Regex::Explain->new("\b (MOD
+ULE \s+ [A-Z]+[0-9]+) \s* [(] .+? [)]")->explain'

The regular expression:

...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------

#!/usr/bin/env perl

...
print $exp;

exit;

The regular expression:

...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------