O@y XNvg ..
854:nobody³ρ
05/12/04 18:28:32 i00gwMB7
U±³κΔά΅½B
y.@ CGIΌ @.z@YY-BOARD v5.5
yzzζURLz@URLΨέΈ(www.kent-web.com)
fR[h
sub decode {local($buf,$key,$val);
undef(%in);
if ($ENV{'REQUEST_METHOD'} eq "POST") {
$post_flag=1;
if ($ENV{'CONTENT_LENGTH'} > 51200) { &error("eΚͺε«·¬ά·"); }
read(STDIN, $buf, $ENV{'CONTENT_LENGTH'});
} else {$post_flag=0;
$buf = $ENV{'QUERY_STRING'};}
foreach ( split(/&/, $buf) ) {
($key, $val) = split(/=/);
$val =~ tr/+/ /;
$val =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("H2", $1)/eg;
f¦ΒΜΕεΆ§ΐπ΅½Δ\[Xπ©Δ’ά΅½B
γΜ51200π’ΆκΞΕεΆΰΟXΕ«ιΜ©Ζv’
50ΙΟ¦½ΜΕ·ͺA500ΆΜ«έΰΚΙeΕ«ά·B
Η€·κΞA§ΐ·ι±ΖͺΕ«ιΜš倩B»κΖΰ±±ΝΦWΘ’Μš倩B
ΌΙ β΅’Ζ±λΝΊ ½θΕ·Bζ롨蒡ܷB
Lo^
sub regist {local($flag,$oyaChk,@lines,@data,@new,@tmp);
# tH[όΝ`FbN@&formCheck;
# ΤζΎ@&get_time;
y[WΕVX\¦XbhΜυήXκbθΜj
[X¨ά©ΉXg₯IvVπ\¦ΙΒΤ΅2ch
3995ϊOΙXV/341 KB
S:undef