Cgi入门教程之：9 BODY部分
点击次数：32 次 发布日期：2008-11-26 15:07:38 作者：源代码网
|
源代码网推荐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中，当它看到$时，就会使用变量的内容。不错，是吧？但是要注意，只有双引号才能这样，单引号只是从字面上引用其中的内容。 源代码网供稿. |
