Re: [請益] 關於開某個資料夾下的資料夾裡的檔案?

[buganini (霸格尼尼)]

function preg_in_array($needle, $haystack){
        foreach($haystack as $pcre)
                if(preg_match($pcre, $needle))
                        return true;
        return false;
}

$ignore=array('/^\\./','/^thumbs\\.db$/i');

//Iteration
$todo=array('./');
while(($curdir=array_pop($todo))!==NULL){
        $dp=opendir($curdir);
        while(false!==($name=readdir($dp))){
                if(preg_in_array($name,$ignore)) continue;
                if(is_dir($curdir.$name)){
                        $name.='/';
                        $todo[]=$name;
                }else{
                        echo $name.'<br />';
                }
        }
        close($dp);
}

//Recursion
function walker($curdir){
        global $ignore;
        $dp=opendir($curdir);
        while(false!==($name=readdir($dp))){
                if(preg_in_array($name,$ignore)) continue;
                if(is_dir($curdir.$name)){
                        $name.='/';
                        walker($name);
                }else{
                        echo $name.'<br />';
                }
        }
        close($dp);
}
walker('./');


沒跑過不知道有沒有錯@@a

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 221.169.71.109