Perlについての質問箱 39箱目
at TECH
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
100:デフォルトの名無しさん 09/02/22 11:53:36 ここ（http://kage.monazilla.org/system_DOLIB100.html）を参考に ●ログインするプログラムを書いてみました。 しかし、認証に失敗して、以下のセッションIDが返ってきます。 SESSION-ID=ERROR:ppppppppppp 何かアドバイスお願いします。 ※IDとパスワードはここではダミーのものとしていますが 実際には自分自身のIDとパスワードを使用しています。 use strict; use Socket; use FileHandle; use LWP::UserAgent; use HTTP::Request::Common qw(POST); my $id='id'; my $pw='password'; my $ua = LWP::UserAgent->new; $ua->agent('DOLIB/1.00'); $ua->default_header('X-2ch-UA' => 'Hoge/1.00'); my $url='https://2chv.tora3.net/futen.cgi'; my %form = ('ID'=>$id,'PW'=>$pw); my $req = POST($url,[%form]); 101:デフォルトの名無しさん 09/02/22 12:51:19 >>100 手元で検証してみたが、サーバ側のバグかもしれない IDパラメータの「@」が「%40」にエンコードされていると認証に失敗した
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5387日前に更新/164 KB
担当:undef