发信人: jaron(Jaron)
整理人: workingnow(2002-09-30 12:01:53), 站内信件
|
【 在 ken_js 的大作中提到:】
:我想用perl来判断某一目录下的文件数目(都为htm文件,得到数目后,在此基础上生成下一文件名),请问如何实现?
:......
$userdir="/usr/var/home/html/lan/";
chop $userdir;
opendir (MEMBERDIR, "$userdir");
@stats = readdir(MEMBERDIR);
closedir (MEMBERDIR);
@stats = grep( , @stats);
@stats = sort @stats;
foreach $line (@stats) {
$x++;
}
##$x即为当前目录下文件的数量
---- 欢迎下载使用 网站新闻管理系统 v1.0
http://www.jdinfo.net/download
http://www.jdinfo.net/demo (演示)
oicq:942488 |
|