> > 手持ちのから最小部分をコピーしたよーヽ(´ー｀)ノ
> > $u = $ENV{"QUERY_STRING"};
> > $u =~ s/%([a-zA-Z0-9][a-zA-Z0-9])/pack("C", hex($1)/ego;
> 俺のコピーの間違い具合は異常(;´Д`)
> $u =~ s/%([a-zA-Z0-9][a-zA-Z0-9])/pack("C", hex($1))/ego;

ﾀﾞｿｹｽｺヽ(´ー`)ノﾀﾞｿｹｽｺ!

参考：2000/08/30(水)19時17分01秒