Re: [問題] 抓取網頁問題
問題解決了
改用
use LWP::Simple;
$doc = get 'http://www.dmoz.org/';
print($doc);
就可以了
※ 引述《travellu (旅行)》之銘言：
: 欲抓取網頁 http://www.dmoz.org/
: 抓網頁的副函式程式碼如下：
: sub grasp_searchresult() {
: my ( $query ) = @_;
: my $browser = new LWP::UserAgent;
: $browser->agent( 'Mozilla/4.76 [en] (WinXp; U)' );
: my $request = q();
: $request = new HTTP::Request( "Get",
: "http://www.dmoz.org/" );
: my $html = $browser->request($request);
: return $html->content;
: }
: 抓出來的東西是空的
: 抓其它網頁例如yahoo首頁則是沒問題
: 不曉得是不是這個網頁有什麼特殊的限制？
: 謝謝！
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.245.222
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
10
27