CGIだけど、なんか質問ある？ Part 6

**nobodyさん** · 02/07/06 13:41

CGIの運用に関する質問スレッドです。

※CGIは特定の言語に依存するものではありません。

※Perlのコーディングに関する質問は専用スレがありますのでそちらでお願いします。
　 ↓
　 Perl 初心者コーナー Part13
　 http://pc.2ch.net/test/read.cgi/php/1022731565/l50

過去ログ・関連スレッドは >>2

**nobodyさん** · 02/07/06 13:41

**nobodyさん** · 02/07/06 14:02

>CGIだけど、なんか質問ある？
いえ、特に何も。

**nobodyさん** · 02/07/06 19:55

おい、またPart6かよ。

**nobodyさん** · 02/07/06 23:29

sendmailで複数先に送信する時に
$mailto = '****@**.**';
$mail = '****@**.**';
$mail2 = '****@**.**';
$mail3 = '****@**.**';
　　：
　　：
if (open(MAIL,"| $sendmail $mailto $mail $mail2 $mail3")) ・・・

これをfor文とかを使って短くしたいんですがどうしたら良いんでしょうか？

**nobodyさん** · 02/07/07 00:11

>>1
乙

>>4
ワラ

**nobodyさん** · 02/07/07 00:20

>>5

その送信先のアドレスは予め決まってるの？
なら、

$MailTo = array('hoge@example.tld', ……);
for($i = 0; $i < count($MailTo); $i++) {
// 送信処理
}

7 · 02/07/07 00:21

すまん、Perl だったか。
逝って来る。

**nobodyさん** · 02/07/07 00:23

>>7-8
って言うか。>>1 も読んでいない >>5 に答える義務は無いぞ

> ※Perlのコーディングに関する質問は専用スレがありますのでそちらでお願いします。
> 　 ↓
> 　 Perl 初心者コーナー Part13
> 　 http://pc.2ch.net/test/read.cgi/php/1022731565/l50

**nobodyさん** · 02/07/07 00:24

「http://サーバー名/CGIスクリプト名?データ」で実行し、データの
受け渡しをするプログラムを作っているんですが、他のURLへジャンプ
させるときに、
<A HREF="http://スクリプトパス/CGIスクリプト名?ジャンプ先URL">ジャンプ
</A>
としたいんですが、ジャンプ先URLをフルパスで出せるようにするには
どうしたらいいですか?以下がつくった内容です。
my($encoding) = @_;
my($method) = $ENV{'REQUEST_METHOD'};
if ($method eq 'GET') { $query = $ENV{'QUERY_STRING'}; }
elsif ($method eq 'POST') { read(STDIN, $query,
$ENV{'CONTENT_LENGTH'}); }
local(@query) = split(/&/, $query);
foreach (@query) {
tr/+/ /;
($key, $val) = split(/=/);
$key =~ s/%([A-Fa-f0-9][A-Fa-f0-9])/pack("c", hex($1))/ge;
$val =~ s/%([A-Fa-f0-9][A-Fa-f0-9])/pack("c", hex($1))/ge;
$val =~ s/\r\n/\n/g;
$in{$key} = $val;
}
my $req = new HTTP::Request POST => $val;
$req->content_type('application/x-www-form-urlencoded');
$req->content('match=www&errors=0');
my $res = $ua->request($req);
if ($res->is_success) {
$myd = $res->content;
$myd =~ s/(\<A HREF=\")/$1test.cgi?/g;
print $myd;
} else {print "No!";}

今の状態ですと、 $myd =~ s/(\<A HREF=\")/$1test.cgi?/g;
をやると、 <A HREF=test.cgi?test/index.html> というような感じになって
<A HREF=test.cgi?http://www.***.co.jp/test/index.html>;
というような形になりません。
超初心者なもので、どこをどう直したらいいか、詳しく教えて
いただけると助かります。すいません、よろしくお願いします。

**nobodyさん** · 02/07/07 00:25

>>9
ＣＧＩとして使うんですけどあっち逝った方が良いですか？

**nobodyさん** · 02/07/07 00:28

【初心者です】
【お願いします】

等のキーワードを見ると嫌悪感感じるのは俺だけ？

**nobodyさん** · 02/07/07 00:29

PATH_INFOの方がよくないかねぇ。

**nobodyさん** · 02/07/07 00:29

>>11
【perl の for 文】についての質問がどこをどうしたら【CGI（Common Gateway Interface）】と
結びつくのか説明してくれ

**yunyun42** · 02/07/07 00:29

はじめまして、
Web製作で質問するかここで質問するか迷いましたが、とりあえずこっちで聞いてみようと思います。
両方で聞いてみようかな？
私も自分のHP運営しているのですが、最近他人の名前を勝手に使って投稿する荒らし魔が続出して困っています。
そこで、掲示板に投稿者の名前が重複したり他人に勝手に使われないような手を施したいのですが、なにかお手軽な方法をご存じないでしょうか？
よろしくお願いいたします。

**nobodyさん** · 02/07/07 00:32

トリップ+cookie+pass

**nobodyさん** · 02/07/07 00:32

>>13
いくつか問題があるね

・PATH_INFO 非対応の鯖もある

・カレントスクリプトのディレクトリが PATH_INFO になるので、
スクリプト側から動的 html を生成する時、アンカータグとか
生成する場合のカレントディレクトリが PATH_INFO のディレ
クトリになってしまう

**nobodyさん** · 02/07/07 00:33

>>15スレ違い

**nobodyさん** · 02/07/07 00:33

>>15
そいつが二度と来ないようにはじく。

**yunyun42** · 02/07/07 01:06

>>18
やっぱりスレ違い？
これどこのスレで聞けばいいのかな。
いろいろ探してるんだけどこれぞーってのがまだ見つからないッス。
>>16
どこかの検索エンジンでトリップ+cookie+passをやれば見つかるということですか？

**nobodyさん** · 02/07/07 01:16

>>15 >>20
perlは知ってるの？
cryptって言う関数知ってる？

**静岡人！元気です。** ◆SHIZUjJ2 · 02/07/07 01:28

>>21
知りませんでしょう。たぶん。

**nobodyさん** · 02/07/07 01:36

ガイシュツかもしれませんが、
ＣＧＩを実行させずに、ソースをダウンロードすることは出来るものでしょうか？
ご存知の方はお教えくださいませ

**nobodyさん** · 02/07/07 01:43

ﾎﾟｶｰｿ

**nobodyさん** · 02/07/07 02:19

ほえ？

**yunyun42** · 02/07/07 02:53

>>21
残念ながら知らない者です。
申し訳ないです

**nobodyさん** · 02/07/07 02:59

>>26
perlとか知らないで、その掲示板をどうしようとしてたの？

一応書いておくと、perlならcryptって言う関数で暗号化が出来るから
トリップは入力した名前をこの関数を通せば実現できるよ。

**nobodyさん** · 02/07/07 09:02

画像アップロードの掲示板で、
最初に自分が画像を投稿することで、今までの書き込みログが閲覧できるという
掲示板ってどこかにない？

いろんなとこ探したんだけど、そういうのって無いんだよね

**nobodyさん** · 02/07/07 10:04

ガイシュツかもしれませんが教えてください。

ahhan255eをLinuxで使っているのですが、
Kondara/MNU Linux 2.1にインストールしたら軽快に動作しますが
TurboLinux Server 7 や Redhat Linux 7.3 にインストールすると
書き込みボタンを押してからリロードされるまで数分かかってしまいます。

Redhat 7.3 で Kondara みたく動作させるには何をどう設定すればよいのでしょうか。

02/07/07 17:07

>>29
ウチではTurboや赤帽でもちゃんとサクサク動いてる。
CGIの問題じゃないだろう。

29 · 02/07/07 20:18

>>30
CGIの問題とは考えてないです。
apache の設定に何かまずいところがあるのではないかと。
うなぎスクリプトとかは体感的に変わらないのですが、アッhan!だけ遅くなってしまいます。
Turboや赤帽でサクサク動かすにはどう設定すればよいですか。

**nobodyさん** · 02/07/07 22:47

>>31
＞＞CGIの問題とは考えてないです。

じ　ゃ　あ　ス　レ　違　い　だ　ろ。

**nobodyさん** · 02/07/08 00:25

始めて投稿させていただきます。
今まで他のサーバーでは普通に動いていたＣＧＩを、新しいサーバーに設置したところ
500のサーバーエラーを起こして動きません。
何度もローカルでテストして、実際に数カ所のサーバーではちゃんと動いているのですが・・・。
どなたか原因のおわかりになる方がいらっしゃったら、どうかご教示ください。
よろしくお願いいたします。

**nobodyさん** · 02/07/08 00:28

そのサーバーで使えない関数などが使われてる余寒。

**nobodyさん** · 02/07/08 00:29

>>33

・パーミッション
・perlパス
・使えない関数（flockとか？）

みてみ

33 · 02/07/08 00:36

34さん
ありがとうございます。
特に特別なことはしていないと思うのですけども。
いままでいくつも同じところでサーバー(有料)をレンタルしており、今回もそこに
借りたのですが、今回に限ってまったく動かないのです。
スクリプトを見なおしたりしているのですがまったく見当がつきません。

33 · 02/07/08 00:39

35さん、ありがとうございます。
パーミッションもＰｅｒｌのパスも確認して設定をしており、flockもはずしてあるのですが
動きません。

**nobodyさん** · 02/07/08 01:12

>>33
ものはなんだ？
使えない関数はflockだけとは限らんぞ

33 · 02/07/08 01:20

簡単なログインをするだけの物と予定表、それと掲示板です。
最初のログインをするスクリプトは、ファイルを参照するためにオープンして
入力されたものと一致したら、予定表なり掲示板に飛ぶというものです。

**nobodyさん** · 02/07/08 01:27

`perl path/perl -wc script.cgi`;

これの実行結果を出力させて見てみろ。

33 · 02/07/08 01:37

すみません、`perl path/perl -wc script.cgi`;というのは
スクリプトのなかに書くのですか？

**nobodyさん** · 02/07/08 01:41

CGIをつくるだけ。

#!/usr/bin/perl
print "Content-type: text/plain\n\n";
print for `perl_path/perl -wc ./script.cgi`;

33 · 02/07/08 01:56

42さん、ありがとうございます。
実行してみたのですが、これもサーバーエラーで帰ってきてしまいます。

**nobodyさん** · 02/07/08 01:57

じゃ、CGIが動かない設定になってるんだろ。そのへんの確認は？

33 · 02/07/08 02:00

さきほどサーバー屋さんの方でレスキューさんのところのスクリプトは
上手く動いているとの返事を頂き、見て見ましたら確かに動いています。
何が違うのか調べてみます。

**nobodyさん** · 02/07/08 02:06

>>45
ここのPerl Checker(文法チェッカ)ってやつ使ってみれ
http://www.kent-web.com/utility/index.html

33 · 02/07/08 02:20

はい、さっそく使わせていただきます。
本当にご親切にありがとうございました。

質問 · 02/07/08 12:44

初歩的な質問で申し訳ないのですが、

アクセス制御をＣＧＩで行い、ＩＤ、パスワードが一致するとリンク先のＨＴＭに飛ぶ

と言うのがよくありますが、これでリンクさきをＣＧＩとすることは可能なのでしょうか？

アクセス制御（ＣＧＩ）→ＩＤ、パスワード入力→掲示板のＣＧＩって形なのですが・・・

ＣＧＩ→ＣＧＩって言うのはどうなのでしょうか？

教えてください。よろしくお願いします。

**nobodyさん** · 02/07/08 12:48

>>48
やってみた上で言ってるの？

**nobodyさん** · 02/07/08 13:05

CGIだろうが、PNGだろうが、JPEGだろうが、Klez_h.emlだろうが、問題無い。

質問 · 02/07/08 13:54

>>49

はい。やってみたのですが、飛んだ先がＣＧＩのテキストで出てくるんですよ。
掲示板では無くて、ＣＧＩのプログラムが・・・・・
７５５とかアクセス権はきちんと確認しているのですが・・・・

**画像ライブラリ** · 02/07/08 14:46

有料でも無料でも、構わないのですが、写真素材のライブラリーを
作り、それを検索して表示できるようなCGIがあったら、
教えてくれませんか？

**nobodyさん** · 02/07/08 15:39

>>48飛び先に直リンクされたらおわりだな(ﾜﾗ

02/07/08 18:06

>>51
そういうアクセス制御ではなく、目的のCGIソースの先頭に
追加するタイプのほうがいいだろう。

**nobodyさん** · 02/07/08 20:39

>>52
> 有料でも

なら、誰かに作ってもらいなさい。

**nobodyさん** · 02/07/09 02:21

アイコン付き掲示板に、アイコン一覧を表示させる機能を追加したいのですが、
@gazou　には画像のキャラクター名が、
@url　　　には画像ファイルのURLが格納されてます。
@gazou[1]の画像ファイルは@url[1]となるよう揃えています。

print "<tr>\n";
foreach (@$gazou) {
print "<td>$_</td>\n";
}
print "</tr>\n";
}
print "<tr>\n";
foreach (@$gazou) {
print "<td><img src=\"$url\"></td>\n";
}
print "</tr></table>\n";
}

とやってみたのですが、テーブルが一列になってしまい、
非常に見栄えが悪いです。
恥ずかしながら、
foreach $1,$2 (@$gazou,@$url)
とやれば、それぞれに上手く入ってくれるかと思ったんですが駄目でした。

これを改善するにはどうしたらよろしいのでしょうか？
どうかよろしくおねがいします。

56 · 02/07/09 02:23

すいません、書いてるうちに混乱してしまいました。
今使っている正しいソースはこちらです。

print "<tr>\n";
foreach (@$gazou) {
print "<td>$_</td>\n";
}
print "</tr>\n";
}

print "<tr>\n";
foreach (@$url) {
print "<td><img src=\"$_\"></td>\n";
}
print "</tr></table>\n";
}

**nobodyさん** · 02/07/09 04:34

>>56-57

どう考えても、CGI（Common Gateway Interface）とは関係なくて、
単なる「Perl のコーディング」に関する質問なんだけど？

**nobodyさん** · 02/07/09 23:36

>>59
ﾏｿﾞﾚｽ
foreachじゃなくてforつかえ

**nobodyさん** · 02/07/09 23:43

>>59
どして？（素朴な疑問）　短いから？（笑）

**nobodyさん** · 02/07/09 23:48

>>60
理解できてなかったかもしれんが、>>56-57はアイコンをテーブルで

□□□□□
□□□□□
□□□□□
□□□□□

こんな感じで2次元配列で並べたかったんだろ？
だったらforのが簡単にできる。

**nobodyさん** · 02/07/09 23:52

for (@data) と foreach (@data)　って違うの？！いっしょと思ってたＹＯ！テストしてみます。あんがと。

**nobodyさん** · 02/07/10 00:01

>>62
いやいや、だから

print "<table>";
for($i=0;$i<$HEIGHT;$i++){
　print"<tr>";
　for($j=0;$j<$WIDTH;$j++){
　　print "<td><a href=$url[$i*$WIDTH+$j]>$gazou[$i*$WIDTH+$j]</a></td>";
　}
　print "</tr>\n";
}
print "</table>";

こういうことがやりたいんじゃないの？

**nobodyさん** · 02/07/10 00:15

にゃるほど・・そういうことでしたか。自分は>>56ではなくてただの素朴な質問者ですた。
まぎらわしくてスマソ（´Д｀；）
for (@data) と foreach (@data) はいっしょですね。

**Hideki** ◆wtRzKEV2 · 02/07/10 00:28

僕が聞こうと思った質問はなんだったのかという質問。
スレ読んでる途中で忘れました。逝こう。

**名無しさん＠そうだ選挙にいこう** · 02/07/10 01:59

このページのサンプルをサーバにアップしてみたんだけど、
「ご意見・ご感想をどうぞ」の部分の
ハンドルネームと内容の項目が表示されません。
　どうしてなのか、ご存知の方ご助言ください。

http://www.narishin.com/qnaire1.htm

**nobodyさん** · 02/07/10 02:02

>>66
こんな時間にネタはやめれ。

**Hideki** ◆wtRzKEV2 · 02/07/10 08:39

Apache 2.0.39では、なぜアドレス上のクエリーに日本語が入ると（urlエンコードされた）、
CGIが問答無用に動かなくなるのでしょうか？
Apache 1.3.26では動くCGIなのですが。ヘルプきぼん。

**nobodyさん** · 02/07/10 08:51

文字列のエンコードぐらいしる！

**nobodyさん** · 02/07/10 09:13

デコードじゃないか？

**nobodyさん** · 02/07/10 09:21

＞なぜアドレス上のクエリーに日本語が入ると（urlエンコードされた）、CGI

妙な内容の括弧のせいで文章全体が崩壊していると思われ。

**Hideki** ◆wtRzKEV2 · 02/07/10 10:02

括弧内は”日本語”にかかった修飾です。
http://127.0.0.1/?Query=%a6%c6
デタラメですが、例としてはこんな感じです。

ちなみにデコードしるじゃなくて、CGIが頭から作動しなくなるの。
アドレスにurlエンコード入るとSSIが入ったページの全SSIがエラー起こしはじめます。
困りました。

**nobodyさん** · 02/07/10 10:14

Bugかな？
だれかApache 2.0.39を使ってるやつ他にいないか？

**nobodyさん** · 02/07/10 11:27

>>68, >>72
CGIと言ったりSSIと言ったり忙しい奴だな。

**nobodyさん** · 02/07/10 17:01

>>73 (ﾟДﾟ)ﾊｧ?

使えてますが、何か？

それより、>>68 >>72 があまりに馬鹿なのでだれも構ってくれないだけだろ

**Hideki** ◆wtRzKEV2 · 02/07/10 20:20

> あまりに馬鹿
え？

**nobodyさん** · 02/07/11 02:25

（　ﾟдﾟ）ﾎﾟｶｰﾝ

**nobodyさん** · 02/07/11 02:25

( ﾟдﾟ)ﾎﾟｶｰﾝ

**nobodyさん** · 02/07/11 10:47

(^д^)ﾎﾟｶｰﾝ

**nobodyさん** · 02/07/11 13:17

CGI改造専用スレに行くべきが迷ったのですが、
CGIそのものの改造ではないのでこちらで質問いたします。

ttp://www.prism-web.com/cgi/file/bbs/designbbs/index.html
ここの掲示板CGIをいただいて使おうと思っています.
この掲示板はデザインをテキストファイルで行います。
サンプル＜tp://www.prism-web.com/cgi/file/bbs/designbbs/cgi/design4/bbs.cgi
（まだ見てるだけの状態なので、私のサイトにはないです。これは配布元のサンプル）
私が変更したいのは1箇所、「この記事へ返信」をリンクではなく、
投稿ボタンのような、ボタンにしたいのです。

どう変えればよいでしょうか。

**nobodyさん** · 02/07/11 13:30

>>80
十分に改造じゃないか。
ボタンにするだけならと簡単そうに考えてるかもしれないが、
そう簡単とは限らないよ。

**3PIO** ◆3pIoOHKo · 02/07/11 14:18

>>80-81
<FORM ACTION="./bbs.cgi" METHOD="GET">
<INPUT TYPE="hidden" NAME="mode" VALUE="res">
<INPUT TYPE="hidden" NAME="no" VALUE="スレ番号">
<INPUT TYPE="submit" VALUE="この記事へ返信">
</FORM>

こんな感じになればいいと思うけど

**nobodyさん** · 02/07/11 15:43

あとは JavaScript で飛ばすとか。。。

**nobodyさん** · 02/07/11 17:27

JavaScript 常時オフの場合は？

**nobodyさん** · 02/07/11 19:39

>>80
JSだとこうかな。 (mes_sheet.txt)

<script type="text/javascript">
document.write("<form><input type='button' onclick='javascript:location.href=\"$script?mode=res&no=$no\"' value='この記事に返信'></form>");
</script>
<noscript>
[<a href="$script?mode=res&no=$no">この記事に返信</a>]
</noscript>

80 · 02/07/12 14:15

81>>
迷ったのよ・・・（ｗ
なぜなら、その改造は掲示板のCGIを書き換えるのではなく、
CGIが読み込むデザインファイル（テキストファイル）
を書き換えるものだから・・・CGI改造とは言わないんじゃ？
とか思ったの・・・。
でも助言サンキュ。今度から改造スレに行くよ。。。

>>82
おおっ。そうか、そうすればよいのか・・・。
有難うございます（TT)
（hiddenをどうしていいのか詰まってた（ｗ））
>>83,84
ナイス案サンキュ。
>>85
有難うございます。

＞＞ALL
みんな教えてくれてありがとね！　　

**nobodyさん** · 02/07/12 15:21

>86
そう思うなら、HTMLスレに行った方がよかったと思われ。

**nobodyさん** · 02/07/13 18:34

Linuxサーバーで PerlでプログラミングしたCGIを動作させているのですが、
現在不都合が起きて困っております。

動作内容は FTPでアップロードした exe(自己解凍書庫)ファイルを
CGI経由でダウンロードさせる物です。

---- ここから ----
$|=1;
print "Content-Type: application/octet-stream\n";
print "Content-Disposition: attachment; filename=\"$file\"\n\n";

open(FILE, "$file_path$file") || die;
binmode(FILE);
binmode(STDOUT);
print <FILE>;
close(FILE);
----- ここまで ----

exeファイル以外は上手くいったのですが、(Lzh、zip等)
exeファイルの場合はダウンロードは出来るものの、
アップロード時とファイル容量が違っておりました。

アップロード時：32,051 バイト
ダウンロード時：37,718 バイト

ダウンロードした後実行すると、
「ヘッダーの内容が不正解凍できません」とエラー表示されます。

print "Content-Type: application/octet-stream\n";
上記を print "Content-Type: application/x-msdownload\n"; に変更してみたのですが、
それでも上手くいきませんでした。

何か解決策があれば教えてください。

**nobodyさん** · 02/07/13 19:55

>>88
FTP でウｐした時点で、既に exe ファイルが
壊れているとか。

**nobodyさん** · 02/07/13 22:13

http://pc.2ch.net/test/read.cgi?bbs=hp&key=1001744788&st=334&to=336&nofirst=true
これってどうなの？

**nobodyさん** · 02/07/13 22:16

携帯用アダルトサイト管理人の溜まり場
http://pc.2ch.net/test/read.cgi/hp/1001744788/l50

**nobodyさん** · 02/07/14 00:18

>>89

アップロードしたファイルと元のファイルは同じもので、
再度FTPでダウンロードした場合正常に解凍できました。

他の原因としては何が考えられるでしょうか・・？

念のためにスクリプトを下記のように変更しました。

open(FILE, "$file_path$file") || die;
my $filebody = '';
while(read(FILE,$filebody,1024)){
print $filebody;
}
close(FILE);

◆JAPH9PWA · 02/07/14 00:37

>>92
スクリプトに問題があるとは思えない。
ローカルのファイルサイズとFTPクライアントで見るサーバーのファイルサイズは本当に同じ？

**nobodyさん** · 02/07/14 00:40

>>93

再度確認しましたが同じでした。
CGI.pm を使って CGI経由でファイルのアップロードを行ったのですが、
その場合もだめでした。 exeファイルのみ壊れます。。

◆JAPH9PWA · 02/07/14 00:50

う～ん、何故だろう？ごめん、俺にはわからない。

**nobodyさん** · 02/07/14 00:54

ダウンロード時にバイト数が増えているからファイル内容出力後に
余計なもの出力してるんだろ。

**nobodyさん** · 02/07/14 03:34

binmode?

◆JAPH9PWA · 02/07/14 14:31

オリジナルファイルと壊れたファイルをバイナリ比較してみるしかないんじゃないかな。
>>97
Linuxサーバならbinmodeは無関係でしょ。

**nobodyさん** · 02/07/14 15:56

PATH_INFO での引数渡しにおいてのスラッシュの扱いについて質問です。

http://dokosoko.com/hugahuga.cgi/path/to/object
だと普通に動くんですが、
http://dokosoko.com/hugahuga.cgi/path%2Fto%2Fobject
だと、cgi 側に制御がいくまえにサーバが 404 Not Found を返してきます。
これって回避出来ないでしょうかね。
というか、なんで Not Found が返ってくるんだろ。

**nobodyさん** · 02/07/14 15:59

>>99
/path%2Fto%2Fobject というファイルが見つからないといってるんだから、
おそらく見つからないのでしょう。

**nobodyさん** · 02/07/14 16:10

スラッシュをURLエンコしたらディレクトリと見なされないのでは？