このページに関してのお問い合わせはこちら
携帯→2ch運用情報スレッド42
ツイート
522
:
マァヴ ◆jxAYUMI09s
:
2007/06/18(月) 16:37:07 ID:CyroRfji0 BE:2694825-PLT(45005)
【メモ】サーバでクッキー処理を代行してもらって、携帯からクッキーを使えるようにする方法(^_^;)
--------------------------------------------------
[cookie] perlでcookieを使ったhttpリクエスト方法
$url(第一引数) には取得先のURLを渡す。
$cookiefile(第二引数) には保存先のファイルpathを指定する。
cookieを保存するときには自動でcookiefileに保存し、
cookiefileを指定したままアクセスすると、保存されている
cookieを使用してアクセスすることが出来る。
※perl modulesを使っている。(標準で組み込み)
#=================================================
#
#=================================================
sub HttpAccess
{
use LWP::UserAgent;
use
HTTP::Request::Common
qw(GET);
use
HTTP::Cookies;
my $url = $_[0];
my $cookiefile = $_[1];
my $ua = LWP::UserAgent->new(
'timeout' => 5,
'agent' => 'm_cookie/1.0',
);
### クッキーの設定
my $cookie_jar =
HTTP::Cookies-
>new(
'file' => $cookiefile,
'autosave' => 1,
'ignore_discard' => 1
);
### $ua に必要なクッキーを使わせる
$ua->cookie_jar($cookie_jar);
my $request = GET($url);
my $res = $ua->request($request);
return($res->content);
}
-----------------------------------------
こんな感じー(^_^;)
サンプル
http://minnie.mirv.net/cookie/output.cgi
IEでクッキーチェック
http://minnie.mirv.net/cookie/check.cgi
IEのクッキー削除
http://minnie.mirv.net/cookie/output.cgi?d=1
携帯でクッキーを食わせる
http://minnie.mirv.net/cookieDB/m_cookie.cgi
携帯でクッキーチェック
http://minnie.mirv.net/cookieDB/m_cookie.cgi?check=1
携帯でくっきーの削除
http://minnie.mirv.net/cookieDB/m_cookie.cgi?delete=1