Perl 6 Implementation of Hangman