用Perl制作留言本实例

Guest-book在网页设计中占有相当重要的地位，以至于可以和记数

器相提并论。留言本可以用许多编程语言来设计，当然使用最多的还是

perl和vb两种。本次cgi教程我们将谈谈在编写Guest-book中最应该注

意的问题，并将给出一个不算很完整的程序代码。

就现在的情况来看，一个标准的guest-book程序一般包括三个文

件。提交表单文件

（form.html)、cgi处理文件(guest-book.cgi)和最后的输出文

件（book.html)。有些vb程序以access数据库为后台存储格式，以方便

用户查找留言。下图给出了guest-book的工作流程。

form.html

＜h1>＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">留言本＜/span>＜/h1>

＜form action=/cgi-shl/guest-book.cgi method=post>

＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">＜/span>

＜p>＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">名字：

＜input name=name>

＜/span>

＜p>＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">email:

＜input name=email size=30>

＜/span>

＜p>＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">意见：

＜textarea cols=30 name=suggest rows=4>＜/textarea>

＜/span>

＜p>＜span style="FONT-SIZE: 9pt; LINE-HEIGHT: 15pt">

＜input type=submit value=提交 name="submit">

＜input type=reset value=取消 name="reset">

＜/span>

＜/form>