#!/usr/local/bin/perl
#
# A simple Gopher server
#
use strict;
use warnings;
use Gopher::Server::ParseRequest;
use Gopher::Server::RequestHandler::File;
# Constants
sub HOSTNAME () { 'localhost' }
sub PORT () { 70 }
sub ROOT () { '/home/www/data/gopher/' }
{
}