Select Code to Download

use strict;
use warnings;
...

my $explanation = YAPE::Regex::Explain->new($regex)->explain;
print $explanation;

The regular expression:

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