Help for this page

Select Code to Download

Select or download this
```
perl wrapper.pl | perl game.pl
```

Select or download this

{
   my $answers = "yes\nyes\n";
...
   open STDIN, '<', \$answers;  # Requires Perl 5.8.0
   askQuestions()
}