search.cpan.org is shutting down
For details read Perl NOC. After June 25th this page will redirect to MetaCPAN.org
For details read Perl NOC. After June 25th this page will redirect to MetaCPAN.org
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 <leon@fotango.com>
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.
