Perl 批量删除过期文件(0 位领导批示)

代码:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
 
#---------------------------------------------------------
use strict;
my $dir = "dirname/";
opendir DH, $dir or die "cannot chdir to $dir : $!";
for my $file (readdir DH)
{
    ($file eq '.') and next;
    ($file eq '..') and next;
    if (time() - (stat($dir.$file))[9] > (60*60))
    {
        unlink $dir.$file;
    }
    print $dir.$file."\n";
}
closedir DH;

然后创建一个计划任务进行处理.

这个代码中会将一小时前创建的文件删除.

时间可以进行修改 (60*60) 单位:秒

VBB论坛限时置顶主题插件V1.0(0 位领导批示)

经典首发..此插件系本人制作.使用转载请勿修改作者名并注明出处..

在vBulletin3.6.8与vBulletin 3.7.3上测试没有问题.

使用方法:

1.修改模板
在SHOWTHREAD 模板搜索


<div><label for="ao_sut"><input type="radio" name="do" id="ao_sut" value="stick" /><if condition="$show['unstick']“>$vbphrase[unstick_thread]<else />$vbphrase[stick_thread]</if></label></div>

在这行下面新增


<if condition="!$show['unstick']“><div><label for=”ao_slimit”><input type=”radio” name=”do” id=”ao_slimit” value=”sticklimit” />$vbphrase[sticklimit_threads]</label></div></if>

2.安装产品
在后台插件与产品->产品管理 导入产品

下载插件 右键另存为

全文阅读 »

博客升级为wordpress 2.6.2(0 位领导批示)

用了很久的wordpress 2.3.2 终于抽出点时间升级博客程序

将空间转移至毛毛虫的服务器
Url rewrite的问题完全解决.博客文章URL前不再带那个烦人的 index.php
Tags 的中文错误也修正

博客后台

数据转移完成
插件与皮肤转移完成
插件升级未完成
域名暂用webmm.net. zdyi.com上写了个重定向到这个域名
晚上解决域名迁移问题
评论排序需要修改..

若干..

Memcache for Windows 安装与应用(2 位领导批示)

最近做的一个项目中有一个分类树的页面.因为运用了Ajax异步读取数据(每onclick一下就会请求一下数据库进行查询-_-!!).数据库服务器明显的负载加大.

运维部的同事建议我使用Memcache对数据进行布式内存缓存.

1.下载Memcache for win32

下载地址: http://jehiah.cz/projects/memcached-win32/

2.下载php_memcache.dll

下载地址: http://pecl4win.php.net/ext.php/php_memcache.dll
Note:注意你安装的PHP版本来下载相应的dll文件.(我装的是5.2X版本).

3.修改php.ini文件

在 ;Windows Extensions 处加一句


; Memcache extension
extension=php_memcache.dll

全文阅读 »

MySql存储引擎 InnoDB 与 MyISAM的区别(0 位领导批示)

上周服务器出了点问题..需要数据恢复.我所做的几个小东东的数据存储引擎因为使用了默认的innoDB存储引擎..产生不小的麻烦..囧…

首先看看我的MySql哪些存储引擎可用:

用show engines 语句


mysql> show engines;
+------------+---------+----------------------------------------------------------------+
| Engine | Support | Comment |
+------------+---------+----------------------------------------------------------------+
| MyISAM | YES | Default engine as of MySQL 3.23 with great performance |
| MEMORY | YES | Hash based, stored in memory, useful for temporary tables |
| InnoDB | DEFAULT | Supports transactions, row-level locking, and foreign keys |
| BerkeleyDB | NO | Supports transactions and page-level locking |
| BLACKHOLE | YES | /dev/null storage engine (anything you write to it disappears) |
| EXAMPLE | NO | Example storage engine |
| ARCHIVE | YES | Archive storage engine |
| CSV | NO | CSV storage engine |
| ndbcluster | NO | Clustered, fault-tolerant, memory-based tables |
| FEDERATED | YES | Federated MySQL storage engine |
| MRG_MYISAM | YES | Collection of identical MyISAM tables |
| ISAM | NO | Obsolete storage engine |
+------------+---------+----------------------------------------------------------------+
12 rows in set

全文阅读 »

PHP debug三个常用方法(备忘)(0 位领导批示)

一.ReflectionFunction

能打印出一个函数信息

使用方法:

1
2
3
4
function silver() {
    echo 'silver';
}
Reflection::export(new ReflectionFunction('silver'));

 

二.get_defined_functions

这个函数返回一个数组..数组中包含所有已经定义的函数(包括PHP内部函数,所以要慎用).

全文阅读 »

一道趣味题(1 位领导批示)

原贴地址:http://bbs.blueidea.com/thread-2881919-1-1.html

题目:首先把你的生日列出来 比如 1987 12 25
然后一位位的相加 1+9+8+7+1+2+2+5=35
把得出的数字再拆分 再加 3+5=8
最后向屏幕输出:8
19871225可看作字符型也可以看作整型,想怎么看就怎么看,不限。

我用perl写了一个函数..思路与其它人用js.vbs.php的思路类似.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl
use strict;
print &ageSum('19841007');
sub ageSum
{
    my $age = shift();
    my @age = split('',$age);
    my $sum = 0;
    foreach my $v (@age)
    {
        $sum += int($v);
    }
    $sum > 9 ? ageSum($sum) : return $sum;
}
Tags :

关于软件开发.头的心得(2 位领导批示)

发到我MSN的一段.


在启动一个软件项目时,我们应该关注软件涉及的领域。软件的最终目的是增进一个特定的领域。为了达到这个目的,软件需要跟要它服务的领域和谐相处,否则,它会给领域引入麻烦,产生障碍、灾难甚至导致混乱等。

我们怎样才能让软件和领域和谐相处呢?最佳的方式是让软件成为领域的反射(映射)。软件需要具现领域里重要的核心概念和元素,并精确实现它们之间的关系。软件需要对领域进行建模。领域的意思是,比如我们给银行做项目,那么我们就必须要明白银行的业务规则,即银行这个领域(Domain)。

接触一个陌生的领域,首先要组织信息,系统化,然后再细化。然后针对细化后的目标进行处理,比如UML,系统设计,迭代开发。另外要注意,一开始不要考虑细化后的目标之间的关联性。而是熟悉以后再归纳。

Tags : ,

洋人来了.中文维基解禁(4 位领导批示)

访问中文维基:

http://zh.wikipedia.org/w/index.php?title=%E9%A6%96%E9%A1%B5&variant=zh-cn

但不知道为啥中文维基的LOGO搞成了这个鸟样子..

zh-wiki

QQ for Linux V1.0 发布(1 位领导批示)

下载地址:http://im.qq.com/qq/linux/download.shtml 有 .rpm .deb 和.tar.gz 三种打包模式提供下载

此版本不能发图片.不能发送附件..

QQ for Linux支持64位处理器。将发布 RPM 版本、 DEB 版本、 tar.gz 版本。系统要求:Linux kernel:2.6, GTK:2.10及更高。

liunx-qq

腾迅总算开了窍..

Tags : , ,

随机显示的10篇日志

评论最多的10篇日志

浏览最多的10篇日志