use warnings; use strict; use HTTP::Server::Simple::Test; my $server = HTTP::Server::Simple::Test->new(); $server->run();