or download this
perl -MYAPE::Regex::Explain -e "my $rex = qr(s/.*\/(.*).lib/$1/); prin
+t YAPE::Regex::Explain->new($rex)->explain"
The regular expression:
...
----------------------------------------------------------------------
) end of grouping
----------------------------------------------------------------------