内容摘要：在Perl中我们使用一个名为CGI.pm的模块来进行CGI的编程，在其中提供了许多现成的东西供我们使用，下面我们通过两个简单的例子对CGI模块的基本功能有一个初步的了解。
然后下面一句是“$q->start_html("hello perl world!"),”这一句将会产生如下的Html代码：
<html><head></head><body>
我们还可以通过给start_html参数来进行其他的html文件head段设置。
然后我们运行了“$q->h1('hello perl world'),”这一句可以得到如下Html代码:
<h1>hello Perl world</h1>
最后一句是“ $q->end_html();”这一句产生如下下代码“</body></html>”,一个Html文件就这么结束了。
下面我们用一个例子解释CGI模块怎么处理用户的输入：
#!/usr/bin/perl -w
use CGI qw/:standard/;
{
my $cgi= new CGI;
print $cgi->header,
$cgi->start_html('A Simple Example'),
$cgi->h1('A Simple Example');
if ( $cgi->param())
{
print "Your name is ",
$cgi->param('name');
}
$cgi->end_html();
}
如果在这个程序地url后面加上“?name=cyfer”就会打印出来“your name is cyfer”，呵呵。这里通过“$cgi->param("name");”这一句可以得到传递给CGI程序的参数。这个参数在没有CGI模块的时代要费多大劲才可以得到啊！555...
好了今天就到这里吧！我们这两个简单的例子实际上已经可以展现CGI模块的优势了。呵呵，有问题一定要问啊！
责编：豆豆技术应用