Вопрос про каталоги

[Xapek]

Так вот,
Необходимо найти все подкаталоги заданного каталога, то биш все дерево каталогов начиная с заданной директории, причем как задавать директорию мне без разницы, то есть можно и URL, а можно и путь в файловой системе, заранее спасибо.

[Berkut]

function tree($fnc)
{
        $hdl=opendir($fnc);
        while ($file=readdir($hdl))
        {
                if (($file!=".") and ($file!=".."))
                {
                        $fllnm=$fnc."/".$file;
                        if (is_dir($fllnm)==true)
                        {
                                echo "$fllnm
";
                                tree ($fllnm);
                        }
                }
        }
}
tree($papka);  
$papka -  сканируемая директория

[Berkut]

[OFF]Товарищи, а раскраска кода здесь сделана хайлайт стрингом?[/OFF]