·天新网首页·加入收藏·设为首页·网站导航
数码笔记本手机摄像机相机MP3MP4GPS
硬件台式机网络服务器主板CPU硬盘显卡
办公投影打印传真
家电电视影院空调
游戏网游单机动漫
汽车新车购车试驾
下载驱动源码
学院开发设计
考试公务员高考考研
业界互联网通信探索
您现在的位置:天新网 > 软件开发 > Web开发 > CGI开发
Cgi入门教程之:9 BODY部分
http://www.21tx.com 2005年11月17日 转载
CGI入门教程之:9 BODY部分
BODY部分 
#*****************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****************** 
--------------------------------------------------------------------------------
对于Perl,我们需要知道:

每行以分号结束。 
变量以$开始。 
第一行很直接 - print将打印随后的内容到屏幕上。要打印的内容必须在引号内,其中可以包含HTML标记符。
readparse子过程自动把HTML FORM中的内容放入一个称为value的数组中。这样,第一个文本框中的内容是$value[0],第二个文本框中的内容是$value[1],等等 - 数组下标以0开始。
第二行我们执行命令:
$firstname = $value[0]; 
这个语句创建一个称为$firstname的新变量,把$value[0]的内容赋给它。这意味着在HTML FORM中第一个文本框中输入的信息将包含在变量$firstname中。
第三行和第四行与此类似:
$lastname = $value[1]; $email = $value[2]; 
很明显,这两行分别把第二个和第三个文本框中的内容赋给变量$lastname和$email。
程序的最后三行把文本和变量打印到屏幕上。
print "Your first name is $firstname<BR>"; 
print "Your last name is $lastname<BR>"; 
print "Your e-mail is $email<BR>"; 
注意变量被包含在双引号中。在其它语言,如JavaScript中,我们必须显式的连接文本和变量。在Perl中,当它看到$时,就会使用变量的内容。不错,是吧?但是要注意,只有双引号才能这样,单引号只是从字面上引用其中的内容。

上一篇: Cgi入门教程之:13 设置口令
下一篇: Cgi入门教程之:12 代码详解

关于我们 | 联系我们 | 加入我们 | 广告服务 | 投诉意见 | 网站导航
Copyright © 2000-2011 21tx.com, All Rights Reserved.
晨新科技 版权所有 Created by TXSite.net