Select Code to Download

use YAPE::Regex::Explain;
my $re = '[\w\d]+(^:[\w\d]+:$)\w+';
...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------