script muito importante mais não roda

Quero usar esse script que achei na net mas ele não roda, e nao da nehum erro..

se vcs acharem um errinho banal que seja, me avise...

ah proposta desse script é obter a lista de links de um site..

<font class="script"><?<br>
$url = "[http://localhost/";

](http://localhost/)

$file = file($url);<br>
while ( list( , $line ) = each( $file ) ) {<br>
    while ( eregi(
'(href[[:space:]]*=[[:space:]]*"?[[:alnum:]:@/._-]+"?)(.*)',<br>
          &BR> $line, $links ) ) {<br>
         echo
"$links[1]<br>\n";<br>
         $line = $links[2];<br>
    }<br>
}<br>
?></font></p>