\uac01 \uc2e0\ubb38\uc0ac\uc758 \ucd5c\uc2e0\uc544\uc774\ud2f0 \ub274\uc2a4\uac00\uc838 \uc624\uae30
\n\uc6d0\ub798\ub294 \ud654\uc77c \ubd84\ub9ac \ud574\uc11c \ub9cc\ub4e4\uc5c8\ub294\ub370 \uc5ec\ub530 \uc62c\ub9b4\ub791\uaed8 \ucb48\uc6b1 \uc37c\uc2b5\ub2c8\ub2e4.
\n\uadf8\ub0e5 \uc2ec\uc2ec\ud574\uc11c \ub9cc\ub4e4\uc5b4 \ubd24\uc2b5\ub2c8\ub2e4.
\n\uae09\uc870 \ud55c\uae30\ub77c\uc11c \uc548\uc774\uc058\uac8c \ud588\uace0 \uc7a1\ud301\uc740 \ub354\ub354\uc6b1 \uc5c6\ub124\uc5ec ^^
\n\uadf8\ub0e5 \uc624\ub298\uc790 \uc544\uc774\ud2f0 \ub274\uc2a4\ub97c \uac00\uc838\uc624\ub294\uae30 \uc785\ub2c8\ub2e4.<\/p>\n
\uadf8\ub9ac\ub450 \uc774\uac70 \ud655\uc7a5\ud558\uba74 \uaf64 \uc4f8\ub9cc\ud560\ub08d\ub2c8\ub2e4.
\n\uc218\uc815 \ubd80\ubd84\uc788\uc74c \ub9d0\ud574 \uc8fc\uc0e4\uc694<\/p>\n
\n $fp = fopen($url, “r”);<\/p>\n
while(!feof($fp)){
\n $tmp = fgets($fp, 1024);
\n $temp .= $tmp;
\n }<\/p>\n
fclose($fp); <\/p>\n
return $temp;
\n}\/\/function get<\/p>\n
function Strip($all){\/\/ \ub9c1\ud06c\ub791 \uc81c\ubaa9\ub9cc \ube7c\uc624\uae30<\/p>\n
$link_pm=strpos($all,”>”);<\/p>\n
$link=substr($all,0,$link_pm);<\/p>\n
if(!$link) return;<\/p>\n
if(ereg(“””,$link)){<\/p>\n
$link_p=strpos($link,”””);
\n $link=substr($link,$link_p+1);
\n $link_p=strpos($link,”””);<\/p>\n
$link=substr($link,0,$link_p);
\n }<\/p>\n
if(ereg(“‘”,$link)){<\/p>\n
$link_p=strpos($link,”‘”);
\n $link=substr($link,$link_p+1);
\n $link_p=strpos($link,”‘”);<\/p>\n
$link=substr($link,0,$link_p);
\n }<\/p>\n
$link=trim($link);<\/p>\n
$substr=substr($all,$link_pm+1);
\n $substr_p=strpos($substr,”<\/a>“);
\n $substr=substr($substr,0,$substr_p);
\n $strip=strip_tags($substr);
\n $strip=trim($strip);<\/p>\n
return array(link => $link, sub => $strip);
\n}\/\/function strip($all)<\/p>\n
function makeUrl($Url, $Link){<\/p>\n
if(!strpos($Link,”http:\/\/”) && substr_count(“$Link”,”http:\/\/”)) return $Link;<\/p>\n
$eURL = pathinfo(“$Url”);<\/p>\n
$host = parse_url($Url);
\n $host = $host[scheme].”:\/\/”.$host[host];<\/p>\n
$Link = “\/”.$Link; \/\/\ub9c1\ud06c\uac00 \ub8e8\ud2b8\uc778\uc9c0 \ud655\uc778\uc704\ud574 \uc784\uc758\ub85c \ubd99\uc778\ub2e4.
\n if(substr_count(“$Link”,”..\/”)){ \/\/\ud55c\uce78\uc55e\uc73c\ub85c<\/p>\n
$Link = str_replace(“.\/..\/”, “”, $Link);
\n $Link = str_replace(“..\/”, “”, $Link);<\/p>\n
$pos = strrpos($eURL[“dirname”], “\/”);
\n $makeUrl = substr($eURL[“dirname”],0,$pos);<\/p>\n
$makeUrl = “$makeUrl”.”$Link”;<\/p>\n
}else if(substr_count(“$Link”,”\/\/”) && !strpos($Link, “\/\/”)){ \/\/\ub8e8\ud2b8\ub85c \uac00\ub77c<\/p>\n
$makeUrl = $host.”\/”.str_replace(“\/\/”, “”, $Link);<\/p>\n
}else{ \/\/\uc81c\uc790\ub9ac<\/p>\n
$Link = str_replace(“.\/”, “”, $Link);
\n $makeUrl = $eURL[“dirname”].”$Link”;
\n }<\/p>\n
return $makeUrl;
\n}
\n\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/ \ud391\uc158\ub05d
\n$date_Y = date(“Y”);
\n$date_M = date(“m”);
\n$date_D = date(“d”);<\/p>\n
$mdate = “$date_Y.$date_M.$date_D”; \/\/\ud655\uc7a5\uc131 \uc704\ud574 \uc774\ub974\ucf00
\n\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<== \uc2e0\ubb38\uc0ac\ubcc4\uc124\uc815 \ucd94\uac00\uac00\ub2a5\n\n\n$newspaper[] = “\uc870\uc120\uc77c\ubcf4”;
\n$URL[] = “http:\/\/www.chosun.com\/it\/”;
\n$like[] = “$date_Y$date_M$date_D”;<\/p>\n
$newspaper[] = “\uc911\uc559\uc77c\ubcf4”;
\n$URL[] = “http:\/\/www.joins.com\/it\/list\/it_list.html”;
\n$like[] = “$date_Y$date_M$date_D”;<\/p>\n
$newspaper[] = “\ub3d9\uc544\uc77c\ubcf4”;
\n$URL[] = “http:\/\/www.donga.com\/fbin\/output?f=totalk&code=k__”;
\n$like[] = “$date_Y$date_M$date_D”;<\/p>\n
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/<== \uc5ec\uadf8\uae4c\uc9c0 \uc2e0\ubb38\uc0ac\ubcc4\uc124\uc815\n\n\nfor($x=0; $x < sizeof($newspaper); $x++){\n\n\n $temp = get($URL[$x]);\n\n\n $all = split(“href =|HREF =|href=|HREF=”,$temp);\/\/–> url \ucd94\ucd9c<\/p>\n