If you're using Perl 5.10 or later, add the /p modifier to your regular expression, and then use the special variable ${^POSTMATCH} to see what came after the most recent successful match.

This approach is usually preferable to using the older $' (or $POSTMATCH) variable, because it doesn't cause a performance penalty to ripple through every single use of regular expressions throughout the rest of the program. See perlvar, and perlre for details.