#!/usr/bin/env perl

use strict;
use warnings;

use YAPE::Regex::Explain;

my $re = qr/ \b (MODULE \s+ [A-Z]+[0-9]+) \s* [(] .+? [)] /x;

my $exp = YAPE::Regex::Explain->new($re)->explain;

print $exp;

exit;