 
 
<?
function lst($p)
{
$handle=opendir($p);
while ( ($file = readdir($handle)) !== false)
{
if ($file != "." && $file != "..") {
if ($p != ".") $file = "$p/$file";
if (is_dir($file)) 
{$return .= "<ul><b>$file</b><b  r>".lst($file)."</ul>";;}
else 
$return .= $file."<br>";
}
}
closedir($handle); 
return $return;
}
echo lst(".");
?>