in reply to Break down a regex expression into single regex?
Your question has implications very like this recent thread: Reverse regexp a regexp?
However, YAPE::Regex::Explain may do something like what you want.
HTH,