All the Perl that's Practical to Extract and Report
Just an idea to help me with the Perl 6 parser: now that blocks are completely regular, they can be parsed recursively.
