首 页 网络编程
网页制作 图形图象 操作系统 冲浪宝典
软件教学 认证考试

网络安全 网络办公 行业资讯 评测对比
您当前位置:站长天空 -> 网络编程-> Perl教程
用Perl制作页面计数器 (转载于上海热线)-CGI教程,CGI文档
作者:网友供稿 点击:24
推荐
西部数码-全国虚拟主机10强!20余项虚拟主机管理功能,全国领先!第6代双线路虚拟主机,南北访问畅通无阻!可在线rar解压,自动数据恢复设置虚拟目录等.免费赠送访问统计,企业邮局.Cn域名注册10元/年,自助建站480元起,免费试用7天,满意再付款!P4主机租用799元/月.月付免压金
站内搜索
文章页数:[1] 
用perl制作页面计数器


  网友大都喜欢在自己的主页上做一个计数器来显示自己主页被访问的次数。以前我们只能申请由第三方提供的计数器或用由系统管理员提供的计数器,受到很大限制。现在许多免费空间都提供了cgi权限,因此我们也可以用cgi方式实现一个自己的计数器。

  计数器可以用数据库方式实现,也可以用文本文件方式实现。由于文本文件方式不涉及系统的数据库管理系统,相对简单,容易实现,因此,在这里介绍文本方式的计数器。

  计数器的原理比较简单,页面每次被访问的时候,对记录访问次数的数字加1,然后将这个数显示出来。原理虽然简单,在具体实现上还是需要一定的技巧。

  由于一个cgi程序在服务器上并非一直驻留在内存中,为了对访问次数进行计数,则需要把这个数字存入一个文件中,每当主页被访问时,打开该文件将访问数字加1后再存入文件中。

  网站是多用户环境,在访问文件时必须对文件上锁以禁止其他用户对文件的访问,这样才能保证数据的可靠性。然而不同网站使用的操作系统不同,其对文件上锁的机制也不同。本文采用了一种各种平台都适用的方法,每当有页面被访问时,cgi程序创建一个临时文件,此时若有其它进程也要对文件进行存取则须等待,进程对文件更新后删除该临时文件,等待的进程才能对文件进行存取。

  下面是用perl实现的一个计数器源代码,并加注了注释:

#!/usr/local/bin/perl
#存贮表示主页访问量数字的文件
$data = /usr/local/etc/httpd/htdocs/counter.data;
#用作文件锁的临时文件
$lockfile = /usr/local/etc/httpd/htdocs/counter.lock;
# 主模块
&increment;
print "content-type: text/html\n\n";
print $accesses;
sub increment {
# 检查临时文件是否存在
while (-e $lockfile) {
sleep 2; # 存在则等待2秒
}
# 创建临时文件
open(lock," >$lockfile") || die
"cant create lockfile.\n";
# 读文件并更新数据
open(data,$data) || die "cant open data file.\n";
$accesses = < data >;
$accesses++;
print data "$accesses\n";
close(data);
# 删除临时文件,对数据文件开锁
 close(lock);
unlink($lockfile);
}
  你可以在页面上需要显示计数器的地方加上下面的html代码,页面被访问的时候,来访者就可以知道自己是第几位来访者了。
< html > < head >
< title >home page< /title >
< /head >
< body >
< h1 >home page< /h1 >
< p >欢迎您!第
< !--#exec cgi="/cgi-bin/text-counter.cgi" >
位来访者.< /p >
< /body > < /html >

  只要掌握了计数器的原理,就可以设计出称心如意的计数器,使你的主页更有吸引力。  

文章整理:站长天空 网址:http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

文章页数:[1] 


放大字体显示 缩小字体显示 打印文章 推荐给朋友
热门文章
·无刷新聊天室(短信陪聊程序)-ASP教程,ASP应用
·C#中使用Excel-.NET教程,C#语言
·简要JAVA数据类型转换-JSP教程,Java技巧及代码
·Recordset对象方法详解-ASP教程,ASP应用
·选用和配置ups时应注意的几个问题
·新型无源元件的现状与发展
·用正则表达式解析C#文件(updated)-.NET教程,C#语言
·正则表达式大全-ASP教程,ASP应用
·VB与ActiveX控件签名谈-.NET教程,VB.Net语言
·IIS6 和Tomcat5 的整合-ASP教程,ASP应用
最新文章
·网上能免费赚钱?想要网上创业吗?_网赚技巧
·孙中伟:聚合文学网站资源的功能_站长访谈
·网站最令人讨厌的用户体验_站长心得
·设计理论:谈用户体验,别落下商业利益_站长心得
·经营个人网站需要脚踏实地_站长心得
·google adwords关键词广告须注意的7个问题_google推广
·网站提交google注册应注意的问题_google推广
·伦敦mecompany网站设计师谈网页布局艺术2_站长心得
·搜索引擎不收录页面的常见原因_seo网站优化
·搜索引擎注册九大秘法_站长心得
相关主题
  • 用perl来分析并生成中文excel文件_perl教程
  • 用perl饼来替换文件中的字符串_perl教程
  • 用perl语言进行socket编程_perl教程
  • 用Perl语句来代替常用的操作系统命令-CGI教程,CGI文档
  • 用perl访问mysql数据库-CGI教程,CGI文档
  • 西部数码虚拟主机

    友情链接
    CNNIC 西部数码
    万网 自助建站
    虚拟主机 asp空间
    域名注册 域名
    域名申请 主页空间
    论坛空间 网站空间
    国际域名 虚拟空间
    空间租用 DDOS防火墙
    成都主机托管 四川主机托管
    主机租用 服务器租用
    网站目录 自助建站
    虚拟主机 网址大全
    软件下载
    自助链接
    虚拟主机资讯 特价虚拟主机
    版权申明:本站文章均来自网络,如有侵权,请联系我们,我们收到后立即删除,谢谢!
    关于我们:站长天空:专业提供最新的站长资讯、在线教程、虚拟主机权威评测、虚拟主机性能对比、网站制作教程,开发教程,站长工具。包括网页制作教程、冲浪宝典、编程参考、操作系统、软件教学、行业动态等。
    特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有。
    发表评论 打印  刷新     关闭