Select Code to Download

#!/usr/bin/perl
use 5.012003;   # Perl version requirement                            
+   
...
};  

runtests unless caller;

ok 1 - A Game::Bowling counts that the score is 0, if 0 pins are shot
ok 2 - A Game::Bowling counts that the score is 40, if 2 pins are shot
+ at each roll
...
ok 7 - A Game::Bowling takes into account a strike in the last frame
ok 8 - A Game::Bowling with zero players is not interesting
1..8