1 2 3 4 5 6 7 8 9
#!perl use warnings; use strict; use HTTP::Server::Simple::CGI; my $server = HTTP::Server::Simple->new(); $server->run();