Генерация дерева папок

[X-Disa]

Есть такая проблемка, уже пол дня не могу написать скрипт. Суть в следующем:
На сервере есть папка downloads.
Скрипт должен строить дерево подпапок со ссылками,
которые раскрывают ветвь дальше, вроде shelltreeview в delphi
Help please!

[Макс]

http://pear.php.net/package/HTML_TreeMenu/
там в архиве был пример, строящий дерево для текущей папки

[AlieN]

На работоспособность не проверял на алгоритм такой

function printdir($dir)
{

if ($handle = opendir(\'$dir$before\')) {
   while (false !== ($file = readdir($handle))) {
       if ($file != "." && $file != "..") {
           if(is_dir($dir."/".$file))
                      {
                          echo "<b>$dir/$file</b>";
                          printdir($dir."/".$file);
                          }else{
                          echo "<a href=\'$dir/$file\'>$dir/$file</a>";
                      }
       }
   }
   closedir($handle);
}
}

printdir("porno");

[CGVictor]

X-Disa
Есть и мане пример.