#!/usr/bin/perl -w

use lib( qw(.) );
use EnoughMonkeys::Simple;

$monkey = new EnoughMonkeys::Simple;

# get things running
$monkey->go();
$monkey->getKeyPress();
$monkey->getLastTen();

# display the page
$monkey->displayHeader();
print $monkey->getBuffer();
$monkey->displayFooter();

exit;