基本的なCGIですが。。。

このエントリーをはてなブックマークに追加
1名無しさん@お腹いっぱい。
本当に初心者的な質問ですが、フォームで入力されたデータを
CSVでサーバー上に残しておくCGIが欲しいのですが・・・
どこにあるか知っている方いらっしゃいませんでしょうか?
2名無しさん@お腹いっぱい。:2001/07/27(金) 03:36 ID:.FuBw9rI
基本的だと思うなら自分で書いたら?
3名無しさん@お腹いっぱい。:2001/07/27(金) 03:57 ID:???
こんなCGI探してますスレッド Ver3
http://corn.2ch.net/test/read.cgi?bbs=php&key=988777987

スレ乱立夏厨は死ね

--------------------------終了--------------------------
4名無しさん@お腹いっぱい。:2001/07/27(金) 10:41 ID:???
10行以内でかけるから自分で書いてみろよ
5名無しさん@お腹いっぱい。:2001/07/27(金) 23:56 ID:9rKR5JSs
2行でも書ける。
6名無しさん@お腹いっぱい。:2001/07/28(土) 14:47 ID:???
>>5 うん、そうだね。見にくいけどね。
7ダメダメさん:2001/07/28(土) 14:52 ID:???
ダメ具合を指摘してください。 m(_ _)m

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
($s,$mm,$h,$d,$m,$y) = localtime(time);
$m++;
$y += 1900;
$day = sprintf( "%04d/%02d/%02d %02d:%02d:%02d",$y,$m,$d,$h,$mm,$s);

foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$FORM{"$name"} = $value;
$comment = $FORM{'comment'};
$seibetsu = $FORM{'seibetsu'};
$onamae = $FORM{'onamae'};
}

if(!-e './hozon.txt'){
open(FILE,'./hozon.txt');
chmod(0666,'./hozon.txt');
close(FILE);

}

$foo = "<>$day<>$onamae<>$seibetsu<>$comment\n";
open(FH,">>./hozon.txt");
print FH $foo;
close(FH);
8名無しさん@お腹いっぱい。:2001/07/28(土) 15:45 ID:???
#!/usr/bin/perl

use CGI;

$comment = $query->param('comment');


だまされたと思って使ってみ
変数とパラメーターかえるだけで面倒なforeachから開放されるぞ
9名無しさん@お腹いっぱい。 :2001/07/28(土) 17:42 ID:???
敢えてダメなとこ指摘すると、CSVじゃないことくらい(わら
10名無しさん@お腹いっぱい。:2001/07/28(土) 23:55 ID:???
>7
スマソ
use strict;
が無い時点で見る気が失せた(w
11名無しさん@足立区。 :2001/07/29(日) 00:16 ID:???
>>8
use CGI;
$query = new CGI;
$comment = $query->param('comment');
だろ。
CSVじゃねえけど。
12ダメダメさん:2001/07/29(日) 01:04 ID:???
みなさんアドバイスありがとうです。
CGI.pmですか、なるほどー 勉強になるっす。
http://www.harukaze.net/~mishima/perl/cgi_sam1.html#decode5
こんな感じになるのかな、、試してみるです。
>>9 たはは、KENTさんのばっかり見てるんでつい (^^;
>>10 Perl の安全でない構文を制限するプラグマ??? (汗
消えるッスー
13名無しさん@お腹いっぱい。:2001/07/29(日) 01:23 ID:8KfTFdvA
>>12
漏れも遙か昔はKENTをみてすげーとか逝ってた厨房な時もあったが
今となっては糞スクリプトだな。
今は自分で書いた方が数倍マシだ。
二週間もみっちりと真面目にやればそう思えるぞ。
がんばれ。

どうでもいいが、この板バグってるぞ。
名前欄とメール欄がない。工事中か?
14名無しさん@お腹いっぱい。:2001/07/29(日) 03:05 ID:???
>>13
あるぞ?
15名無しさん@お腹いっぱい。:2001/07/29(日) 07:00 ID:gvabAGaw
>>10
use strict; の使い方、教えれ。
16名無しさん@お腹いっぱい。:2001/07/29(日) 07:45 ID:???
書くだけ……。
17名無しさん@お腹いっぱい。:2001/07/29(日) 08:33 ID:???
素晴らしい! (^^;
1813:2001/07/30(月) 00:22 ID:???
>>14
漏れのブラウザのセテーイがおかしかったらしい。
いじったら直った。
19旅する宿無し:02/04/25 03:50 ID:???
ココは87軒目 だわ なァ
20nobodyさん:02/04/28 11:14 ID:???
test
21nobodyさん:02/04/28 11:15 ID:???
test2
22nobodyさん:02/05/08 16:52 ID:???
書き込みテストスマソ
23名無しだよもん:02/05/08 17:32 ID:???
(・∀・∀・)テストハケーン!!
24山崎渉:03/01/15 13:54 ID:???
(^^)
25山崎渉
(^^)