代码详解
#********* begin body********************
open (logfile, ">>guestbook.log");
$newline=join(’::’,@value);
print logfile ("$newline\n");
close logfile;
print "<body bgcolor=’beige’><h1>thank you. ";
print "your comments have been added</h1>";
#******** end body************************
--------------------------------------------------------------------------------
代码的第一行是：
open (logfile, ">>guestbook.log");
这行为要写的guestbook.log做准备。open命令用来打开文件进行输入和输出。这里的"logfile"称为文件句柄。后面，当我想对guestbook.log文件进行附加操作时，可以用print logfile。对于程序的其余部分，logfile就表示guestbook.log。后面的文件名以两个大于号开始，这是常用的文件操作方式中的一种，我们常用的操作方式有三种：
< - 打开文件进行输入操作（读文件）。
> - 打开文件进行写操作（覆盖文件）。
>> - 附加操作。
下一行是join语句。这是一个把数据加入无限制的文本文件的非常有用的工具。$newline=join(’::’,@value); 表示在数组@value中的每个值之间加入两个分号。
$newline现在包含的内容为：
robert::young::5 main st.::anytown::ma::02177::(617) 555-1212::robyoung@mediaone.net::on::this is great
现在可以把$newline加入到guestbook.cgi的最后。因为log文件已经有了一个句柄，可以这样操作：
print logfile ("$newline\n");
并且在$newline后面加一个换行符，以后在加新内容时，将以新行开始。
close logfile;
- 关闭文件。
最后，在屏幕上输出一些信息。这不只是礼节。所以可以这样：
print "<body bgcolor=\’beige\’><h1>thank you. your comments have been added</h1>";
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器
