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

perlでMixiのURLを指定してhtmlファイルを取得したいのですがどの様にすればいいのでしょうか?

------------------------------------------
use WWW::Mixi;
use HTTP::Cookies;
use HTTP::Request::Common;
use LWP::Simple;

my $mixi_email = 'aaa@gmail.com(メールアドレス)';
my $mixi_password = '123456(パスワード)';
my $login_url = 'http://mixi.jp/login.pl';
my $home_url = 'http://mixi.jp/home.pl';

my $mixi = WWW::Mixi->new($mixi_email, $mixi_password);

print "Cookieを有効にします。\n";
my $cookie = sprintf('cookie_%s_%s.txt', $$, time);
my $cookie_jar = HTTP::Cookies->new(file => $cookie, ignore_discard => 1);
$mixi->cookie_jar($cookie_jar);

print "ログインします。\n";
my @form = ('email' => $mixi_email, 'password' => $mixi_password, 'next_url' => $home_url);
my $request = &HTTP::Request::Common::POST($login_url, [@form]);
my $response = $mixi->request($request);

print "ホームを取得します。\n";
$response = $mixi->get('http://mixi.jp/home.pl');
print $response->content;

getstore("取得先URLを指定", "mixi.html");
-----------------------------------------------------------
getstoreでhtmlファイルとして取得できるのは分かるのですが上手くいきません
どなたか,ご教授願います


●質問者: shenmue123
●カテゴリ:コンピュータ ウェブ制作
✍キーワード:AAA Common cookie Gmail HTML
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● yofukaci
●35ポイント

UserAgentとか妥当でないのでは?

http://digit.que.ne.jp/work/wiki.cgi?Perl%E3%83%A2%E3%82%B8%E3%8...


2 ● IlO10l0Il
●35ポイント

http://okwave.jp/qa5172117.html

こちらが参考になると思います。

関連質問


●質問をもっと探す●



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