my ( $self, $class, $port, $host, $options ) = @_;
$options ||= {};
+
+ $self->{options} = $options;
if ($options->{background}) {
my $child = fork;
my $sel = IO::Select->new;
$sel->add( \*STDIN );
-
+
+ REQUEST:
my ( $path, $query_string ) = split /\?/, $uri, 2;
# Initialize CGI environment