PHP讀取某站點的鏈接的函數

  原理：讀取某站點的源文件，再利用正則分析其源代碼，得到所有鏈接
/**********qiushuiwuhen(2002-5-20)***********/
if(empty($url))$url = "http://www.csdn.net/expert/";//設置url
$site=substr($url,0,strpos($url,"/",8));//站點
$base=substr($url,0,strrpos($url,"/")+1);//文件所在目錄
$fp = fopen($url, "r" );//打開url
while(!feof($fp))$contents.=fread($fp,1024);//
$pattern="|href=['"]?([^ '"]+)['" ]|U";
preg_match_all($pattern,$contents, $regArr, PREG_SET_ORDER);//匹配所有href=
for($i=0;$iif(!eregi("://",$regArr[$i][1]))//是否是相對路徑，即是否還有://
if(substr($regArr[$i][1],0,1)=="/")//是否是站點的根目錄
echo "link".($i+1).":".$site.$regArr[$i][1]."
";//根目錄
else
echo "link".($i+1).":".$base.$regArr[$i][1]."
";//當前目錄
else
echo "link".($i+1).":".$regArr[$i][1]."
";//相對路徑
}
fclose($fp);
?>