Detectar todos los enlaces en una pagina web

El codigo consigue detectar o extraer todos los enlaces de una pagina web que previamente hemos predeterminado, y mostrarlos en pagina.
<?
$pagina = 0;
$URL = "http://www.google.com/";
$pagina = @fopen($URL, "r");
print("Enlaces en: $URL
\n");
print("

\n”);

 

while(!feof($pagina)) {

 

$linea = fgets($pagina, 255);

 

while(eregi(“HREF=\”[^\"]*\”", $linea, $encontrados)) {

 

print(”
• “);
  print($encontrados[0]);
  print(”
  \n”);
  $reemplaza = ereg_replace(“\?”, “\?”, $encontrados[0]);
  $linea = ereg_replace($reemplaza, “”, $linea);
  }
  }
  print(“

\n");
fclose($pagina);
?>