PHP程序指定目录里的指定后缀名文件为超连接

<?php

function naVBar()
{
$files = dir("."); //指定目录
$pipe  = " ";    //管道符
//通过以下的循环搜索目录中所有文件
while ($current = $files->read())
   {
     //ignor all files not of htm type.
    if (strpos($current, "php\")!= FALSE)  //设定后缀为PHP的文件将被导航
       //忽略自己(如 index.html)
       {  

          if (strpos($current, "ndex") == FALSE)
          {
             print "<a href='";
             print $current;
             print "'>";
             print $current;
             print "</a>";
             print $pipe;
          }; 
       };
     };
};
navbar() //调用函数
?>