Bouncy balls with Perl 6

I realize that I haven’t been copying my Perl 6 posts to here.  In my latest, I make a simple text game of bouncy balls!