You are looking at a very old, but free version of the course. If you are interesed the most recent version, check it out on the Perl Maven site.

9.2. Skeleton Server

First we create a skeleton server that does not do anything.

Example 9-1. examples/server/skeleton_server.pl

#!/usr/bin/perl -T
use strict;
use warnings;

use lib 'lib';
use SkeletonServer;

SkeletonServer->run(port => 8000);

Example 9-2. examples/server/lib/SkeletonServer.pm

package SkeletonServer;
use warnings;
use strict;

use base 'Net::Server';

sub process_request {
	# do your stuff
}


1;

If you are interested in on-site trainings by the author, please contact me directly.