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