CGI入门教程 |
第三页:BODY部分 #*****************BEGIN BODY*************print "<h1>Thank you for filling out the form</h1>"; $firstname
= $value[0]; 对于Perl,我们需要知道:
第一行很直接 - print将打印随后的内容到屏幕上。要打印的内容必须在引号内,其中可以包含HTML标记符。 readparse子过程自动把HTML FORM中的内容放入一个称为value的数组中。这样,第一个文本框中的内容是$value[0],第二个文本框中的内容是$value[1],等等 - 数组下标以0开始。 第二行我们执行命令: 第三行和第四行与此类似: 程序的最后三行把文本和变量打印到屏幕上。 print "Your first name is $firstname<BR>";print "Your last name is $lastname<BR>"; print "Your e-mail is $email<BR>"; 注意变量被包含在双引号中。在其它语言,如JavaScript中,我们必须显式的连接文本和变量。在Perl中,当它看到$时,就会使用变量的内容。不错,是吧?但是要注意,只有双引号才能这样,单引号只是从字面上引用其中的内容。 |