3.1 回应脚本
这段脚本将显示输入到HTML FORM中的文本。它是一个信息如何传递给你的程序的简单的例子。既然你现在已经有了一个有着正确的Perl和Senmail的路径的template.txt文
件,下面要做的只是编辑CGI的BODY部分。
拷贝下面脚本的BODY部分到template.txt,然后保存到一个新文件"test2.cgi"中。
FTP test2.cgi到perltour文件夹(或cgi-bin)中。
然后在Unix提示符下,进入perltour(或cgi-bin)文件夹,敲入chmoda+rx test2.cgi设置权限。
现在可以在你的浏览器中打开服务器上的testform.htm,测试这个form。当你填充这个form并按"Test It"时,CGI告诉你你输入了什么。
#!/usr/local/bin/perl
#
&readparse;
print "Content-type: text/htmlnn";
#
#*****************BEGIN BODY*************
print "<h1>Thank you for filling out the
form</h1>";
$firstname = $value[0];
$lastname = $value[1];
$email = $value[2];
print "Your first name is $firstname<BR>";
print "Your last name is $lastname<BR>";
print "Your e-mail is $email<BR>";
#***************END BODY******************
3.2 脚本解释
现在让我们看看这段代码。
#!/usr/local/bin/perl
#
&readparse;
print "Content-type: text/htmlnn";
#*****************BEGIN BODY*************
Unix上的每个CGI的第一行都是运行它的程序的路径。记住,你的可能与上面写的不同。
服务器将按这个路径定位Perl,然后用Perl解释器执行程序。这是唯一的有#并且对程序有意义的一行。
程序其余部分的#只是注释,程序将忽略其后的内容。
第三行是一个命令,&readparse;。这是一个子过程,输入所有进入HTML FORM中的文本。第四行对所有CGI都是必须的,它告诉服务器我们要打印的任何信息都
应该返回HTML文档。
这些行永远不会改变,因此下面我们集中在BODY部分的内容上。