编写的一个简单 Web服务器代码,Perl代码库,德仔网

代码语言

代码分类

【Perl】编写的一个简单 Web服务器

作者:汶纡 / 发布于2014/11/18/ 1068


	use HTTP::Daemon;

	$HTTPserver = HTTP::Daemon->new(Timeout => 600);

	print "My URL is: ", $HTTPserver->url, ".\n";

	while ($HTTPclient = $HTTPserver->accept) {
	 $HTTPclient->autoflush(1);
	 print $HTTPclient
	'<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
	<HTML>
	<HEAD>
	<TITLE>Welcome to my Web server!</TITLE>
	</HEAD>
	<BODY>
	<CENTER>
	<H1>Welcome to my Web server!</H1>
	</CENTER>

	</FORM>

	</BODY>

	</HTML>';

	$HTTPclient->close;
	}

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

试试其它关键字

　Web服务器　

同语言下

.获取本机所有IP和设备的绑定情况
.生成隨機密碼
.取文件的最后修改时间
.获取本机所有IP和设备的绑定情况
.将perl脚本变成乱糟糟的一团
.从 HTML网页中解析出链接
.使用 HTTP::Request 请求 URL 并将响应保存到文件
.使用指定的User-Agent抓取网页
.使用 Net::SMTP发送邮件
.编写的一个简单 Web服务器

可能有用的

.SQL查询多列合并成一行用逗号隔开
.一行一行读取txt的内容
.C#动态修改文件夹名称(FSO实现，不移动文件)
.c# 移动文件或文件夹
.c#图片添加水印
.Java PDF转换成图片并输出给前台展示
.网站后台修改图片尺寸代码
.处理大图片在缩略图时的展示
.实现对图片上传的接收
.判断用户输入的是否为IP地址

汶纡贡献的其它代码(55)

.手机类型判断
.sql 节假日判断（春节、中秋、国庆、周末等）
.使用LEFT OUTER JOIN 实现not in 子句
.获取图片宽度高度、大小尺寸、图片类型、用于布局的im
.简单的大视频截取播放功能
.如何通過ID號來刪除DataTable中的行
.检测远程URL是否存在
.阻止html页面加载
.sql生成九九乘法表
.oracle存储遍历表中数据