mostrar solo directorios en forma de arbol

[chalchis]

Hola amigos encontre este script
para que solo me imprima los subdirectorios
de una capeta

echo '<ul><li><a href=\'/imagenes\'>Principal</a></li>';
$dir = '../imagenes/';
$directorio=opendir($dir);
while ($archivo = readdir($directorio)) {
if ($archivo=='.' || $archivo=='..') continue;
elseif(is_dir("$dir/$archivo"))
echo "<li><a href='?dir=".$dir."/".$archivo."/'>
$archivo</a></li>";
}
closedir($directorio);
echo '</ul>';

el problema es como le haria en forma de arbol
para que me imprima las subcarpetas de estas capertas que se encuentran en raiz y asi sucesivamente

saludos

espero sus comentarios

gracias

[chalchis]

hola amigos encontre una solucion
en la pagina de php
para que solo obtenga solo los subdirectorios de una directorio
le hice unos cambios

saludos

<?
$path = '../Imagenes/';



function arbol($dir)
{
global $subdirectorios;
$d = opendir($dir);
while (false !== ($entry = readdir($d)))
{
if($entry != '.' && $entry != '..' && is_dir($dir.$entry))
{
$subdirectorios[]=$dir.$entry.'/';
arbol($dir.$entry.'/');
//echo $dir.$entry.'/'."<br>";
}
}
closedir($d);
return $subdirectorios;

}



$dir = $path;
$subdirectorios[]=$dir;
$arbol=arbol($dir);

for ($i=0;$i<count($arbol);$i++)
{
echo $arbol[$i]."<br>";
//aqui pondria el codigo que recorre el directorio y mostrar los archivos
}
?>