«
对象与像素的选获得某个网页上的所有超裢接

时间:2008-5-31    作者:Deri    分类: 分享


   <p>  <code><html><br /><head><title>正则表达式</title></head><br /><body><br /><a href="./">返回列表</a><br><br /><form action="<?echo $PHP_SELF;?>" method="post"><br />URL:<input type="text" name="url" value="<?echo $url?>"><input type="submit" value="获取所有裢接"><br /></form><br /><?<br />if(isset($url)){<br />  echo "$url 有下列裢接:<br>";<br />  $fcontents = file($url);<br />  while(list(,$line)=each($fcontents)){<br />    while(eregi('(href[[:space:]]*=[[:space:]]*"?[[:alnum:]:@/._-]+"?)(.*)',$line,$regs)){<br />      $regs[1] = eregi_replace('(href[[:space:]]*=[[:space:]]*"?)([[:alnum:]:@/._-]+)("?)',"\\2",$regs[1]);<br />      echo "  $regs[1]<br>";<br />      $line = $regs[2];<br />    }<br />  }<br />}<br />?><br /></body><br /></html></code></p>