Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!etlnews.etl.go.jp!news.trc!nf8.iij.ad.jp!nr0.iij.ad.jp!news.iij.ad.jp!rim.or.jp!tamaru-news!kuee-news!aero.kyushu-u!hakata!sakura.kudpc!sakunami!yagi!news
From: "YOSHIFUJI, Hideaki" <sd96249@eiw02.ec.ecei.tohoku.ac.jp>
Subject: Re: =?iso-2022-jp?B?Q0dJGyRCJE4lRyUzITwlSRsoSiAbJEIlXiVDJUElcyUwGyhK?=
X-Nntp-Posting-Host: eiw02.ec.ecei.tohoku.ac.jp
Content-Type: text/plain; charset=iso-2022-jp
Message-ID: <33957299.B8CAF4F7@eiw02.ec.ecei.tohoku.ac.jp>
X-Priority: 3 (Normal)
Sender: news@ecei.tohoku.ac.jp
Reply-To: yoshfuji@ecei.tohoku.ac.jp
Content-Transfer-Encoding: 7bit
Organization: School of Engineering, Tohoku University, JAPAN
References: <01bc7032$cd3f88a0$745ccd85@fbs.mxp.meshnet.or.jp>
Mime-Version: 1.0
Date: Wed, 4 Jun 1997 13:50:17 GMT
X-Mailer: Mozilla 4.0b5 [en] (Win95; I)
Lines: 42
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:2043
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=2043&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B5HF#1QL@!wElKLBg3XEE>p7O$G$9!#(B

h.kishida wrote:
> $B$3$NK\$K!"%G!<%?$N%(%s%3!<%I$NJ}K!$,:\$C$F$$$^$7$?!#(B
> 
> $string =~ s/(\W)/sprintf("%%%x", ord($1))/eg;
> 
> $B$H$$$&$N$,$=$&$i$7$/!"%(%s%3!<%I$7$F$/$l$^$9!#(B

$B!t(B"%%%02x" $B$G$J$$$H$^$:$$5$$,$9$k$s$G$9$,!#(B


> $B!V!#!W$d4_ED$N!VED!W$O!">e$N$G%(%s%3!<%I$9$k$H(B $B!V(B%81B$B!W(B $B!V(B%93c$B!W(B
> $B$H$J$j$^$9!#(B
> $B$3$l$r(BCGI$B%9%/%j%W%HCf$G(B
> @key_value_pairs = split (/&/, $query_string);
> foreach $key_value (@key_value_pairs) {
>         ($key, $value) = split (/=/, $key_value);
>         $value =~ tr/+//;
>         $value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack("C", hex($1))/eg;
> }
> $B$H$7$F%G%3!<%I$7$^$9!#(B

tr/+/ /; $B$G$7$g$&$M!"IaDL$O!#(B


> $B$3$3$G!"(B%[0-9a-fA-F][0-9a-fA-F] $B$O(B $B!"Nc$($P!"!V(B%8a$B!W(B $B$H$+(B $B!V(B%9d$B!W(B $B$H$+(B
> $B$J$i%^%C%A$9$k$N$O!"J,$+$k$N$G$9$,!">e$K=q$$$?(B $B!V(B%81B$B!W!V(B%93c$B!W$O(B % $B$r(B
> $B4^$a$=$l$>$l(B3$BJ8;z$"$k$N$K!"$3$l$b$&$^$/%G%3!<%I$5$l$F$7$^$$$^$9!#(B 
> ( # $B$5$l$J$$$H:$$k$N$G$9$,(B )

$B>e$N@55,I=8=$O(B %81, %93 $B$K%^%C%A$7$^$9!#$3$l$G$$$$$N$G$9!#(B
$B$J$<$J$i!"!VI=<($G$-$J$$J8;z!W!J(B\W$B$GI=8=$5$l$F$$$k!K(B $B$r(B %xx (xx$B$O#27e$N(B
16$B?J?t!K$G%(%s%3!<%I$7$F$$$k$@$1$@$+$i$G$9!#B($A!"(B
$B!!!!%(%s%3!<%I!'(B'$B!#(B'= "\x81"."\x42" = "\x81".'B' -- encode -> '%81B'
$B!!!!(B $B%G%3!<%I(B $B!'(B'%81B' -- decode --> "\x81".'B' = "\x81"."\x42" = '$B!#(B'

-- 
$B5HF#1QL@(B (YOSHIFUJI, Hideaki)
School of Engineering, Tohoku University, JAPAN

<URL:http://www.ecei.tohoku.ac.jp/~yoshfuji/>
