replスクリプトを使って自動的にログインできる方法を探しています。環境はFreeBSDです。
ブラウザでログインしなければみれないページをperlでGETしたいです。
例えばヤフオクのマイオークションはログイン状態でないと表示されず、マイオークションのURLを指定しても
得られるのはログイン画面のページ。。これをperlでログインさせてその先にあるページをGETしたいです。
クッキーを一緒に送ってやれば、、という方法もあるのかと思いますが、やり方もいまいち。。それに
クッキーだと有効期限があるような。。
どのような方法が一番良いのでしょうか?具体的な方法を教えていただきたいです。
WWW::Mechanize - Handy web browsing in a Perl object - search.cpan.org
こういうのでも使えばいいかと。
LWP でもある程度できるけどさすがに面倒かな?
ご回答ありがとうございます
LWP::UserAgentを使ってやりたいと思います。
作っていて一点うまくいかないのですが、
LWP::UserAgent::post で url と データを渡しているのですが
以下のような感じで。ちょっとはしょってますが、、
@login_arg = (
"https://wwww.XXXX.co.jp/login",
[
'user_id' => $login,
'pass_word' => $passwd
]
);
my $ua = LWP::UserAgent->new();
my $resp = $ua->post(@login_args);
これでうまくいっているのですが POST する url の ID、パスワード入力の form に name がついていると
どうもうまくいかないようです。。どのように対処するのがいいのでしょうか??