opendir (DIR, $dir);
while($i = readdir(DIR))
{
   if ($i != "..")
   {
        print "<li><a href=\"" . $dir . $i . "\" target=\"_blank\" />" . $i . "</a></li>\n";
}
closedir(DIR);