1#@!#!123s

32759 1#@!#!123s

: / usr / share / doc / perl-HTTP-Server-Simple / ex /

Filename : sample_server

back

#!/usr/bin/perl

use warnings;
use strict;

use HTTP::Server::Simple::CGI;

my $server = HTTP::Server::Simple->new();
$server->run();