perl -MMaypole::HTTPD -e 'Maypole::HTTPD->new(module=>"BeerDB")->run()'