8.0w+
社区成员
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
galaxy_42 2010-10-17
#!/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
"Can't create lockfile.\n";
# 读文件并更新数据
open(DATA,$data) || die "Can't 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 >
＃存贮表示主页访问量数字的文件
$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
"Can't create lockfile.\n";
# 读文件并更新数据
open(DATA,$data) || die "Can't 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 >
发邮件向论文作者卑微求代码模板 如果可能的话，是否可以把源代码发送给我？ 无论您是否同意，最好的祝福都送给您。如果您能帮助我，我将不胜感激：）。 谢谢和问候。 XXX【自己的名字】 XXX【自己的学校】 2021/4/23 英文版本： Dear Professor XXX...
求最大公因数的代码 求最大公因数的代码： unsigned int func(unsigned int N,unsigned int M){ unsigned int r = M % N; while(r > 0){ M = N; N = r; r = M % N; } return N; } ...
C语言学生成绩管理系统源代码 } void c()/* 求出全班平均成绩，显示均方差*/ { int a[4]={0,1,2,3}; int i,j; double total=0,pfc=0,bzc=0; double ave; for(i=0;i;i++) { total=total+stu[i].zongping; } ave=total/4.0; printf("总评平均成绩...
C++代码：求均值 题目描述 给出一组样本数据，包含n个浮点数，计算其均值，精确到小数点后4位。 输入 输入有两行，第一行包含一个整数n（n小于100...呵呵，代码如下： #include<bits/stdc++.h> using namespace std; int ma..
告白代码 简介 这是程序员表白系列中的第二波网站表白，旨在让任何人都能...顺便求一波打赏，微信支付，金钱随意，感慨一下，当年我写这个的时候， 还是一人吃饱全家不饿，如今，上有老下有小，中有恶婆娘啦。。 Y(^_^)Y lo...
C语言简单递归求阶乘代码示例 系列文章目录 提示：这里可以添加系列文章的所有文章的目录，目录需要自己手动添加 例如：第一章 Python 机器学习入门之pandas的使用 提示：写完文章后，目录可以自动生成，如何生成可参考右边的帮助.../*递归求...
已知二叉树前序中序，求后序代码实现 现在给你一棵二叉树的前序和中序遍历，请你求出这棵二叉树的后序遍历结果。 Input 输入数据有多组，每组数据一行。 每行由两个字符串组成（每个字符串长度最大为26）。表示一棵二叉树的前序和中序遍历结果。 ...
求阶乘的简单代码 1到10的简单阶乘计算 分析 1.对每位数进行阶乘计算。 2.循环求和。 主体 // 1. 阶乘计算 for(int i=j;i>=1;i++){ //注：考虑等于一的情况。 mul*=i; } // 2. 循环求和 for(int j=1;j<=10;......
复制代码 'use strict' ; /** * @param {Number} [baseFontSize = 100] - 基础fontSize, 默认100px; * @param {Number} [fontscale = 1] - 有的业务希望能放大一定比例的字体; */ const win = window;...复制代码
求平方根 C++代码 递归版： float recursion(float A, float e, float p = 1) // A为平方数，e为误差，p为A的平方根，下同 { if (fabs(A- p*p) <= e) { cout <<... return recursion(A, e, (p + A / p) / 2...
代码时间复杂度计算 下面分析一段代码： 2、3、4行每一行都需要1个单位的执行时间，5、6行循环了N边，需要2N个单位时间，7、8行执行了n^2遍，所以一共需要执行时间：（2N ^2 + 2N + 3 ）*单位时间。 我们用T(n) 表示，O表示T(n)与f(n)...
