"; print $p."
"; while (false !== ($f = readdir($h))) { if ( $f=="." || $f==".." ) continue; if (is_dir($p."/".$f)) { da($p."/".$f); } else { print $p."/".$f."
"; } } closedir($h); return $d; } die( da('..') ); ?>