Author image James A. Duncan


OpenFrame::AppKit::Examples::Hangman - Hangman


OpenFrame::AppKit::Examples::Hangman is part of the simple hangman web application. The module contains all the logic and presentation for Hangman.

Note that the application has two main entry points: the default() and the guess() subroutines. The $epoint hash at the beginning of the module sets up the call to guess() if a "guess" parameter is passed in the request. Otherwise, default() is called.

Each entry point is given itself, the session, an abstract request, and per-application configuration. They then contain application logic - note that we store a Games::GuessWord object inside $self and that this is magically persistent between calls.

This code is small and clean as the output is generated by OpenFrame::AppKit::Segment::TT2 later on in the slot process. Any messages are passed in $self.


Leon Brocard <>


Copyright (C) 2001-2, Fotango Ltd.

This module is free software; you can redistribute it or modify it under the same terms as Perl itself.