
<?
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(".");
?>