携帯用のメールフォームのMethod

質問

ある、HP作成送付とを使って携帯用のメールフォーム（３機種対応）を作りましたが、既存のCGIがうまく稼動しません。
マニュアルをみると、携帯用ではMethodをPOSTではなく、GETに指定しろ。
と、有りますが、CGIのソースのどの部分を変更したらいいのか分かりません。
一応、予測してPOSTと記載されているソースを全てGET
に直したのですが、旨く、稼動しません。
（「このCGIは直接稼動していません・・・」が表示される。if ($buffer eq '') ってどんな条件なんでしょうか？）
携帯用のメールフォームのCGIを配布しているサイト、もしくは下記のソースで修正すべき点をご存知の方、
教えてください！！お願いいたします。

ソース--------------------
.
.
.
#データ入力
if ($ENV{'REQUEST_METHOD'} ne "GET") { &error('エラー','標準入力 METHOD=GET を設定してください.<br>&lt;form method=get action=........&gt;'); }
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
if ($buffer eq '') { &error('エラー','このＣＧＩは直接起動されません.'); }
$ref = $ENV{'HTTP_REFERER'};
$buffer2 = $ENV{'QUERY_STRING'};
if ($buffer2 ne '') { &error('エラー','標準入力 METHOD=GET に設定してください.<br>&lt;form method=get action=........&gt;'); }

回答No.1

feininger · ベストアンサー

たぶん、変更しすぎてしまったのだと思いますよ。
POSTとGETの判断ルーチンの部分も変更してしまったことで正常な判断ができなくなっているようです。

元ソースの
<form ～ method=POST ～>
のPOSTだけをGETにすると動くとおもいますよ。

お礼

有り難うございます。

ネットで「携帯用メールフォーム」のCGIを検索して
（メチャクチャ探しました　(^^ゞ　）
ソースを見てみたらfeiningerさんのいうとおり、
一箇所のPOSTがGETになっていました。

後は、入力チェックしたい項目の変数名を追加したりして、
なんとか動くようになりました。。

もともと、perlを知らないのにソースを触ろうとする方が
無謀でした。。。
でも、このことがきっかけで少し関数が理解できました。
有り難うございます。