//opendir 资源句柄 得到指定目录的资源句柄
//is_dir 布尔 判断是否为目录
//is_readable 布尔 给定目录是否可读
//readdir 字符串 通过资源句柄中读一个文件的文件名，指针后移，如果不存 在或者已在最后的话在返回false
//closedir void 关闭资源句柄，释放资源
//scandir 数组 返回指定目录下所有的文件和目录组成的数组
$dir = "f:/perl";
print_file($dir);
function print_file($dir)
{
$tempdir = $dir;
$file_or_dir = scandir($tempdir); //读取文件数组
foreach ($file_or_dir as $temp_file_dir)
{
if( !preg_match("/^[^\.\.?]/", $temp_file_dir))
{
continue;
}
if(is_dir($tempdir."/".$temp_file_dir))
{
// echo $temp_file_dir;
echo "目录".$tempdir.$temp_file_dir."下的文件：
";
print_file($tempdir."/".$temp_file_dir);
}else{
echo $tempdir."/".$temp_file_dir."
";
}
}
}
?>
阅读(3502) | 评论(1) | 转发(0) |
