人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

PerlでBingの検索結果のソースを取得したいと思っています。
例えば、
http://www.bing.com/search?q=%E3%82%AD%E3%83%BC%E3%83%AF%E3%83%BC%E3%83%89&go=&form=QBRE&filt=all
のURLの検索結果を下記プログラムで取得しようとしましたが、「400 Bad Request」になってしまいます。
GoogleやYahooは正常に動作しています。
どこに問題があるのか分かりますでしょうか?


$domain = 'www.bing.com';
$file = '/search?q=%E3%82%AD%E3%83%BC%E3%83%AF%E3%83%BC%E3%83%89&go=&form=QBRE&filt=all';

$addr = (gethostbyname("$domain"))[4];
$name = pack("S n a4 x8", 2, 80, $addr);
socket(S, 2, 1, 0);
connect(S, $name);
binmode(S);
select(S); $| = 1; select(stdout);
print S "GET $file HTTP/1.0\r\n\r\n";
undef $data;
while (<S>) {
$_ =~ s/[\r\n\t\f]//g;
$data .= $_;
}
close(S);

●質問者: uwao
●カテゴリ:インターネット ウェブ制作
✍キーワード:AD AF ALL BC Bing
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● a-kuma3
●60ポイント ベストアンサー

Bing は、Host ヘッダをチェックしてるみたい。

GET /search?q=%E3%82%AD%E3%83%BC%E3%83%AF%E3%83%BC%E3%83%89&go=&form=QBRE&filt=all HTTP/1.1
Host: www.bing.com

こういうリクエストを出せば、結果を取得できます。

◎質問者からの返答

有り難うございました。

ばっちりです。

正常に取得できました。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ