Also, the parse-recdescent mailing list recently had a post by TheDamian with an nice example.
In reply to Re: Handling newlines in P::RD by metaperl in thread Handling newlines in P::RD by spurperl