プログラム作成スレッド

9：女傑 ◆k/y1YZqW2w：2025/07/14(月) 14:45:16: §基本的なフォームからの送受信です♪

if ($ENV{'Request_Method'} eq 'POST') { read(STDIN,$buffer,$ENV{'Content_Length'};); }
else { $buffer = $ENV{'Query_Stringth'}; }
@pairs = split(/&/,$buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$name=~s/</</g;
$name=~s/>/>/g;
$name=~s/&/&/g;
$name=~s/"/"/g;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value=~s/</</g;
$value=~s/>/>/g;
$value=~s/&/&/g;
$value=~s/"/"/g;
$FORM{$name} = $value;
}

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）

掲示板管理者へ連絡無料レンタル掲示板