ソースリスト(主要部分)
$URL = "http://"."$URL";
$page = fopen("$URL", "r") or die($URL."が開けません");
print("<B>$URL</B><BR>");
while(!feof($page)) {
$line = fgets($page, 500);
while(eregi("href="[\^"]*"", $line, $match)) {
print("<BR>".$match[0]\."");
$replace = ereg_replace("\?", "\?", $match[0]);
$line = ereg_replace($replace, "", $line);
}
}
fclose($page);