急问：如何用perl编写一个最简单的web服务器

perl2008

1^# perl2008 发表于 2007-12-13 12:12

怎么做

Nosferatu

2^# Nosferatu 发表于 2007-12-13 12:38

use warnings;
use strict;

use HTTP::Server::Simple;

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

rdcwayx

3^# rdcwayx 发表于 2007-12-13 13:56

强的

放驴娃

4^# 放驴娃发表于 2007-12-13 14:02

等效于：

[Copy to clipboard] [ - ]

CODE:

$ perl -MHTTP::Server::Simple -e 'HTTP::Server::Simple->new->run'

perl2008

5^# perl2008 发表于 2007-12-13 19:03

好邪恶好强大啊，谢谢楼上的几位啰