免费注册	查看新帖 \|


平台论坛博客文库

› 论坛 › 程序设计 › Perl › Perl Web Server.

最近访问板块

发新帖

查看: 3888 | 回复: 2

上一主题

下一主题

Perl Web Server. [复制链接]

论坛徽章:: 0

电梯直达

跳转到指定楼层

1楼 [收藏(0)] [报告]

发表于 2003-06-03 17:39 |只看该作者 |倒序浏览

$_=q^use IO::Socket;$s=new IO::Socket::INET(Listen=>;5,LocalPort=>;8888);s
/./"&#".ord($&).";"/eg;while(select$c=$s->;accept){<$c>;=~m#/+(\S+)#;$i=$1
!~/\.\./*open(f,$1)?join"",<f>;:"<html>;<pre>;\$_=q%c$_%c;eval</pre>;</html>;
";-e$1&&$1=~/cgi$/?eval$i:printf"HTTP/1.0 200$/$/$i",94,94;close}^;eval

复制代码

文库|博客

论坛徽章:: 0

2楼 [报告]

发表于 2004-03-08 00:12 |只看该作者

Perl Web Server.

看不懂，请指教。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

论坛徽章:: 0

3楼 [报告]

发表于 2007-03-26 11:07 |只看该作者

web监控程序？看不太懂。。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

发新帖

Chinaunix › 论坛 › 程序设计 › Perl › Perl Web Server.

北京盛拓优讯信息技术有限公司. 版权所有京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号：11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员联系我们：huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP