CGI入门教程

第三页:读取log文件

print "</TABLE>\n";

#********* END BODY********************

  • 拷贝以上代码到template.txt文件的BODY部分。
  • 保存为getlog.cgi。
  • 把getlog.cgi用FTP上传到服务器的perltour文件夹中。
  • 在Unix提示符下,进入perltour文件夹,敲入chmod a+rx getlog.cgi。
  • 在浏览器中打开http://your.server.name/perltour/getlog.cgi,屏幕将显示所有用户输入的信息。

这段代码与前面的正相反,它从log文件中读信息。

open(LOGFILE, "<guestbook.log");

打开guestbook.log文件进行输入工作。

@entries=<LOGFILE>;

把文件的内容输入到数组@entries中。

print "<BODY bgcolor=beige>\n"

;
print "<TABLE>\n";

写HTML文件的起始部分。

foreach $line(@entries){

对于数组@entries中的每一行。

@fields=split(/::/,$line);

用::分割$line到数组@fields中。

print "<TR><TD>$fields[0]$fields[1]<TD>$fields[9]\n";
}

在表格中打印数组@fields中的信息。

print "</TABLE>\n";

表格结束。

CGI入门教程
第一页 留言板CGI代码
第二页 代码详解
第三页 读取log文件

[第1天][第2天][第3天][第4天][第5天][第6天]

 

 



月光软件程序下载编程文档电脑教程网站设计网址导航网络文学游戏天地幽默笑话生活休闲写作范文安妮宝贝
电脑技术编程开发网络专区谈天说地情感世界游戏元素分类游戏热门游戏体育运动手机专区业余爱好影视沙龙
音乐天地数码广场教育园地科学大观古今纵横谈股论金人文艺术医学保健动漫图酷二手专区地方风情各行各业

月光软件站·版权所有