[Tokyo.pm] mod_perl と cookie

Tatsuhiko Miyagawa miyagawa @ edge.co.jp
2002年 2月 25日 (月) 23:57:49 CST


宮川です。

At Tue, 26 Feb 2002 14:35:35 +0900,
Keiichi Okabe wrote:

> mod_perlでcookieを取得する方法について教えてください.
> win32用にはApache::Cookieがないようなので,(違ってたら教えて!)

全然 Win32 は詳しくないんですが、
http://theoryx5.uwinnipeg.ca/ppmpackages/
ここにある libapreq.ppd でインストールできないですかね?

> こんな感じで取得しようとしていますが,
> 
>     sub handler{
>       my $r = shift;
>       my $host = $r->get_remote_host;
>       my $header = $r->header_in('Cookie');
>       my %cookies = parse CGI::Cookie($header);
>       my $session_id = $cookies{'session_id'}->value if $cookies{'session_id'};
> 
> parse CGI::Cookie のところでおちてしまいます.
> Apacheのログを見ると,以下のようなメッセージが出ているのですが,
> 
> Undefined subroutine &CGI::unescape called at C:/Perl/lib/CGI/Cookie.pm line 75.
> Attempt to free unreferenced scalar.

CGI::unescape() がない、っていってますね。CGI.pm のバージョンいくつで
しょう? 自分の手もとのだと、unescape() は CGI::Util っていうモジュール
で定義されているみたいです。


-- 
Tatsuhiko Miyagawa <miyagawa @ edge.co.jp>



Tokyo-pm メーリングリストの案内