今天，在php的枯燥实践中遍历了文件目录的程序，下面两个程序，但是质量不是很好，
1。清除PHP缓存文件
复制代码代码如下所示：
< PHP

功能read_dir（$目录、文件）
{
美元= strpos（$文件，.php）；

如果（$ > 0）
{
unlink（$dir。文件）；
返回删除目录；
返回true；
}

如果（strpos（文件）= 0 | |（$文件，strpos。）！= false）返回true；

如果（strpos（$文件，假strpos。）= | |（$dir ）= false）
{
美元=目录。文件。；
如果（！is_dir（$dir））返回false；
$ DH = opendir（$dir）；
而（（（$文件= readdir（$ DH））！= false）
{
read_dir（$目录、文件）； / /递归调用
}
}
}

clear_caches（）函数
{
删除php缓存文件目录

如果（！is_dir（$dir））死（这不是一个目录）；
$ DH = opendir（$dir）；

而（（（$文件= readdir（$ DH））！= false）
{
/ / var_dump（文件）；
read_dir（$目录、文件）；

}
}


>

2。遍历目录中的所有文件
复制代码代码如下所示：




查看目录





文件名
修改时间
文件大小（k）



< PHP

；
$；
up_dir美元=上级目录；
up_url美元= $dir；

如果（isset（$ _request {共舞}）$ _request {共舞} = = 'list_dir）
{
如果（emptyempty（$ _request { 'dir ' }））
{
up_dir美元=目录是空的！；
}
$dir = isset（$ _request { 'dir ' }）{ }：_request美元'dir $dir；

}
如果（！is_dir（$dir））
{
up_dir美元=无效的目录！；
}

>



< PHP

如果（strpos（up_dir美元，上级目录）！= false）
{
/ /如果（$ up_url = =）$ up_dir回声；
如果（$）！=
{
up_url美元= substr（$迪尔，0 - 1）；
$ k个子（$ up_url， / ）；
up_url美元= substr（up_url美元，0美元，k-strlen（$ up_url））；
up_url = up_url美元美元。；
}
回声up_dir美元；
}
其他的
{
echo $ up_dir；
（死亡）；
}
>


< PHP
up_dir美元= $dir；
$ DH = opendir（$dir）；
而（（（$文件= readdir（$ DH））！= false）
{
如果（$文件）！= $文件！=…$文件！=.svn）
{
如果（strpos（$文件，，）！= false）
{
$时间=日期（当前H：我：S
文件大小=美元（$dir。$文件） 1000；
$；
}
其他的
{
$时间=日期（当前H：我：美国
文件大小=美元（$dir。$文件） 1000；
美元=目录。文件。；

$；
$dir = $ up_dir；

}
}
}

>