Help for this page

Select Code to Download

Select or download this

use cgi
while (a request to localhost:6789 server)
{
  process the request with CGI.pm modules
}

Select or download this

use IO::Socket;
use Net::hostent;
use CGI;
...
    ' <BODY><H1>Dummy Page</H1></BODY>' . "\n" .
    '</HTML>' . "\n";
}