文件压缩备份脚本-求救 Perl语言
asphp 2010-07-21 04:28:30 计费系统(Unix)有一个文件夹
/export/cdrs
里面有一些子文件夹,如: Voice,SMS,GPRS
在每次需要做以下的操作:
将Voice,SMS,GPRS中的创建时间小于(当前时间 - 60)天的文件压缩,文件名为 子文件夹名_YYYYDDMMHHMISS.tar.gz
如 Voice_20100722162658.tar.gz
YYYYDDMMHHMISS为压缩文件创建时间。
同时将已经压缩了的文件删除掉,以释放磁盘空间。
请各位高手帮助!对三小时内做出者小弟即有偿拜师!