Where Can I Find Demo/Sample Code For Perl 6?

I’ve got myself a copy of Rakudo and I’d love to give it a test drive. After looking around the Internet I found some code snippets of cool Perl 6 stuff, but no complete scripts. Any sites that make practical Perl 6 scripts available would be appreciated.

Thanks guys, Ehtyar.

Where Can I Find Demo/Sample Code For Perl 6?