ＣＧＩだけど、なんか質問ある？Part 5

■過去ログ
　Part 3 http://pc.2ch.net/test/read.cgi/php/988727833/l50
　Part 4 http://pc.2ch.net/test/read.cgi/php/1000804655/l50

その他参考になるスレッドを >>2 に纏めたので、十分に調べた上で質問して下さい。

CGI以外のPerlに関する質問スレッド
　Perl 初心者コーナー
　　http://pc.2ch.net/test/read.cgi/php/1003900311/l50
　CGIに依存しないPerlの話題一般
　　　http://pc.2ch.net/test/read.cgi/php/991313362/l50

Perl以外のCGIスレッド（別にこのスレで良いんだけど参考に）
　RubyでCGI
　　　http://pc.2ch.net/test/read.cgi/php/988948655/l50
　C言語CGI専用スレッド
　　　http://pc.2ch.net/test/read.cgi/php/988918264/l50
　TclでCGI作ってる人いる？
　　　http://pc.2ch.net/test/read.cgi/php/993648764/l50
　/*Perl.Ruby.php以外でCGI*/
　　　http://pc.2ch.net/test/read.cgi/php/1004107967/l50

その他のWEBプログラムスレッド
　【PHP】 質問スレッド
　　　http://pc.2ch.net/test/read.cgi/php/1003283567/l50
　◆JSP◆
　　　http://pc.2ch.net/test/read.cgi/php/984840356/l50
　==ASP==
　　　http://pc.2ch.net/test/read.cgi/php/984840107/l50
　ColdFusion
　　　http://pc.2ch.net/test/read.cgi/php/988191427/l50

その他の良スレ
　【Perl,CGI】参考書籍
　　　http://pc.2ch.net/test/read.cgi/php/988809842/l50
　スクリプト改造工房
　　　http://pc.2ch.net/test/read.cgi/php/988808396/l50
　こんなCGI探してますスレッド
　　　http://pc.2ch.net/test/read.cgi/php/1003132904/l50

クソスレ立てるな

＝＝＝＝＝＝＝終了＝＝＝＝＝＝＝

串とIPとあゆ板下さい
それでは おながいします

>>3＝>>4

>>1==>>2==>>3==>>4

http://me.bird.to/hakoniwa/download.htmlから
箱庭諸島２ Ex.Version (based 箱庭諸島２ver2.30)

を落して自分のFreeBSDのサーバで動作させようと思ったのですが
http://xxx.xxx/xxx/hako/hako-main.cgi
にアクセスしたところ

つぎのターンまで、あと 0 時間 -16821368 分です 同時アクセスエラーです。
ブラウザの「戻る」ボタンを押し、
しばらく待ってから再度お試し下さい

というエラーがでていますいます。

/var/log/httpd-error.log にエラーは記録されてはいません。
どなたか何故エラーででるのあ教えてください

という質問をしました。

>httpのエラーと箱庭のエラー出力の区別付かんヤツには無理だと
>思われ

もちろん区別はついていますよ。
しかし、質問するのにこちらの情報はできるだけ出す必要が
あると思い「エラーログはでないの？」の質問が来てもいいように
最初に出しておきました。


どなたか原因を教えてください。
ローカルなサーバで外部に公開はしていないので上のアドレスは
デタラメでです。

なに荒らしてるんだ？この糞厨房は。 >>3,>>4,>>6

>7
スクリプトの製作者に聞くのがいい。
マジレス。

同時アクセスエラーなんじゃ無いの?

>>10
> 同時アクセスエラーなんじゃ無いの?

このエラーの意味が分からないのですが
自分一人しかアクセスしていないです。

なら配布所で聞く事を勧める
多分人数制限にセマフォとか排他してて、それが詰まってるのでは
と言う意味で書いた
見に行ったらperlだったんで萎えた、cppVer使ってるなら追っても良いけどね

use CGI qw(:standard);
$qq = new CGI;
print $qq->header(-type=>"text/plain", -attachment=>"data.txt");

ってやってもNetscape6.2でファイルの保存ダイアログが開きません。
（IE5.5は開く）
何か対策はありますでしょうか。内容はテキストデータです。

text/plain を適当に変えれ。

ヤフーオークションで、幻の人気商品、発見！！！

今は無き「コピーガードキャンセラー」↓
http://page2.auctions.yahoo.co.jp/jp/auction/b19193423

ヤフーオークション内では、現在、このオークション
の話題で、持ちきりです。

>>14 てっ適当に？

なるほどapplication/octet-streamにしたらダイアログが出ました
ありがとうございます。
こういう時につかうスタンダードなヘッダってありますか？

俺は application/x-download にしてる。

http://pc.2ch.net/test/read.cgi/php/1000804655/514-515n
前スレで、CGIの負荷はむしろアクセス数のほうが問題だ。みたいな事言われているんですが、
ログを書く代わりにhtmlに保存するような掲示板の場合、そのhtmlを書くときに多少無理やっちゃっても大丈夫でしょうか？
たとえば、100kb位の配列をreverseとか。

>>18
絶対やっちゃ駄目
100KBの配列をreverseすると、しない時と比べてメモリを2MB以上消費します(構文解析時のワークエリアも含めて)
良くてアカウント停止、最悪サーバが落ちます

>>19
ありがとうございます。
自鯖で試して、明らかにreverseが重かったので不安になってました。
ところで、reverseの代替となるアルゴリズムって何かありますか？
負荷にならないようなのがいいんですが。。。

>19
Perlの話ですけど便乗質問よろしいでしょうか？

reverseでやるとまずいそうですけど、例えば
foreach(reverse(@data){$_を処理}
for($i=$#data;$i>=0;$i--){$data[$i]を処理}
この２者の場合、後者の方がいいということでしょうか？

)の数打ち間違えたのはご容赦を（あせ

ｺﾗｺﾗ　ｗ
>18 配列のサイズ書かれても分からんよ
50KBの要素が2個の配列か、1バイトの要素が102400個かで全然違うだろ?
つーか構文解析に2MBも使わないって(苦笑

後者。

それとサーバーも落ちない　

>24
ありがとうございます。
自分のスクリプトを手直ししてみようと思います。

ところでこういった事はどこで勉強されるのでしょう？
大抵の書籍とかはプログラミングの仕方は書いてあっても
こういった速度などに関するものはあまりないように思えて・・・。
よろしければご指導お願いします。

reverseってそんなに遅かったかな
双方向リスト反転してるだけじゃ無いの?　＃未確認だけど・・・

ネットゲーとはどういう構造なんでしょうか？
たとえばネット対戦できる麻雀ゲームを作成するとすればどういうスキルを習得すればできるんでしょうか？
初心者には無理だってことは承知ですが、参考までにおしえてください。

　　　　　　　　　　　 　　　,ｨﾐ, 　　　　　　　,ｨﾐ,　　　　　　　　　　　　　 　ﾌ
　　　　　　　　　 　 　 　 彡　ﾐ 　 　 　　　彡　ﾐ,　　　　　　　　　 　 ﾔ　｜
　　　　　　　　　　　　 ,,彡　　 ﾐ､､､､､､､､彡　　ﾐ,　　　　 (⌒)　　　　ﾚ　 |
　　　　　　　　　　　 彡;:;:　　　　　　　　　　　　 ミ,　　　 (　　ヽ　　 ﾔ
　　　　　　　　　〜三;:;::::: 　　　　　　　　　　　　 彡〜　 ﾉ　 ノ　　　ﾚ
　　　　　　　　 ~~三:;:;:;:::::　　-=・=-　　　-=・=-　三~~　ヽ （　　　　：　　　　　;;
　　　　　　　　　~~彡::;:;:;:;:::..　　　　 ＿＿_ 　　　 ,三~~　（　ﾉ ,,,,,　　：　　　　　 ;;
　　　　　　　　　 ~~彡;:;:;:;:;:;:;:.　 　　|┴┴|　 　　,ミ~~　ノノ ;'" ,,ノ―､　　　　　,;'
　　　　　　　　　　~~彡:;:;:;:;:;:;:;:;.　　ﾉ――|　---=＝ニノ ,;'′　>=ﾆ(二二二()
　　　　　,...-''''""~~,::;:;::;::;::;::;'　　　　　　　　　　　　ﾐ,,　　,;'′　 ゝ--〈
__＿＿,;";;:;;;;;;;;;;;;;;;;;;;;;:;:;:;:;:;:;:;　　　　　　　　　　　 i!　ﾐ,,,,;'′　　 `ー‐'
　　　　　　　　　　　::::ﾐﾐﾐ:;:;:;:　　　　　　　　　　　ﾐ::　　　　　　,;'￣￣￣￣|　　＼＿＿_／
　　　　　　　　　　　 :::::ﾐﾐﾐ:;:;:　　　　　　　　　　　ﾐ:::,　　　,;::''′　 　 　 　 |.　　　 ＼／
　　　　　　　　　　　　::::ﾐﾐﾐ:;:;::　　　　　　　,;+''"~~ﾞ+､~'''''~　　　　　　　 　 |　　　　　|
　　　　　　　　　　　　 ::::ﾐﾐﾐ:;:;:;:　　　　 ,+'"　　　　　ﾐ:::::　　　　　　　　 　 |　　　━┷━━━┳━━━━
　　　　　　　　 　 　 　 :::::ﾐﾐﾐ:;:;:;:;:　　>':;:　　　　　　 ﾐ::　　　 　 　 　 　 　 |　　　　 　 　 　 　 ┃
　　　　　　　　　　　　　::::::ﾐﾐﾐ:;:;:;:;:;../;:;:;:　　　　 　 ;:"　　　　　　　　 　 　 |　　　　 　 　 　 　 ┃
　　　　　　　　　　　　　 ::::::::ﾐﾐﾐﾐ:;:/;:;:;:;:　　　　,.+'"''-､＿＿＿＿＿＿＿_|＿＿　　　　 　 　 ┃
￣￣￣￣￣￣￣￣￣￣￣￣￣;':;:;:;:　 　,.+'"　　　　ﾐ､　　　　　　　　　　　 　 l 　 　 　 　 　┃
　　　　　　　　　　　　　　　　　::::::ﾐ;:;:;:;:..　..ﾐ:::ﾐ:;: 　 　　ﾐ　　　　　　　　 　 　 　 l 　 　 　 　 　┃
　　　　　　　　　　　　　 　　　　::::::しUUU┘::::ﾐ:;: 　 　 ﾐ　　　　　　　　　　 　 　 l 　 　 　 　 　┃
　　　　　　　　　　　　　　　　　　:::::::::::::::::::::::::::└UUUじ　　　　 　 　 　 　 　 　 l　 　 　 　 　 ┃
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿__＿___,l　 　 　 　 　 ┃
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ━━━┻━━━

麻雀のルール

でかいAA貼るアフォに出会わない運

質問です。
自鯖でCGI（掲示板、C言語で書かれた物）を動かそうと思ってるんですが、うまく動いてくれません。
拡張子をexeに変えてローカルで実行すると、ファイルが大きすぎてメモリに入りきらないというエラーが返されます。
winの設定の問題でしょうか？ちなみに、メモリは256MB,OSはWin2k、httpdはan_httpdです。

#もしかして板違い・・・？？(;´Д`)

>>32
不幸だ。
コンパイラって知ってる?

そりゃもちろんコンパイルはしましたよ。
そのコンパイル済みのバイナリファイルが実行できないんです。

vine2.1.5でコンパイルしてきた奴なんですけど、それじゃダメっすか？？

ｲﾁｵｳｱｹﾞ

あ、
＞拡張子を〜〜
のとこで勘違いされました？？
コンパイル→exe→cgi→(ﾟдﾟ)ﾏｽﾞｰ
じゃぁexeのまんまでどうだ？→(ﾟдﾟ)･･･ｰ

です。

どうだって言われても････
vineのソフトはWINじゃ動かないだろ?
それともクロス魔術師がコンパイルしたんだろうか

>>34
え・・・vine上でコンパイルしてどこで実行しようとしていらっしゃるのでしょうか

vineのソフトじゃなくて、.tar.gzでアーカイブされてたからlinux上でコンパイルしてきたんです。
それでもダメでしょうか？

>>38
すれ違い・・・(;´Д`)ｧｩｧ

vineでコンパイルしてwinで動かそうとしてるんです。

ふつーコンパイラは自分のインストールされてる環境に合わせた
コードを生成します。
しかし、諦める事はありません。
enterキーを押す時に強く念じるのです！
「これはWINで使うんだよぅ〜〜　(-人-)ﾅﾑﾅﾑ」
そうすれば、小人さんがWINDOWS用のexeファイルを頑張って作ってくれます
難しいけど、、、
頑張って！

＃　と言うコピペがどっかで有ったよ　＾＾；

>>41
やぱダメですか・・・(;´Д`)
つーかﾜﾗﾀ（ｗ
winでなんとかコンパイルする方法ありませんか？？
ヘッダファイルを無理矢理持ってくるとか・・・

えっとここでWIN用のフリーのコンパイラが有るから頂戴すれ
http://www.borland.co.jp/cppbuilder/freecompiler/
んでもって、コイツを設定してこれでコンパイルしてみ
だた処理系依存は当たり前だから、下手するとヘッダさえ
見つからない事もある
と言うか、大きいアプリなんかは絶対無理だ

#　BBS位ならうごくかもね

borlandやらLSI試食版やらはもう持ってるんですよ(;´Д`)
でも、コンパイルするとヘッダファイルが足りないみたいなんです。
今日はもう寝ますんで、明日また色々調べて挑戦したいと思います。
こんな時間にありがとうございました。

お前はコンパイラ持っててそんな事も知らんかったのか　（＾＾
まぁ、規模にもよるだろけどBBS位なら大抵同等のヘッダが有るから
それを使え、ついでにC++もべんきょすれ

まだ起きてたり・・・

いやぁ、よくわからないんですけど、unistd.hてのがincludeフォルダに無いんですよ(;´Д`)
どっかで落として来れるもんなんでしょうか？
明日linuxから持ってきてincludeフォルダに置いて再度挑戦してみます。
それでは、おやすみなさい。。。

>>46
何も考えず、そのままvine上で動作させれば良いと思うんだが

おはようございます。

>>47
いえ、今鯖をlinuxに移行する為の準備期間ってことでlinux勉強中なんですよ。
で、繋ぎとして新しい掲示板をwinで使って見ようかな、と。

さ、これから歯医者いってから試してみたいと思います。
結果は後ほど・・・

結果報告。

必要なヘッダファイルを持ってきた所、なんとかコンパイルできました。
ﾁｮﾄ強引かもしれませんが・・・(;´Д`)
しばらくはこれで繋いで、頑張ってlinux勉強しようと思います。
ありがとうございました。

open(OUT,+>filename.txt);
print OUT "あいうえお\n";
close(OUT);

でfilename.txtが新規作成されますよね。
でも作成場所をトップディレクトリにした場合はは
新規作成されません。
どうしたら解決できるかご存知の方おられますでしょうか。
よろしくお願いいたします

>>50
何箇所にマルチポストしてるの?

>Perlの実行速度
簡単に出せますよ。
$CPU_start = (times)[0] ;
処理内容
$CPU_end = (times)[0];
printf("<DIV align=right>消費時間： %.3f CPU秒</DIV>\n",$CPU_end-$CPU_start);
printf("</body></html>"); # by水沢

いちお
print "Content-type: text/html\n\n";
出すの忘れないでね（汗

今の2ch見てて思ったんですけど、鯖に、hoge.cgi/php/〜〜っていうブラウザからのリクエストが届いた時に、
read.cgiっていうフォルダを探しちゃったりしないんでしょうか？
それとも、そうさせないための方法とかあるんでしょうか？
どなたか、ご教授下さい。

はぁ何言ってるのオマエ？
ﾆﾎﾝｺﾞﾊﾅｾﾖｳﾞｧｰｶ

中途半端な煽りレス返すんなら来るんじゃねぇよ。
・・・オレモナー






などと逝ってみるテス�d

えと、書き方が悪かったでしょうか・・・。
read.cgiより後ろの文字列は、URLとして解釈されるのか、それとも環境変数に代入（？）されるのでしょうか？

環境破壊反対!!

>>32
コンパイラちゃうくて、
インストーラーだっけ？
なによく知らんけど、
WINってバージョンあったよね。

馬鹿が馬鹿よ呼ぶ大変な状態です！！

>>57
何が言いたいのか分からない。
環境変数ってどの環境変数??
URIとして解釈されないとパラメータの意味が無くなると思うんだが････

今いろいろ見てきました。
hoge.cgi/**
の、**の部分が環境変数PATH_INFOに入るということは実験できたのですが、
それでもcgiの実行結果が返ってくるということはhttpdはそのディレクトリは探してないのでしょうか？？

>>61
ちょっと自分でもこんがらがって、うまく伝えられない状況(;´Д`)
ｸﾞｸﾞｰﾙへ逝って来ます・・・。

ああ、そう言う事か
httpdがリクエスト貰ったらDocumentRootからディレクトリを辿って行くのな。
んでディレクトリじゃ無くてファイルか見つかった時点で
httpd_conf何かの設定を見て、そのファイルがexecCGIされてたら
/ 以降をhttpdがEnvのPATH_TRANSLATED何かにセットしてファイルをオープンする訳
まあ大体どんなサーバでもこんな感じでファイルを探してる
これでOK?

だからこれは通らない訳だな
http://pc.2ch.net/php/index.html/foo

＞httpdがリクエスト貰ったらDocumentRootからディレクトリを辿って行くのな。

なるほど、これで謎が解けました。
つまり、優先順位（？）はディレクトリよりファイルが先だからhoge.cgiが見つかって
それが実行出来る物であったら、それ以下、?より前の部分がPATH_INFOに入れられるワケですね。

口下手ですいませんでした、ありがとうございました。

>>64
通らないってどゆこと？
普通に見えちゃったんだけど・・・。

けど、webprog板だけ、何故かバナーと背景が見えないなあ。
他の板は普通に見えるのに。
謎だ。なんか基本的なことを見落としているのだろうか・・・。

> つまり、優先順位（？）はディレクトリよりファイルが先だからhoge.cgiが見つかって
優先順位も何も、同じ名前でファイルとディレクトリは作れない。

i-mode用サイトでPCのアクセス不可にしてるとこがあるけど、
CGIでやる場合はHTTP_HOSTで振り分けるの？

いや、REMOTE_HOSTじゃないかに

REMOTE_HOSTかHTTP_USER_AGENTだね

書くところ間違えた（鬱）

掲示板のレス部分にタイトル変更機能が付いてない物を改造しているのですが、
親記事のタイトルが$subj、レスが$rsubjに格納しているとして
if ($subj) { $rsubj = "Re\: $subj"; }
print "\t<b><font color=\"#ff00ff\">$rsubj</font>

これでレス部分に「Re:(親タイトル)」表示が出来たのですが、
自分がレスフォームから書き込んだタイトルを反映させるにはどうすればいいでしょうか。
<input type="text" size="30" name="rsubj" value="Re: $subj">
このようにタグは書いています。

ソース無しにどう答えろと？

それからスクリプトの改造はこちら
http://pc.2ch.net/test/read.cgi/php/988808396/

正規表現ってなに？簡単に言えや

Regular Expressions

ここのスクリプトはどう？
2ch型なんだけど・・・。

2ch型マイナー掲示板「はにちゃんねる」
http://www.isn.ne.jp/~honey/hc/
アクセス数アップキャンペーン中、みんな紹介よろしこ。

htaccessって何て読むんですか？

>>77

ハイパーテキストアクセス

ht(tp)-accessと考えれば自ずと…。

Ｈな父さんがアクセス

ｴｯﾁﾃｨｰﾃｨｰﾋﾟｰﾃﾞｨｰｱｸｾｽｺﾝﾌｨｷﾞｭﾚｰｼｮﾝﾌｧｲﾙ

#!/usr/local/bin/perl

$rhost = $ENV{'REMOTE_HOST'};

print "Content-type: text/html\n\n";

print "<html><head><title>ENV REMOTE_HOST</title></head><body>\n";
print "あなたのリモートホストは、$rhostです。\n";
print "</body></html>\n";

あ、REMOTE_ADDRだと出来た。
なんでリモホはダメなのかなあ

なにがどうダメなの？
あなたの脳内を他人は読めないよ

>82-83
最近は使えないところが多いね。
何でダメかはサーバー会社にでも聞いたら？

>>82
gethostbyaddrとか使っても駄目かい？

>>84
アクセスしても、「あなたのリモートホストは、です。」
しか出てこない。

>>85
あっ。そうですか。リモートホスト取得
ってなんか鯖に不都合な事ってあるんですかね？

>>86
なにそれ

http://www.google.com/search?q=%8C%9F%8D%F5%83G%83%93%83W%83%93+%8Eg%82%A2%95%FB&hl=ja&btnG=Google+%8C%9F%8D%F5&lr=lang_ja

>>82

$host= $ENV{'REMOTE_ADDR'};
$host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $host;

>>82

if ($ENV{'REMOTE_HOST'} eq $ENV{'REMOTE_ADDR'} || !$ENV{'REMOTE_HOST'}) {
$ENV{'REMOTE_HOST'} = $ENV{'REMOTE_ADDR'} if (!$ENV{'REMOTE_HOST'});
$ENV{'REMOTE_HOST'} = gethostbyaddr(pack('C4',split(/\./,$ENV{'REMOTE_HOST'})),2) || $ENV{'REMOTE_ADDR'};

>>87
> ってなんか鯖に不都合な事ってあるんですかね？

いちいち要求がくるたびにリモートアドレスからホスト名をルックアップしていたら、
サーバーに多大な負荷がかかるから。
通常は必要時だけ(Perlのgethostbyaddr()等で)逆引きできるしてある。
それでもiswebみたいに逆引きできないところがあるけど。

×できるしてある。
○できるようにしてある。

this_is_query.cgi?message=%90%C0%82%C1%82%C4%83%88%83V%81I
とかってやつの ? 以降を URL エンコードするってよくいいますよね。
で、その URL エンコードってのには、& や = でバラしたりとかいう作業も
含まれているとは思うんですが、
単純に + を半角スペースにしたり %7e を ~ にしたりすることだけのことは
なんていうんでしょうか？
やっぱり URL エンコード？
それとも URI エスケープ？

url-decode

$host = gethostbyaddr(pack('C4',split(/\./,$ENV{'REMOTE_ADDR'})),2) || $ENV{'REMOTE_ADDR'};

>>66
>けど、webprog板だけ、何故かバナーと背景が見えないなあ。
>他の板は普通に見えるのに。
<img src="../
　　　　　~~~
が原因。
ディレクトリが1層下になるからね。
read.cgiもこれを利用して、
<a href=66>
見たいにできるの。

>>94

> で、その URL エンコードってのには、& や = でバラしたりとかいう作業も
> 含まれているとは思うんですが、

URLエンコードはURLに使用できない文字を暗号化すること。
ちなみにエンコード・デコードに分割は関係ない。

URI::Escapeは誤りってことなのか。

URLエンコードって、、、いや、デコードのまちがいっす、鬱。

>>98
ってことは、暗号化や復号化の処理自体がエンコードなりデコードってことで
いいってことなんですか、、、ありがとうございます。
いや、ちょっと気になったもので。
こういう「ちょっと気になる」ってのがいちばんイライラするんですよね。
とにかく、ありがと。

かなり初歩的な質問で申し訳ないですが
ＢＢＳやカウンターを取りつけるには
まずサーバーにページを借りてからするものでしょうか？

「取り付ける」が何を意味するかによる。
ページを借りるって言うのも意味がわからない。
もう少し詳細を書いてくれんと答えようがないYO!

もうちょっと詳しく言うと

ＢＢＳを借りてきて、実際使えるように設定するには
サーバーからＨＰスペースをもらってからでないと
ちゃんと設定できないのしょうか

>>103
別にスペースを借りてこなくても
自分のPCで疑似環境を構築してテストしてから借りればいいんじゃん？

perlでセッション管理をしたいんですが、定石だとhiddenで渡すと思いますが、
その場合、ページの切り替えのときは<a>タグじゃなくて<form>で
切り替えていかないといけないのでしょうか？
リンク先がたくさんあると<form>がその分多くなってしまう気が･･･
何か良い方法があれば、ご教授ください。

>103
レンタル掲示板やレンタルカウンタの事？
大方は前もって掲示板を借りてても問題は無いと思うけど。
必要な時は自分で設置するから借りた事は無いが、理論上は問題無い。
サービスによっては前もって把握したがるサービスもあるかもしれないけど。
せいぜい気にすべきは掲示板での戻り先くらいな物だろうけど、これは多分後で
設定できるだろうし。

…でもこの質問、少し板違いな気もするが。
Web製作の方がまだ良いかと思われ。

>>105
GETじゃダメなの？

GETにするならcookie使わないとね。
URIに埋め込むとreferer洩れした時にまずい。

リダイレクトすればいい

sunでcgiwrapが動いてるサーバがあります。
ここで使うスクリプトはeucコードじゃないとだめだっけ?
(設定によるのかな?)

文字ヴァケで悩みまくり・・・。

データをjcodeでsjisにして、保存して、見てみると文字ヴァケ・・・。
(htmlのmetaで文字コードは指定していません)
サーバの使いかた忘れちゃったよ。

>>110
何か勘違いしてないか？

勘違いしてますね。

全部sjisにしたら直りました(たぶん・・・)

新年オメデト、
なんか殺伐としてるからさぁ・・・。

あごめん、邪魔した？

VC++6.0でCGI作らなくちゃならないんですが、何か良い参考書ありますか？
本屋行っても全然ないんで困っちゃってます。誰か助けて。

1冊CGIの本買って読めばいい（つーかWebで十分だが）
あとはコマンドラインアプリ作ってhttpdと話すだけ
CGIよりhttpdの設定本の方が良いかもね

>>114,115
標準入出力でやりとりするだけだから易しいもんだよね。
わざわざVC++なんかで組むのが馬鹿らしいくらい。

>>115-116
ということは、先ずは最初に何か関連本を読んだほうが良いということですね。
早速、本屋に行ってみます。ありがとうございました。

ネットサーフィン中に、凄い人気掲示板、発見！！！

「はにちゃんねる」↓
http://www.isn.ne.jp/~honey/hc/

ネット内では、現在、この掲示板の話題で、持ちきりです。

CGIはインターフェイスをHTMLで作れるからいいよな。
コンソールアプリと同じような感覚で作れるし。

フォームメールのE-Mail入力チェックを外したいんだけど
やりかたがわかりません。
コメントアウトが#を加えるってことまでは自分で調べたのですが
いざ#を付けてみてもうまく動作しません。
だれか詳しい人教えてちょ〜


#------------------------------------

# 入力チェック

#------------------------------------

#お名前・onamae　に入力チェックをかけない場合はコメントアウトして下さい

if ($onamae eq "") {$errno=11;&error; }



#メールアドレス・emailに入力チェックをかけない場合はコメントアウトして下さい

if (!($email =~ /(.*)\@(.*)\.(.*)/)) { $errno=12;&error; }

if (!($email =~ /(.*)\@(.*)\.(.*)/)) { $errno=12;&error; }
↓
# if (!($email =~ /(.*)\@(.*)\.(.*)/)) { $errno=12;&error; }

で良いんじゃないのか？

にしても酷いスクリプトだな。マジックナンバーじゃなくて定数を使ってくれ…。

グループウェアっぽいものを作っているのですが、
ユーザがログアウトしたあとにブラウザで前のページに
戻れないようにするのってどうすればいいんでしょうか。
どなたか知っていたら教えてくださいm(__)m

http://www2.org1.com/~eiji/upload/uploader.cgi

ここのみたいに、JPGファイルをアップロードして、その画像ファイル一覧を
GIFの縮小画像でサムネイル一覧表示をするスクリプトを探しています。
アップロードされた画像を単純にHTMLのタグで縮小表示してるのはたくさん見つかったんですが
そうすると大量のサムネイル表示には重くて適していないもので。
「探しています」スレッドでは誰も応えてくれなかったので、ソースレベルでどのような
ことを行っているのかお聞きしたく書き込みました
宜しくお願いします

>>122
出来ません。

まあ、ユーザーが自分で明示的にログアウトした後なら、
セッション情報がサーバから消されている筈で、
恐らくユーザーが前のページに戻ったところで、
無効なセッションとしてエラー処理されるだろうから問題ないでしょう、きっと。

ﾌﾟ

CGI 使ってリモートブックマークみたいなのを作ってるんですが、
そこから飛ぶときに出来れば Referer を渡したくありません。

Location で飛んでも Referer 渡されちゃうし。
どうやったら Referer 渡さずに飛べるんでしょう？

早く教えてください！！！

早くしてください！！！！！

>>128
何を？

>>126
そのブックマークスクリプトを起動する際に
パスワード認証するようにして、
Refererを知って見に来た外部の人間には
見られないようにすればいいと思われ。

>>130
でも、それだと"登録してる"って事実は漏曳しちゃうわけですよね。
うーん....

>>123
自分で作るしかないようなきがするが
特にGIFの生成に関するのでフリーでというのは虫がよすぎる。
GIFの生成わりと簡単なのでネットで調べるとヨシ。

>>123
JPGの縮小画像じゃだめなん？

cgiをSSIで呼び出すときにクエリー文字以降のコマンドを実行したいのですが
どうすればよいのでしょうか?

具体的にはimgboard.cgiの2ページ目、3ページ目…を
2.shtml、3.shtml…として呼び出したいです。

1ページ目はimgboard.shtmlに
<!--#exec cgi="cgi-bin/imgboard.cgi"-->
と書いて正常に表示されます。

2ページ目は2.shtmlに
<!--#exec cgi="cgi-bin/imgboard.cgi?page=2"-->
としてみましたがエラーが出てしまいます。

>>134
2.shtml,3.shtml…それぞれに
<!--#exec cgi="cgi-bin/imgboard.cgi"-->
と書き、
imgboard.cgiの中で環境変数DOCUMENT_URIを調べて、
呼び出し元を判別すればよい。

フォームからの受け取り値が多くて、
未記入は漏れなく許さない形にすると、if文の荒しになります。

if( $hage eq "" ){
print "Content-type: text/html\n\n";
print "<html><head><title>未記入です。</title></head>\n";
print "<body>\n";
print "<p>未記入です。</p>\n";
print "</body></html>\n";
}
if( $aage eq "" ){
print "Content-type: text/html\n\n";
print "<html><head><title>未記入です。</title></head>\n";
print "<body>\n";
print "<p>未記入です。</p>\n";
print "</body></html>\n";
}
...

と延々書いていくしかないんですか。非効率的な気がします。

あと、とりあえずそれでもいいんですが、
この場合未記入でもその後の処理は続いちゃいますよね？
if内処理の中に__END__を入れればいいの？

if($hage eq "" || $aage eq "" ){
print "Content-type: text/html\n\n";
print "<html><head><title>未記入です。</title></head>\n";
print "<body>\n";
print "<p>未記入です。</p>\n";
print "</body></html>\n";
exit;
}

>>138
thx

&error("hageが未記入です") if $hage eq "";
&error("aageが未記入です") if $aage eq "";

sub error {
my $msg = shift;
print <<"_EOE_";
Content-type: text/html

<html><head><title>未記入です。</title></head>
<body>
<p>$msg</p>
</body></html>
_EOE_
exit;
}

>>136

require 'cgi-lib.pl';
&ReadParse;
foreach (values %in){
if(!$_){エラー処理;exit;}
}

>>131
redirect.cgiとかそういうのを作って、redirect.cgi?url=http://foo/bar/
として呼び出すと
<meta http-equiv="refresh" content="0;url=http://foo/bar/">
というHTMLを吐くようにする。
んで、ブックマークスクリプトで表示するリストではredirect.cgiを使うよう
にすればOK。

ありがとう。

下のような感じなのかな
www.users.yun.co.jp/~moriq/lang/cgi/tips.html

適当に改ページの処理らしき所に突っ込んでみたけど動作せず。
# ページを決める
$total_page=@PAGE_START;

if($FORM{'page'} > 0){
if($FORM{'page'} > $total_page){
$disp_page = $total_page;
}else{
$disp_page = $FORM{'page'};
}
}else{
$disp_page = 1;
}
$next_page = $disp_page + 1;
$pre_page = $disp_page - 1;

if ( $ENV{'DOCUMENT_URI'} ) {
$page_name = $ENV{'DOCUMENT_URI'};
}
else {
$page_name = $ENV{'PATH_INFO'};
}
if($pre_page > 0){

&output_kiji_html;

大本のCGI
www.big.or.jp/~talk/t-club/soft/mini_r6/imgboard122r6.zip

メールアドレスの形式を判定して
.comや.netや.orgや.to以外のドメインを弾く場合につかう
正規表現って？

.*@.*\.

この先がわかりません。

http://www.din.or.jp/~ohzaki/perl.htm#Mail
>>144
ここよく読んで拝借しなされ

>>145
そんなに難しいもんなの？

if ( ! $mail eq .*@.\.[com,net,org] ){
ふせー
}

とか出来ないの？！萎えるなあ。。

難しいと思うならよく読めよ
簡単と思うなら自分で考えろ、お前は自分で自分を簡単な事も考えられない
馬鹿だと言いたいのか？
実は正規表現知らんだけちゃうんかと

結局、perlってダサイのか

$mail_regex =
q{(?:[^(\040)<>@,;:".\\\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\\} .
q{\[\]\000-\037\x80-\xff])|"[^\\\\\x80-\xff\n\015"]*(?:\\\\[^\x80-\xff][} .
q{^\\\\\x80-\xff\n\015"]*)*")(?:\.(?:[^(\040)<>@,;:".\\\\\[\]\000-\037\x} .
q{80-\xff]+(?![^(\040)<>@,;:".\\\\\[\]\000-\037\x80-\xff])|"[^\\\\\x80-} .
q{\xff\n\015"]*(?:\\\\[^\x80-\xff][^\\\\\x80-\xff\n\015"]*)*"))*@(?:[^(} .
q{\040)<>@,;:".\\\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\\\[\]\0} .
q{00-\037\x80-\xff])|\[(?:[^\\\\\x80-\xff\n\015\[\]]|\\\\[^\x80-\xff])*} .
q{\])(?:\.(?:[^(\040)<>@,;:".\\\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,} .
q{;:".\\\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\\\x80-\xff\n\015\[\]]|\\\\[} .
q{^\x80-\xff])*\]))*};

if ($email !~ /^$mail_regex$/o) {
print "不正なメールアドレスです\n";
}

>>148
うんダサいね、少なくとも君の半分位はダサい

アンケートフォームを使っているのですが、直接CGIのアドレスを入力して
CGIを呼び出すと空白の結果が送られてきて困っています。
直接CGIを呼び出したときにエラーのHTMLを表示させるにはどう追加記述すればいいでしょうか。

if( $ENV{'REQUEST_METHOD'} eq "" ){

print "エラってる1\n";

}

if( $ENV{'REQUEST_METHOD'} eq "" ){

print "エラってる\n";
exit;

}


#これをスクリプトの上に置く

荒れてるなぁ・・・・
>>149　まぁそんな感じで
>>151
環境変数を適当にチェックするか、フィールドをif($IN{hoge} eq ''){error;
みたいに検査すれば良い、、、、
が！、そんな認識でsendmailをopenしてるなら厨房の餌食にされる可能性が
凄く高いから根本的に本でも読むことをお勧めする

>>149　それは違う　ｗ

>>152
スクリプトの一番上に追加したらいいのですか？
それでもまだ駄目なようですが。

そんな腐ったフォーム使うなよ　（´д｀；）
別のにしろ

>>157
なかなか良いのが無くて困っていたんです(;´Д`)

if ( ! ($ENV{'REQUEST_METHOD'} eq "POST") ){

print "Content-type: text/html\n\n";
print "<html><body>エラー</body></html>\n";

exit;

}

>>159
うまくいったようです。有り難う御座います。
あと送ってきたのホストを完全に取得する方法分かりますか？
今だったら、*.ocn.ne.jpのようにかなり曖昧なものなんです。

use POSIX 'strftime';
print strftime "%Y%m%d\n", localtime;
こうやると年月日が出ると思うんですが、
この数字に7を足すことってできます？

ほかの方法があればその方法もご教授頂けるとありが�dなんですが。

>>160
一概に言えない、改造したいなら改造スレへ

>>161
このスレッドも立てたの？　（呆
http://pc.2ch.net/test/read.cgi/php/1010092390/l50

自分で考えられないなら諦めなさい
1970年からインクリメントしてコンペアすれば良いけど
無茶苦茶負荷掛かるだろうね

ありがとうございます!!
スレッドは立てていないですけど助かってません!!
ほんと感謝してます♪

>>151
これだろ
www2q.biglobe.ne.jp/~terra/cgi/webhandler.htm

前にサポート掲示板に同じようなこと書き込んだら
「cgiには直接アクセスするような用途は想定していませんとか言いやがった。

こりゃ駄目だと思って自分で改造したけどね。

>>163　お前は何をしてるんだ?　笑
>>162も言ってるが、最もプリミティブなやり方ならフィールドを
分割した後ツェラーの公式で通算秒に直してやればいい
CPAN漁れば絶対有りそうだが、自分で書いても手間は掛からんだろ
ここは人が少ないんだから、次からはじっくり待つ方が良いぞ

KENTのPetitBoardに新記事のマークを付けるにはどうしたらようのでしょうか？？？

↑何でマルチすんだよ糞ガキ消えろ

うるせぇ俺は20歳だ。そんだけ気になっとんだ。

そんな事より即効で文句言うてめぇの方がガキだ。

じゃ教えるから消えてくれ
PETITのログには投稿日時が入ってるが変に整形されてしまっている。
だからログに細工して <>1000000000の 様なデータを追記して
書き出し時に比較するか、
元から入ってる、日本語表記の時刻から1970年からの秒数を割り出して
比較すればいい

フォームを使って英数字や記号以外の物は弾きたいんですが、
(日本語やら記号やら全角は弾きたい)どう書くんでしょう。

$date =~ /[a-zA-Z]/

をifで使うと英数字がとりあえず入ってればよくなりますよね。
とにかく「全角物は排除」したいんですが。。。

修正

(日本語やら記号やら全角は弾きたい)
↓
(日本語やら全角記号やら全角は弾きたい)

$date!~/[^\w\dその他の記号]/

>>173
すいません、むちゃくちゃ簡単な花氏でした。。
特殊文字を忘れてた。

あ、間違えた（笑)

$name =~ /[\Wその他の記号]/

でいいと思われ

あ、よくなかった

#date =~ /[^\wその他記号]/

だな

# -> $

sub html {

print <<EOE;
Content-type: text/html

<html lang="ja">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=euc-jp">
</head>
<body>
<p>あほ</p>
</body>
</html>

EOE

return();

}

↑htmlを関数を作っておいて楽にしたいんだけど、
{}の中にタブを入れるとエラーになる。。。

print <<
ってタブいれらんないの？

いれらんねーとソースが見にくいんだよー

EOEの前にタブを入れたのかな？
ヒアドキュメントの最後の文字（この場合EOE）の前には入れられないよ。

>>182
どうもありがとうです。

kentwebのアクセス解析をつかっています。
これのＯＳ判別にWinXPがないんですが、
簡単に追加とかってできますか？

Web制作の初心者スレッドでこちらに誘導されました。

よろしくおねがします。

ちょっと調べてくるから待ってろ。

>>185
えらーい！

<Lesson1>
まずreport.cgiから以下の一行を探す。
elsif ($agent2 =~ /Wind?o?w?s? ?NT ?5/i) { $os = 'Win2000'; }
<Lesson2>
そしてこれをコピペで書き変える。
この行はWin2000の上にXPが無いと、XPも2000で
ヒットしてしまうから注意してくれ。
elsif ($agent2 =~ /Wind?o?w?s? ?NT ?5.1/i) { $os = 'WinXP'; }
elsif ($agent2 =~ /Wind?o?w?s? ?NT ?5/i) { $os = 'Win2000'; }

◆8WZMxnc2さん、ありがとうございます。
さっそく、そのように直してみました。
WinXPの人がくるのを楽しみにしときます。

ありがとうございました。

/Wind?o?w?s? ?5/ なんで /Win(dows)? ?5/
としないのか小一時間(以下略

>>187
5.1じゃなくて 5\.1 だっぺよぉ。

セミコロン　；　ってどういう基準でどこにつけるの？？

なんか本には基本すぎるせいか書いてない・・・鬱だ・・・

基準?
; を書きたい所でLの右隣のkeyを押せばいいんだよ

いや、文末に必ずつけなきゃいけないの？？
命令の終わりにつけるとか？

つーか言語何よ？
取り合えず文の終りに付けとけ
ついでにその本捨ててまともな本買え

>>190
rubyには特に;は必要ありません。
だから本にも書いてないのでしょう。

>>194
MS-DOSバッチファイルでは;は必要ありません。
だから本にも書いていないのでしょう。

>193 194 195
すいませんperlです、InlineCの中にInlineAssemblerで書いています
それでは　是非回答願います

http://tohoho.wakusei.ne.jp/
ここでPerlのところを読むといいよ。
下手な本よりよっぽどマシ。

えーとプレゼントキャンペーンの集計を1週間に1回やってます。
だんだんデータが重くなり、Excelにコピペするのもかなり大変。
で、1週間毎のデータになるよう、ある時間できって、前の週の
データを全部削除してお尻（後ろのカラム）のデータの並びが
時々おかしくなってるんで、それを直してると4時間はかかり
ます。普通はどんなやり方をやってるんでしょ？VBA?Perlで
スクリプト？なんかいいスクリプトの場所キボーン。

>>198
まず、落ち着いて日本語を書こう。
Perlなら楽だよ。

アンケートのデータを顧客データを1週間に1回集計。
ブラウザ上に表示されたものをコピペでエクセルに貼付ける。
（しかし、2000件を超えたあたりからCtrl+Aでブラウザ上の
テキストを全て選択すると砂時計が回ったままになる、）
この時前の週のデータは全て削除し、今週のデータだけにします。
あと、しかるべきカラムにないデータを移動。
これが1万件ぐらいあると、スクロールして全部見るだけで、とても
時間がかかる、どうしよう？というのが質問の主旨です。

>>200
書き込む前に読み返してる？伝わりにくいったらありゃしない。
で、質問が漠然とし過ぎてる。
顧客からどういうデータを取って、どういう集計をして
最終的にどういうデータを得たいのかをはっきりさせて、
今はどうしてるのかを書かないと誰も答えられないよ。

並びがおかしくならないまともな集計スクリプト書いて、
エクセルファイルで出力したら？としか言えない感じ。

＞＞２００
＞ブラウザ上に表示されたものをコピペでエクセルに貼付ける。
＞（しかし、2000件を超えたあたりからCtrl+Aでブラウザ上の
＞テキストを全て選択すると砂時計が回ったままになる、）

ＩＥだったら、「名前を付けて保存」っていうのがあるはず。
テキスト形式で一度それを保存して、そいつをＥｘｃｅｌで開くように
したら？

つーかＣＧＩの問題ですかこれ？

初めからcsvかxsl吐けば良いかと
IEか固まるのは多分CGIではどうしようも無ぃ

集計機能付きアンケートフォームみたいなスクリプトって
ひどく一般的な気がするんです。
あちこちにあると思います。それこそ。
ただ、それつかってどういうことがやりたいのかとか、
どういう集計をしないといけないので手作業してて、４時間もかかるのか
とか、いろいろ具体的に書けば書くほど、アドバイスをもらいやすくなるんでしょうね。

こういう集計とかって、Perlの得意分野なので、内容次第では、
ここですごいアドバイスがもらえると思いますよ(笑)

画像のみをアップロードできるＣＧＩを探しています。
みんなが投稿できるようなタイプのものです。
そういったＣＧＩを提供しているところご存知ありませんか？

>>205
ttp://www2.inforyoma.or.jp/~tokaji/cgitech/upload.htm

2chみたいなスレッドフロート式掲示板作ってるんですが、
同じリモートホストからスレ立て制限する方法ってありますか？

>207
スレ立て時にリモホを記録して、一定回数以上のリモホを弾く。

>>208
ありがとうございます。
あとは自力でなんとかしてみます。

添付ファイルを送るプログラムで参考になる物（サイト）ありますか？

あ、ローカルファイルの参照ではなくサーバー上とか
CGIと同じディレクトリにあるファイルを送りたいのです。

CGI.pm

>>210
とりあえず、これでも読んどけ。
ttp://www.hypermail.org/rfcs/rfc2112.html

>>213
その手のRFCの日本語訳しているページってどこでしたっけ？

>>142
その方法でも、redirect.cgi が Referer として渡されちゃいますよね。
redirect.cgi がもっと広範囲で使われてるならいいんですが、
そのブックマーク用スクリプトからしか呼ばれないのなら
結局同じような気がします。
(redirect.cgi から来た → ブックマークされとる)

>>215 本当に試してみたの？

>>216
あひっ、試したら Referer 渡されてませんでした。
試しもしないで偉そうなこといってごめんなさーい。
ありがとうでした。

phpとかperlからメール送るとき、
errry-to やreply-to って、つけるべきなんでしょうか？
Fromだけで十分ではないんでしょうか？

s/errry-to/Errors-To/ として答えます。

Errors-To: は非標準フィールドなので、つけても無意味です。内部的にこの
フィールドを利用してエラーメール返送する MTA がありますが、それを期待
するべきではありません。(これは UUCP 時代の名残です。)

Reply-To: は、返信先を指定したいような事情があるときにつけます。MTA は
通常これを参照しません。これを参照するMTAは腐っています。

必要であれば、エンベロープ送信者も指定します。エラーメールはこのアドレ
スに返送されます。(sendmail の -f オプション)

MTA = Mail (Message) Transfer Agent

# From: とエンベロープ送信者、To:, Cc: とエンベロープ受信者は別物です。念のため。

文字（日本語）のデコードにjcode.plをつかってるんだが、
半角のみ（ｺﾞﾙｧとか）でデコードすると、文字化けして転送されてしまいます。
コードは'sjis'で設定してるんですが、ほかに何か割るいとこがあるんですか？
おまえら押しえてください。

元コード種の自動判別に失敗してるので手動で指定する。

そもそも「半角」を使うのがダメ。
(「半角」が混じると、EUC-JP と Shift_JIS の判定が困難になる。)

# ここで、「半角」= JISX0201 Kana

超初歩的な質問で申し訳ないんですが
あるファイル(10行のファイル）をOpen読み込んでたとえば5行目とかを消すもしくは置き換えるのにはどうしたらよろしいでしょうか？
お教えください

>>223
Perlかな?　一番簡単な方法、たぶん。

# ファイル(hoge.txt)を開いて配列に突っ込みます
open FH,"+< hoge.txt" or die $!;
@lines = <FH>;

# 5行目をあぼ〜んする場合です
splice @lines,4,1;

# 5行目を置き換える場合です
$lines[4] =~ s/NO/YES/;

# 書き戻します
truncate FH,0; seek FH,0,0;
print FH @lines; close FH;
exit;

>>223
DB_FileのDB_RECNOを使う

use DB_File;
use Fcntl qw(:flock);

my $db = tie @lines, DB_File => 'hoge.txt', O_RDWR | O_CREAT, 0666, $DB_RECNO or die $!;

# ロックする場合
open DBF, '+<&=' . $db->fd or die $!;
flock DBF, LOCK_EX or die $!;
undef $db;


# 5行目をあぼ〜ん　(spliceは実装されてない？)
delete $lines[4];

# 5行目を置き換える
$lines[4] =~ s/NO/YES/;

untie @lines;

>>224,225
親切にありがとうございました。
しかし我ながら223のようなわかりにくい文章書いてるな。
あーはずかし！

>>225
しつもんです。
lines[4] =~ s/NO/YES/; だと、5行目のNOのところだけYesに置きかわるんじゃないですか？

>>227
そうだね。

DB_Fileってベタファイルにも使えるのかぁ･･････ふむふむ
>227
lines[4] = "新しく挿入したい文字列";
だよ。
後は検索しよー

cookieについて質問です。
cookieを１回の表示で２つ保存期間の違うものを保存したいのですが、
どのようにすればよいのでしょうか？

以下のようにすると、同じファイルに保存されます。

<META HTTP-EQUIV=Set-Cookie CONTENT=cgi_cookie=$c_value;expires=$del_date>
<META HTTP-EQUIV=Set-Cookie CONTENT=lim_cookie=$c_u_value;expires=$del_date_u>

教えてください。

名前で区別したら別々に取得できるんじゃないの？

>>231
名前を変える方法を教えていただけませんか？

>>232
>>231じゃないが、取得するときに（どうやってるかしらんが、ハッシュ？）
そのメタタグに書いてある名前で判断すればよいということじゃないの？

初心者の質問ですみません。
掲示板の名前欄で、デフォルトで最初から任意の文字を入れておくには
どうしたらいいんですか？
例えば名無しさんと最初から名前欄に入れておきたい場合、
$name = $FORM{'name'};
となってるのを下のものに変えるだけじゃだめなんですか？
$name = $FORM{'name'} ||= "名無しさん";

これだとダメだったので、他に変える部分が必要なんでしょうか？

$name = $FORM{'name'} || "名無しさん";

||= じゃなく ||

アクセス解析のＣＧＩを入れたいのですが
そういうのって、サーバに負担がかかりやすいものなのでしょうか？
うちは、ＢＢＳを５つにチャットを２つ（全部さびれててますが）
カウンタも自分でＣＧＩを探してきて用意してるので
負担をかけすぎて迷惑にならないか、心配です。

>236
アクセス解析は，呼び出される度に書き込むBBS みたいなものだから
ログサイズとアクセス数によりけり

>>235
ありがとうございます。
それでやってみましたが、名無しさんと入らなくて空白のままでした。
どうしてだろう…

>234-235,>238
ローカルでテストしたら両方とも成功しました。
Perlのバージョンが古いとかはありませんか？
Perl4だとエラーが出たような。

２ちゃんねるそっくりな掲示板をＮＴで構築したいと考えています
ＮＴにはわからないなりにもAnHTTPDとPerl for Win32を
いれて動かそうと考えています
２ちゃんねるそっくりな掲示板ソフトというのはあるのでしょうか？
教えてください

>240
http://pc.2ch.net/test/read.cgi/php/1003132904/
スレタイトル読みましょう。

>>13さんのようにダイヤログを表示させてそこにファイルをいれたいんですが
まったくもってよくわかりません。

use CGI;

$query = new CGI;
print $query->header(-type=>"application/octet-stream", -attachment=>'data.txt');
$filename = $query->param('attachment');

open OUT,">>data.txt" or die "OUT miss\n";
print OUT @hoge;
close OUT;

こんな感じかと思ったんですができません。

>>242
>>13 はダウンロードの話じゃない？

ああごめん，アップロードしたいのかと読んじゃった。
ファイル開かずにそのまま print @hoge; とかでいけない？

>>243-244様
おお、なるほど。できました。ありがとうございます。
4時間ほど悩んでおりました；

しかしダウンロードするファイル名がＣＧＩの名前（これはtest.cgiでやってるの
でtest.cgiという名前）になってしまうんですよねぇ（＾＾；
もうしばらく格闘してみます。

感謝

CGIの中にHTMLを組み込む（表現おかしいかも・・・）
時って　１　のような感じになりますよね。

<font size=\"3pt\" color=\"$color1\">　　←１とする。
<font size="3pt" color="$color1">　　　　←２とする。

１　のようにしたときと　２　のようにしたときでは表示が違うのですが・・・。（文字の大きさ）
２　のような感じで表示したいのですが・・・インターネットサーバーエラーがでてしまいます・・。
どうにかできないでしょうか？

print "<font size=\"3pt\" color=\"$color1\">"; ←<font size="3pt" color="$color1の内容">
print '<font size="3pt" color="$color1">"; ←<font size="3pt" color="$color1">

言いたいことがよくわからん
つか3ptなんて記述は間違ってるぞ

print qq(<font size="3pt" color="$color1">);
"の中には"を使えないのは知ってるかな？

ちなみに3ptってのはスタイルシートで使う単位だから
そのままでは使えないよ。

重箱の隅をつつきにきました。

>>234, >>235
||= でも、$name = ($FORM{'name'} ||= "名無しさん");と解釈されるので特
に問題はないかも。この場合、$FORM{name} が偽の場合、$name, $FORM{name}
が「名無しさん」になります。

あと、$FORM{name} が偽、すなわち $FORM{name} == 0 の場合でも「名無しさん」
になっちゃうので注意。"" と比較するのが吉かもしれず。

んじゃ
$name = ($FORM{name} eq "") ? "名無しさん" : $FORM{name};

あと、ptは正しい単位じゃないのでpxで指定しよう。fontタグに
style="text-size: 9px"とか埋めればよし。
だいいち、3ptってPCじゃフォントがつぶれて読めないが・・・

それに元々qqいらないな、この場合

<font size=3 color=$color1>でいいんじゃ？

>>251
ハァ?
http://www.w3.org/TR/REC-CSS2/syndata.html#length-units

質問です。

dateという名前の配列があり、$date{'check1'}、$date{'check2'という風に
数が上がっていきます。
forループで i の値を１からインクリメントし、その i の値を使って配列中
の全ての要素に同じ事を実行する際に

$date{'check$i'}

みたいなことはどのようにすればよいのでしょうか？

>>253
%date = (check1 => one, check => two);
として，
素直にやるなら
for (my $i=1; $i<=2; $i++){
　print $hash{"hoge$i"};
}
とかやる。

だけど，これだとハッシュ使う意味が無い。
@date_checkとかの配列使うほうがいいのでわ。

>>254
ありがとうございました。
@date_checkでやります。

Yomi-search ver4.19なんですが、
ランキングとかをＳＳＩで１部だけ表示することは可能らしいんですが、
初心者なのでどう記載すればいいかわかりません。

どなたかご教授ください。

板ちがいでした。すいません。

質問させて下さい。

掲示板CGIで、ここ2Chのように半角カタカナを表示できるようにしたいのですが
（例）　(ﾜﾗ　　(ﾊﾞｸ　　　など
どこをイジればよいのかわかりません。
具体的にはKENTさんのhoneyboardを改造したいのですが・・・。

http://members.tripod.co.jp/pokochin_denpato/honey.txt

それともjcode.plの方をイジるのでしょうか？
どうかお力をお貸し下さい。宜しくお願いいたします。

漏れの場合は、フォームデータをコンバートするとこで、

$gCode = jcode'getcode(*value);
jcode'convert(*value,$gCode);

とやってる。一応うまく逝ってるが。
*valueは変換する文字列データが入った$valueのグロブ。

>>258ね

259さん、御回答ありがとうございます！
えっと、これはCGI本体の中を書き換えるんですよね？
デコード処理のところで

# S-JISコード変換
&jcode'convert(*value, "sjis", "", "z");

# タグ処理
if ($tagkey) { $value =~ s/<>/<>/g; }
else {
$value =~ s/\&/&/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
}

というのを見つけたんですが、ここで良いのでしょうか？

それでいいと思う。

>>262
ありがとうございます。挑戦してみます。

すみません。教えて下さい。

CGIから、sendmailを使って、メールを送ろうとしているのですが、
他のCGIをマネて、

if (open(MAIL,"| $sendmailpath $mailaddress")) {
print MAIL "To: $mailaddress\n";
print MAIL "From: $mailfrom\n";
print MAIL "Subject: $subject\n";
print MAIL "MIME-Version: 1.0\n";
print MAIL "Content-type: text/plain; charset=ISO-2022-JP\n";
print MAIL "Content-Transfer-Encoding: 7bit\n";
print MAIL "X-Mailer: $mailer\n\n";
（中略）
close(MAIL);
}

このように書いたのですが、
メールヘッダの部分が、ちゃんと受け取れる（Subject等がちゃんと反映される）宛先と、
ちゃんと受け取れずに、Subjectとかが本文に含まれちゃう宛先があります。

ちゃんと全てのメールアドレスのヘッダに反映されるようにするには、
どのような書き方をしたらいいのでしょうか？

それとも・・・メールサーバ側の問題なのでしょうか？

改行をチェックしろ。

$mailaddress =~ tr/\r\n//d;

というか、$mailaddress のチェックはキチンとしているの?
$mailaddress = "|rm -rf ~" とかやられたりすると危険だよ。

> 264

CGIからのメールは送信元と送信先が固定の場合のみ利用するのがおすすめです。

メールは必ずJISコードに変換しましょう。

件名(Subject)および送信元(From)が日本語を使用する可能性がある場合はbase64エンコードを施しましょう。

すいません、少し前にマルチバイトを含む文字列を一文字ずつ扱う方法を書いてた方がいらっしゃったはずなんですが、
そのログがさっきから見つかりません。どなたか覚えてる方いませんか？
こんな↓感じの奴です。

$str = "ABCDEFGあいうえお";
for ($i = 0; $i < length($str); $i++) {
$c = substr($str, $i, 1);
if ($c =~ /[\x80-\xff]/) {
$c = substr($str, $i++, 2);
}
print "[$c] ";
}

これをShift-JIS等にも対応させてた気がするんですが…

マジレスしておくと、入力と出力はSJISでいいから、
内部で扱うときはEUCにしておいた方が何かと楽だと思うがどうよ？

外部から受け取ったデータを一旦EUCに換えて、出力時にSJISに戻すということでしょうか？

>>270
スクリプト自体は多分EUCだからそうしたほうがいいような
IISだったら話はべつだけど

CGIのなかで取得できる環境変数のなかで、以下のものは
クライアント（あるいはPROXY）に書き換えられるような恐れは
ないのでしょうか？

REMOTE_ADDR
REMOTE_PORT

REMOTE_ADDR, REMOTE_PORT 共に PROXYのものになります。

すいません。「PROXYのものになります。 」っていうのが
仮に PROXYから
REMOTE_ADDR=127.0.0.1
などと逝ってきたばあいに、サーバがその変数を信用してしまう
のか、それともPROXYとの接続結果からサーバが
REMOTE_ADDR を計算するのか、どちらなんでしょうか、　という
ことなんですけど セキュリティ板の方がいいですかね？

http://www.cj-c.com/cgi_s/access.htm
これについて質問があります。

http://www.japandeep.com/
収録したRefererを↑のように表示したいのですが
どういうタグを付ければいいのですか？
SSIで表示させてるみたいなんですが。

>>274
プロキシが言ってくるとかじゃなく、プロキシのIPアドレスになります。
変更はされません。

今度、自分のＨＰにＦＬＡＳＨによりつくられているＢＢＳを
設置しようと思ってるんですけど、そういうのって
鯖への負担は普通のＢＢＳと一緒なのでしょうか？

あんまりプロバの鯖に負担をかけなくないので気になってしまいました。

>>277
借りてるサーバだったら、文句いってくるレベルが迷惑なレベル。
正直、サーバのCPUとかメモリとかOSのカスタマイズによって
全然違うから一概にはいえない。

. ∧　　 ∧
(　´ ・∀・｀)　へー

>>276
THX
とりあえず信用置ける値であるということですね。

投票用のスクリプトを作ってるんですが
重複を防ぐためクッキーを発行するんですが
クッキーを入れていないと投票できないようにしようと思い

if(!$ENV{'HTTP_COOKIE'}){&err('クッキーをオンにしてください')}

みたいにしたんですがクッキーをONにしててもこのエラーが起こるらしいです
どうすればよろしいんでしょうか?

>>281
HTTP_COOKIEはすでに保存されているものが入ってるんじゃ？
一度クッキーを保存するまではヌルなので、エラーが出ると思いますが。

で、クキーオンオフの調べ方ですが、
いい方法かわかんないけど、一度保存して読み出してヌルだったらクキーオフ
ってことでいいんじゃないかな？

PerlのCGIでクライアントから送られてきたHTTPヘッダフィールドを参照する方法ってあります？

>>283
HTTPヘッダのどの情報が欲しいわけ？

＞284
J-PHONEの携帯の位置情報が
x-jphone-geocode
っつーヘッダで送られてくるそうなんですが

>>285
よくわからん。それの情報ソースある？
（JPHONEのページ調べてみたが乗ってなかったんで）

> 283

HTTPプロトコルで送信された以上、Webサーバがまずレスポンスを受けて解釈されるからHTTPヘッダそのものを?Q照するのはできない相談でゲスねー。

まあ幾つかは環境変数%ENVにセットされるけどねー。

取り敢えず環境変数をすべて出力してみて”J-PHONEの携帯の位置情報”を示すものがあるかどうか確認してみ?驍ｵかないねー。

おうちのあぱっちで試したら、J-Phone の拡張したやつは
HTTP_X_JPHONE_* って環境変数で渡されてるね。
というか、ヘッダはHTTP_* って形で全部渡される仕様なのかな。

Hoge: hage!
Huga: huga-

ってかんじのヘッダ付けたら、きちんと HTTP_HOGE、HTTP_HUGA って環境変数
に入ってくれたよ。

. ∧　　 ∧
(　´ ・∀・｀)　へー

っつーことは
$ENV{HTTP_X_JPHONE_GEOCODE}
で取り出せるんですかねぇ。
一番最初にやってみたんですけど駄目でした。
もうちょっと頑張ってみます。
ソース
ttp://www.dp.j-phone.com/ichi.html
4M弱のPDFの中にしか書いてなかった...

>>290

#!/path-to-perl/perl

print <<HEADER;
Content-type: text/html

<html>
<head>
<title>Environment list</title>
</head>
<body>
<dl>
HEADER

print "<dt>$key</dt><dd>$value</dd>\n" while ( $key, $value ) =each( %ENV );

print <<FOOTER;
</dl>
</body>
</html>
FOOTER

これやって、とりあえず環境変数のリスト出してみるとか。

対応機種じゃないやつで試してるとか....

◎●モー娘。＆あゆのお宝画像満載！！◎●
http://www.media-0.com/www/otakara/otakara.html

◎●今なら２日間無料で某女子高校のトイレをのぞける！お早めに！◎●
http://www.media-0.com/www/otakara/nozoke.html

大金持ちになれる方法を教えます！！！

下記のホームページを観て下さい↓
http://www.guruguru.net/auction/selleritem.php3?list=10&userid=17721

宜しくお願い致します。

短文で恐縮ですが、CGIでクライアントの
MACアドレスって取得できるんでしょうか？

ここで聞くのが正しいのか自信がないのですが。

ホスト上に保存された漢字を含むファイルの、漢字コードを調べたい
と思います。

単純に、ホスト上のファイルがどのコードを使っているか知りたいだけ
なので、ファイルをダウンロードしてそのファイルを開くだけで
どのコードか表示してくれるようなソフトはないでしょうか？

Vectorでざっと見たところ「漢字コードを変換してくれる」ソフトは
見つかるのですが、単純に「判断してくれる」ソフトが見当たらない
のです。

どうか、ご教授お願いします。

または、Telnet上でやれる裏技がありましたら教えてください。

よく考えたら、Web製作板の方がよかったかな？

CGIで、漢字が化けるという問題について必要に駆られたと
いうことで、どうかひとつお許しください。

>>295
まったくもって板違い。Web板でもない。ソフトウェア板でしょ。
http://ash.or.jp/ash/src/code/

初心者なんですが教えてください。
if ($r9 eq "$street")
って$r9が$streetと同じと気ってことですよね？
もしこれを$streetの文字列の中に$r9の文字列が含まれているときに・・・っていう場合にはどうすればいいでしょうか？
$streetにはスペース区切りで複数の言葉を入力するようにしているのでその中のひとつが一致した場合に・・・というようにしたいです。
宜しくお願いします。

>298
そこまで勉強できたんなら、その後も自分で勉強できるよな？
http://tohoho.wakusei.ne.jp/
http://tohoho.wakusei.ne.jp/wwwperl1.htm#Expr
がんばれ。

ありがとう。おかげさまでなんとかできそうです。
頑張ってみます。

>>294
無理。

>293
大金持ちになれるＣＧＩ？？

ＬＷＰってＢＩＧＬＯＢＥとかでも使えるんでしょうか？
ＬＷＰの使い方みたいなサイトは沢山見つけたんですけど
それ以前にＤＬしてきたモジュールを何処に置いたら良いのかとかの
初歩的な事が散々悩んだんですが解りません、どなたか教えてください。

今やりたい事はＣＧＩを設置するアドレスと全く違うアドレスから
ファイルの更新日時を拾うという作業です

もし詳しく説明しているサイトとかあれば
何とか頑張ってみますのでURL教えてください。

>>303
LWPがBIGLOBEで使えるかなんてBIGLOBEに聞けばぁ？
なつみかんとか、更新チェッカーのCGIを参考にすれ

はじめまして、しゅっとといいます。
Perl超初心者です。下記のソースを実行しても
jpeg画像がブラウザに表示できないです。
Hello cgi world 「×」と表示されてしまいます。
どこがおかしいのか分からず悩んでいます。よろしくお願いします。
#!/usr/bin/perl
print "Content-type: text/html";
print "<html>";
print "Hello cgi world.";
print "<IMG src=test.jpeg>";
print "</html>";

>303
コンパイルが必要なモジュールは、使えないことの方が多いよ。
コンパイルが必要ないモジュールは（含む、LWPの古い奴とか）、
カレントディレクトリに置いてあれば使えるよ。

>305
jpeg画像の拡張子がjpgになってないか、JPGになってないかJPEGになってないかとか調べる。

>305
あと、
print "Content-type: text/html\n";
のほうがいいかも。

print "Content-type: text/html\n\n";

>309
ありがとうございます。
しかしながら、出来なかったです。
jpegファイルは、cgiファイルと同じディレクトリにあります。
print "Content-type: image/jpeg\n\n";としましたけど、
駄目でした。。。う〜ん。。。

>310
そのディレクトリに以下の内容のHTMLファイルを置いて表示してみましょう。
↓↓ここから↓↓
<html>
Hello cgi world.
<IMG src=test.jpeg>
</html>
↑↑ここまで↑↑
CGIの責任には思えないよ。

あ、一つ思い付いた。

そのCGIをまさか、Webサーバー上で試してないよね？
プロバイダのスペースや無料スペースで試してないだろうね？
場所によっては、CGIの動くフォルダで画像とか開けない事もあったはず。
jpegファイルを直URLで確認したり、>311で言ったように
HTMLだけで表示してみたりしてみそ。

つーか、CGIのテストはローカルでやりましょう。
http://tohoho.wakusei.ne.jp/wwwcgi6.htm

>312さん
htmlファイルを置いて表示したところ、以下のエラーログが出ました。
[Thu Jan 17 18:10:07 2002] [error] (8)Exec format error: exec of /usr/local/www/cgi-bin/test.html
failed
[Thu Jan 17 18:10:07 2002] [error] Premature end of script headers: /usr/local/www/cgi
-bin/test.html
現在は、ローカルで行なっています。
また、/usr/local/htdocs/test.htmlは上手く表示されましたが、
/usr/local/cgi-bin/test.htmlは駄目でした。
それぞれのディレクトリにtest.jpegを置いています。

ＣＧＩの負荷を自分のＰＣ（ウィンドウズ９８）で
調べる方法とかないでしょうか？
アップロードする前に、使うＣＧＩが同程度の負荷なのか
知りたいのですが・・・。

>313
それじゃあ、そのサーバーではcgi-bin内ではCGI以外は使えない。
別のフォルダに画像を置いて、そこへのリンクを貼るのがいいよ。

>314
名無しさん＠お腹いっぱいさん何度もありがとうございます。
CGIの負荷とは。。。意味がわからないです。
あかん。。。ううう。。。

>>316のしゅっとさん
>>314はあなた宛てのレスではないと思われ。
あと、「名無しさん＠お腹いっぱい。」さんは
ひとりの人物ではないよ。
くわしーことは
「同じ名前の人がたくさん投稿してるけど誰？」
http://www.2ch.net/guide/faq.html#C6
を参照。

はじめまして。
複数の検索サイトをプルダウンで選べて、
その選んだ検索サイトから検索できる検索エンジンで、
フリーのプログラムやソースを公開してる所とかありますか？
イメージ的には、ISIZEのやつが良いのですが。。。
知ってる方がいらっしゃれば、教えてください。
よろしくお願いします。

>318
とりあえず↓ここで。
http://pc.2ch.net/test/read.cgi/php/1003132904/

http://wow.bbspink.com/test/read.cgi/girls/1011104643/
このスレッドの３番目のサイトいってみたんだけど、
こういうＣＧＩってどっかで配付してません？
「自分で書けや！」ってのはやめてね。書く能力ないから。

>320
君も↓ここ。
http://pc.2ch.net/test/read.cgi?bbs=php&key=1003132904

質問お願いします。
サーバにtmpフォルダを作ってログを書き込もうと思ったんですが
相対パスでフォルダを指定するとうまくいくのに絶対パスで
指定するとうまくログを書き込めません。　なぜでしょうか？
違うサーバーのフォルダにも書き込みたいので、
是非とも絶対パスで書き込めるようにしたいのですが・・・

すみません、チョト質問いいですか。
i-mode端末ってHTTP_REFERER吐かないんですか？
アクセスログ記録CGI作ってたんですが、i-modeだとREFERERが記録されてないみたいで…
端末の機種によるんですかね？？

>>322
違うサーバーのディレクトリには書き込めないと思われ。
自サーバーの自ディレクトリ内（自分のFTP認証で読み書きできる範囲内（？））ならば
絶対パスでも書き込めるハズ。。。（たぶん）

cgi-binフォルダにHTML形式のファイルを置いたら
500のエラーになります。
なにか原因があるのでしょうか？

どなたか知っておられる方がおられましたら、
ご教授ください。

>325
.htaccessとか。
サーバーの設定でしょ。

考えられる要因
cgi-bin下にはcgiしか置けなくなっている。
解決方法
貴方の借りているサーバーのFAQを読むこと。

単なる興味なんですけど、
今って、ＩＳＰやレンタルサーバでもとから入ってるperlって、
mod perlなんでしょうか？

>>327
>>326
レスありがとうございます。
原因はcgi-bin以下にはcgiしか置けませんでした。

感謝です！

>>323
はかないらしい。

>>328
それは各社によって違うからなんとも言えない。
mod perlは今でもまず無いと思われ。

>>323
はかないから２ちゃんも書き込めなくなったのよ。
有料化とは何か関係あるのかな・・・？

あ、ケータイから書き込めなくなったってことね。
回避方法あったり、書き込める板があったりするけど。

>>330
>>332
>>333
サンクス。
２ちゃんがi-modeから書き込めないのってリファラーのせいだったんだ…。
ブラウザ情報のせいかとおもてたよ
しかしリファラー吐かないのはi-modeの仕様？ですかね？？
困ったもんだ…。

read.cgiのソースってどっかないの？

>335
どっかにあるよ。この板ではない板のどっかに。

4ヶ月ほど遡ればごろごろと。

http://www.gedoh.org/aki/2ch/current/bbs/

情報サンクス
ウニクス板の人らの戦いの後を
ユクリと楽しみまくります

Perlなんですが
ひとつのスクリプトの中に
大本スクリプト(処理１：処理２：処理３)
があって、処理３は滅多に使わない場合
Aスクリプト(処理１：処理２)
Bスクリプト(処理３)
という風に分けたほうが処理的に軽くなるんでしょうか？
サーバ全体の負荷は多少軽くなるのではと予想してますが
Aスクリプトのみで考えてどうなんでしょうか。

>>340
独立した処理だったら、そりゃ分けたほうがいいでしょう。
A から B を使うんだとしたら、別の問題。

AutoLoader とか AutoSplit なんか見てみては？

レスありがとうございます。

Perlはインタプリタだから
実行する以外の処理があっても
それはそれなりにメモリを食う
という解釈でいいんでしょうか？

ってことは処理をライブラリ化しておいて
使う時だけ読み込んで処理するというのは
そこそこ良い考え方なんでしょうか？
(今だと、面倒なんで一切合切頭で読み込んでる)

すみません。
その流れでいくと、コメント分もなるべく少ない方がいいのでしょうか
ふと気になったもので・・・。

>343 =~ s/コメント分/コメント文/;

コメントはあってもなくてもほとんど影響ないよ。
まぁ、コメントを大量につけすぎて、
スクリプトのサイズが100Mとかいいだすと影響もあるだろうけど。
普通にコメントつけてる分にはきにしなくてもいいよ。

>345
少し安心しました。
ありがとうございます。

ttp://www.pegasusknight.com/mb/index_fe3.html

上のサイトの画面下部に出るちょっといい話ってのの仕組みが知りたいのです
フレームの上側のページのアンカーをクリックしてページが切り変わると下のフレームも更新されるのですが
これは一体どうゆう仕組みなのでしょうか？
javascriptで別フレームを更新させる物は何度か見たことは在るのですが...

perlで検索エンジンを作っています｡
クリックランキングを付けたいので
open(RAND, "$data_f");

@url = <RAND>;

close(RAND);

open(RAN, ">$data_f");

foreach $num(0 .. $#url){
$data = @url[$num];
　　　　　　　　($no,$title,$jurl,$pp,$ip) = split(/\,/,$data);

if($kk == $no){

　　　　　　　$uu = $jurl;
$pp++;
print RAN "$no,$title,$jurl,$pp,$ip";
}else{
print RAN "$no,$title,$jurl,$pp,$ip";

}

}

close(RAN);
print "Location: http://","$uu","\n\n";

と処理をさせて(上記は理屈だけですが)
Locationでジャンプさせたのですが､Win上のApache(1.3.22)
では正常にジャンプするのですが､Linux上のApache(1.3.22)
にうｐ　すると,正常にJAMPできません｡
うまくジャンプさせるには､どうすればいいでしょうか?

御指南お願いします｡

ジャンプ出来ないってゆーのはどんな感じで？
エラーが出んの？

LocationでURLに移動できないのです｡
500エラーはでないのですが､
｢ページが表示できません｣(いわゆる404エラーかな)
が出てしまいます｡
ヘッダ情報の関係でしょうかね?

>>348
CGIからどういうレスポンスが返ってるのかを確認すればいいじゃない。

色々試してみたのですが､普通のURL(テストとしてniftyのURL)
でもlocationができないんです｡
#!/usr/local/bin/perl

Location: "ttp://www.****.con\n\n";
exit;

上記のようなCGIでもアウトでした｡(値は正常なものです)
サーバーが制限を掛けていると言うことは考えられるのでしょうか?

CGIからのレスポンスを調べるとはどういう事でしょうか?
厨房ですみません。

>352
#!/usr/local/bin/perl
↑ここを書き換え忘れてるというオチは？

てゆーか、
Location: "ttp://www.****.con\n\n";
printはどこ？

CGIは動いているのでPASSは､正常です｡
locationだけうまく動かないのです｡
print を書き忘れてましたね｡すみません。

スクリプトにはちゃんと書いていました｡

>>354
×PASS
○PATH

404エラーならIEやらNNのアドレスバーのアドレス見れよ。

あほらし。

locationはサーバによって動作しないとこがあるらしいよ。
サーバ管理者とかに問い合わせたほうがいいと思うよ。

あぼーん

>>358
いいから氏ねば？

>>357
そうなんですかね?
CGI本体から同じCGIに
パラメータを渡した状態でのロケーションはできるみたいです｡

もしlocationを制限されているのならば､外部サーバーには
locationできない仕組みになっているんですかね?

とりあえず、管理者の方に問い合わせてみます｡
ありがとうございました｡

>>356
アドレスバーでわかるんようなエラーなら苦労しません｡

つか、locationじゃないとﾀﾞﾒなの？

↑続き
ジャンプさせたいだけなら、<META>ジャンプとかじゃﾀﾞﾒ？

単にジャンプ先のページが無いだけだったりして・・・
んなわけないか。

>>360
ならなんで404エラーなんだよ。

print "Location

の直前に
print "Content-Type:text/html\n\n";

でもおいてちゃんと出力されてるか見れ。
つかヘッダ関係のトコで挙動がおかしい場合の基本だべ、これ。

どんな基本やねん　（ｗ
WINなら大丈夫ってんだから関係ないだろ
>>360
telnetでちゃんとLocation吐いてるか見れ　>>357を確かめろってこった

ちょうどロケーションの話題が出てるので．．。
質問したいんですが、perlで作ったCGIの中で
print "Location: ../../complete.html\n\n";
とやっているんですが、マックで動作してWINでは動作しません。
行き先はフルパスにしてもだめ。WIN、マックとも複数環境で同じでした。
非常に困ってます。しかも、何年も前に作ったCGIのバグフィクスなんで
自分でも何やってるんだか意味がわかりません。
だれか、原因わかりませんか？

>>365
＞telnetでちゃんとLocation吐いてるか見れ　>>357を確かめろってこった

馬鹿発見。おんなじことやんけ。

> 366
print "Location: http://servername/path/target.html\n\n";
ではダメ？

>368
それでもだめでした（涙）。ありがとう。
他にもご意見聞かせてください。

>>367に追記。
Locationヘッダを見る事については「同じことやんけ」って事ね。

>>366
Locationヘッダは http://〜 と書かなければいけません。
相対パス・絶対パスは『本来』はダメです。

関係ないかも知れんけど、一応。

かぶった。鬱

>370
ありがとうございます。今、調べてて初めて知りました。
てことは今まではなぜ動作していたんだろう。

\n\n ⇒ \r\n\r\n ではどうだろか？

>>367
何で同じ事やねん　低脳の相手は疲れるけど寝る前に教えてやるよ
text/html吐いた後でprint してもそんなもん糞の役にもたたねーだろ　アホか
それともあれか？貴様はたった一行のprint文も吐き出して確認しないと不安なのか？
困った奴だねこのﾄﾞ初心者は全く　はぁ･･･
そんな事してもサーバ側でContent以外のヘッダ全部切られてたら
意味ネーんだよ　アホが
分かったら、ここに謝罪文書いとけ　　ｗ
自作自演で、「アホが居ますね」とかすんなよ　　寒いから　　

>>370
http://hoohoo.ncsa.uiuc.edu/cgi/out.html
をよく読んどきなよ。
あなたの言ってることには間違いがあります。

http://news.2ch.net/test/read.cgi/newsplus/1011369107/401/
これクリップボード読みとられるって本当？

>>374に追記
>>348 の　
Win上のApache(1.3.22)では正常にジャンプする
をまず読めって事ね

多分>>349くらいから罵倒レス入れてるのは貴様だろうが
半端な知ったかで見苦しいんだよ

>>373
その変換をするのはnph-cgiにしていない限りHTTPDの仕事です。

> 378
なるほどネ。言われてみてわかりました。

しかし、みんな熱いネー。トロピカルだネー。

僕のことも忘れないでね。
なぜ、winとマックで挙動が違うのか誰か教えてください。

まぁ、３７４は馬鹿だけど概ね言ってる事は正しいね
Telnetが面倒ならオミトロンとか入れて見れば簡単だよ　->　HTTPheader

>>380
WinとMacと言うよりもLocationヘッダでまともなURLじゃない値が
返って来たときの挙動はブラウザの実装次第。

>347
こんなので解るかな？

ttp://www.pegasusknight.com/cgi-bin/verb/checker.html

ttp://tohoho.wakusei.ne.jp/wwwcgi4.htm#NphScript
ttp://www.mikeneko.ne.jp/~lab/web/htaccess/nph.html

>382
なるほど。ありがとう。
ちなみにマック版IE、NNの複数バージョンで正常動作。
WINはIEの複数バージョンで以上動作。NN最新版で正常動作。
NNは今急いでチェックしました。

>text/plain のわな(共通)：Content-type: text/plain を使用した場合、
>Internet Explorer 3.0以降ではうまく動かないことがあります。
>[表示]→[オプション]→[プログラム]→[ファイルタイプ]で、
>.cgiという拡張子のファイルにメモ帳などのプログラムを割り当てている場合、
>text/plain 形式の実行結果をダウンロードしてしまい、
>期待通りの動作をしないことがあります。

という解説をとあるサイトで見て、意味はよくわからんのですが、
関係ないでしょうね..やっぱり..。

そういえば、ケータイでもLocationダメだったなぁ。
HTMLに直書きだと飛べるのに、cgiからの出力だと飛べないという。
PCでは飛べるからスクリプトのせいじゃないのよ(;´Д`)
AU逝ってよし、と。

>>377 はなんであんなに自分の無知を叫んでるの？

そう言えば昔、スクリプトにヘッダ書き忘れてたことがあったなぁ。
Win上のローカルで動いたから気にせずうｐしたら、エラーが出る。
原因究明に随分と時間かかったよ。
まさかうちのローカル環境だとヘッダ書き忘れてもちゃんと表示されるなんて
思わなかったし。

ちなみに、Win2000+AnHttpdだけど。

ヘッダの書き出しを忘れてた、ってことね。

データベースについての質問お願いします。
今ウィン環境で、そこにあるデータベースに別のサーバからアクセスして
データベースを操作したいのですが、そのサーバーにパールのCGIを置いて
操作したいんです。　DBIとかいうのを使わなきゃいけないみたいなのですが、
それをどうやって設置するのですか？
モジュールがあってそれをCGIと同じ階層に設置しとけば、USE　DBI
は有効になるのでしょうか？　LINUXだといっぱい書いてあるんですが・・・

>386 pupupu

>389
コマンドラインから
c:\> perl -MCPAN -e shell
とかしてみる。

特に、install Bundle::CPAN
とか。

391> それはデータベースが置いてある方のコマンドラインですか？
サーバの方は設置しかできないので、コマンドラインには入れません。

>392
ううん、Windowsだよ。
PPMとかは使ったことないんだけど。
あ、ActivePerl？なに使ってるのかな？
ほかのものについてはしりません。

392> すいません整理します
たとえると　家（常時接続）にWIN環境でMYSQLのDBを作りました。
ここにはアクティブパールもあります。
それを外のサーバに置いたパールで書いたCGIで操作したいんです。
上記のお話だと家のコマンドラインからコマンドを実行すれば、
CGI上の　USE　DBIとかは有効になるんでしょうか？

>394
ああごめん、全く逆の連想していました。

一般的に、Perlのモジュールは、@INCという、Perlモジュールが
置かれているパスに置かれていれば機能します。
@INCには、カレントパス(実行されるCGIがある場所)も含まれますので、
そこに置けば、運が良ければ動くでしょう。
運が良ければ、というのは、Perlのモジュール群は、
相互に関連していることが多く、たとえば、DBIのあるモジュールの機能を使うためには
Netモジュールが必要だったり・・・とかそういう事情です。
たとえば、コマンドライン(SSHやtelnet)でも利用が出来ないサーバでの課題ということに
なってくると、もしこれらのモジュールの中で「Ｃ」で書かれ、コンパイルが必要な
モジュールが含まれ、かつそれが@INCに存在しない場合、お手上げになってしまいます。

396> telnetでサーバーの方を操作すればいいんですね。
そこのサーバはPERLは使えるんですけど
usr/bin/perlへは行けません
当然そこに@incというモジュールはあるんですよね・・・
DBIを使わない方法はないのでしょうか？

>383
サンクス、漏れはフレーム生成部分のソース見落としてて
３重になってる事に気づかずjavascriptが記述してあるHTMLが判らなかった訳か
あとは大丈夫そうなので自力で頑張ってみます
ホントにありがとう。

>347=398
オラッチもnph-なんてあるの知らなかったので勉強になったにぇ。
日々精進じゃけんのぉー

質問お願いします
自宅のmysqlから職場のmysqlに繋ごうと思ったので
dosプロンプトでmysql/binから
mysql -h ipアドレス ってしても職場のmysqlサーバーに
繋ぐ事ができません。
cann't connect　mysql server on 〜　とか出てしまいます
root　にしてpassを入れても入れませんでした。
どうすればいいのでしょうか？

CGIをSSIで表示する際の質問なんですが、
xxx.cgi?act=xxx
って感じでもSSIとして呼び出して、
そして表示は可能なのでしょうか？

知っておられる方がおられましたら。
どなたかご教授ください。

あげ

>>401
普通にexecじゃだめ？
xxx.cgi?act=xxxは特定のCGIしか効果がない気がします。

コマンドはどのような感じでしょうか？
単発質問で申し訳ございません。

>>401
すみません。そもそも何がしたいのか量りかねます。
もう少し詳細に。

いろいろなモードがあるサーチエンジンで
新着情報をSSIを使ってTOPページに表示したいのです。。。

うまく通じたでしょうか。。。

>>406
いや、全然ｗ。
じゃあ、SSIモードにしてSSIでexecすればいいでしょう。

[an error occurred while processing this directive]
SSIモードとか無いようでございまして、
上記のようなエラーが出てしまいます。

>>408
まず、そのCGIのreadmeなり仕様書なりを読む。
それでできることとできないことをはっきりさせる。
改造が必要なら改造する。

プログラムができる人の薄笑いはかっこいいです。
どうか教えてください。
改造の仕方を教えてください!!

>410
もとねたのCGIをどっかに置かないと無理でしょうよ(笑)
がんばれ！

>>411
同意、ソースなしでは無理っす。

わかりました。がんばります。
その際は、改造をよっ宜しくお願いします。

http://pc.2ch.net/test/read.cgi/php/988808396/
改造ならこっちのスレの方がいいと思う。

はい。移動します。。。

あぼーん

すみません。質問です。
Windows2k+Active Perl 5.6.0.623
のサーバー借りたんですけど、

・絶対位置を指定する。
・***.cgi→***.plにする。
・パーミッションの変更は不必要

これが必要と言われて、やってみたんですけど
動きませんでした。
あと、何か必要なことが有れば教えていただけませんか？

厨房な質問ですみません。

>>417
私だったらそんなサーバ借りる気がしないが、それはさておき。

>動きませんでした。
これでは詳しい事は誰も回答できないと思うけど。
エラーメッセージとかログの内容とか、Scriptをどのように設定したとか
その他諸々を全て提示すべき。『絶対位置を指定』だって主語や目的語が無いから意味不明。
皆超能力者じゃないんだから、貴方の行き詰まってるトコなぞ、書いてもらわにゃ
分からないって。逆に詳しく書けば回答もたくさん貰える筈。

上述の通り一般的なことしかいえないからそういうのだけ列記。
『PerlのPath』『Scriptの設定ミス』『Scriptの(改造で発生した)文法ミス』
『UNIXでしか使えない関数を使ってないか』『KCatch.pmとか使ってみる』
この辺チェックしておいてみ。

唯、その程度の環境だったらLocalで実験環境組んでやってみる方が早いと思う。
インスト＆起動くらいなら一時間位がんばれば出来るよ。

追) 本題には関係ないけど、読むと為になるかもね。
http://www.geocities.co.jp/SiliconValley/5656/

質問させてください。

CGIで、サーバー間の同期が取れるようなプログラムって、可能ですかね？
探したのですが、見つからなかったので、知っている方よろしくお願いい
たします。

>>418
やっぱり　Win2000鯖はまずいですか。（苦笑）。
もうちょっと勉強して、動かなかったら再度、
何処がどうなってるのか質問したいと思います。
ありがとうございました。

>>419
下で聞けば
http://pc.2ch.net/test/read.cgi/php/1003132904/

KENTさんのSUN BOARD（www.kent-web.com/bbs/sunbbs.html）を掲示板モードで使っているんですが。
センドメールで送られてくるメールの投稿日時とホスト名が、最初の書き込みと全く同じのままなんです。
出来ればURLを公開したくないのでKENTさんのところでは聞けなくて……。
もし同じようなエラーが発生し解決した経験をお持ちの方がいらっしゃいましたら教えて頂けると嬉しいです。

２ｃｈモデルのCGIスクリプトが欲しいんですが・・・
何かないでしょうか？

>>423
上位スレッドくらい見ようよ…。
http://pc.2ch.net/test/read.cgi/php/1003131529/

>>423はメクラ

あぼーん

いい加減にしなさい！(｀３´)ぷんぷん

SSI使わずにＣＧＩでランダムメッセージできませんか？？

>428
index.htmlやindex.shtmlやめてindex.cgi使う。

それはちょっと・・・

>430
じゃあindex.php使う

じゃあメッセージを画像にしてランダムで表示させる

Javascriptでランダムに表示させる。

htmlを書き換える
次のリクエストに返す内容を書き換えるってこと

Javascriptでもいいけど、ソースでバレバレかなぁと思って。
ランダム画像にします

htaccessで404のページをカスタマイズできるのは分かるんですが、
（例えばhttp://www.xxx.com/404.htmlに飛ばすとか）
実際には存在しない間違ったURL(例えばhttp://www.xxx.com/abc.html)をアドレス欄に表示したまま
カスタマイズしたページを表示させることは可能でしょうか？

サーバ自体をいじらないとダメ？

スレまちがった・・・すいませｎ

一日1000アクセスだとして彼らが何らかの書き込みをする場合です。
色んな話題を扱う為に、あめぞう型一つのscriptで処理させるのと、
違うタイプのscriptを数個置くのと、どちらが鯖の負担が少ないでしょう。
掲示板の数は３０くらいと仮定して。
先輩諸氏、アドバイス願えませんか？

>438
同じ内容のCGIだったら、同一サーバで稼働させるんであれば、サーバの負担は
全く一緒だよ。

>438
それよりも掲示板で表示させる内容をHTML保存して
それを表示させるようにした方がよっぽど負荷は減る。

439-440　感謝です。
スレ違いになりますが、返答を頂く間に他の板も見たのですが、
phpであめぞう型のがありました。
試しに使ってみるとまずまずの感じ。
これもありかなぁと思いました。

美術に関係する掲示板なのですが、テクから歴史、流行、
論文資料、グッズとたくさんの分類分けが必要なのです。
２ｃｈ型でやれば良いかなと思って質問させて貰いました。

メインはあめぞう型でたくさんの話題を、
ほんの少しだけ凝ったデザインの掲示板も使う。（２，３個）
特に注意すべきは、ログをhtml形式で保存、表示させるタイプと
いう線でいけばよろしい、とい認識でよいでしょうか。
では、探しにいってきます。

突然すみません。

@a = (1);
@b = (1);
sub addem
{
my ($reference1, $reference2) = @_;
for ($loop_index = 0; $loop_index <= $#$reference1; $loop_index++) {
$result[$loop_index] = @$reference1[$loop_index] +
@$reference2[$loop_index];
}
return @result;
}

@array = addem (\@a, \@b);
print join ('､ ', @array);

これで2となると思うのでございますが、
1をある数をカウントする$xxxにあてはめて、

1
2
3
4
5
6
7
8
9
10
という処理を行って
そして、
10までいったらまた1に戻すという処理をPerlで行いたいのですが、
どこをいじればいいのかわかりません。


どなたか、ご存知の方がおられましたらご教授ください。

>442
よくわかんないけど
$i = 0;
foreach (@処理する配列) {
    処理ルーチン；
    if ($i eq 10) { $i = 0; }
    else { ++$i; }
}
でお望みのことは出来るかと。

えーっと、既存CGI（Ｃ＋＋で作成）へ環境変数などを渡す為に、Parlを被せて、
実際にはperlの中からcgiをオープンかけてるんです。で、今回、起動したCGI
のほうが正常に作動したかどうかを、そのparl内で調べる必要があるので、
open2を使用してと思ったんですが、うまくいかないのです。

元のソースはこんな感じです。
if (!open AA, "|$p") {}
syswrite AA, $para, length($para)
close AA;

$p　:モジュール
$P　:引数
以下修正後です

open2(In,O, $p, $para)
while(<In>)
{
print;
}
print O "\n";
close O;
close In;

この子プロセスから受け取った標準出力の内容をprintして
まずは画面表示しようとしたのですが、そこからうまくいか
ないのです。どうすればいいんでしょうか（；；

Parlを被せて　->　Perlを被せて

でした。なにやってんだか＜おれ

open2(*I, *O, @args);
とかいう話じゃなくて？

>>446
できました。*がぬけていたみたいです。
ありがとうございました。

>442
本題からはそれるけど、
@$reference1[$loop_index]　は
$reference1->[$loop_index]　か　$$reference1[$loop_index]　に
すべきなんじゃないかな。
何かを意図してスライスにしてるわけじゃないよね？

apeboardの掲示板にfstatのアクセス解析をつけるには
どうしたらいいのでしょうか？

↑マルチポストかよ

2APESさんでapeboardをＤＬしました。
自サイトでＢＢＳ公開してましたが、マルチレスのあるapeboard＋をＤＬしてバージョンアップを考えてます。
移行するときに、元のＢＢＳのログを新しいＢＢＳに移す方法ってあるんでしょうか？？
あるとすればどうしたらよいのでしょうか？
スレ違いでしたらすいません・・・。

>>451
手動で書き直す

ＣＧＩ初心者なのでどれをどう書き直せばいいのかわかりません
すいません　もうすこし詳しく教えてください
２ＡＰＥＳさんのＦＡＱにもＢＢＳにもなかったので

どこに行ったら落とせるのよ?そのcgi

そのCGIがどんなのか知らないけど、新しいCGIになにか書いてみてそのログの書式にあわせて
以前のログを書き換えればいいのでは？
ログの取り方が全く違ってれば大変だけど・・

それより作者さんのサイトで聞いた方が良いと思うけどね。

うーん、作者さんに・・・聞いてみます。
ありがとうございました。
ちなみに、そのCGIはwww.2apes.comでDLしました。

こんばんわ。よろしくお願いします。

http://www.polinky.com/mail.html
のような、メールを送ると自動で返事を返せるようなものは、CGIで組む
のでしょうか？

あのー。
sh、bash、cshでCGI作りたいんですけど、
なんかサンプルあったら教えてください。

　　　　　　　　　　　　　ポ　リ　ン　キ　ー　逝っ　て　よ　し　！

　　　　　＿,∩＿　　　　　　　　　＿,∩＿　　　　　　　　 　 ＿,∩＿
　　　　（＿＿＿__)ゝ、　　　　　（＿＿＿__)　 　 y　　　　 （＿＿＿__)
　　　　/　::　::　:: ヽ　〉　　　　　/-‐::　::‐-ヽ　／　　 　 　 /　::　::　:: ヽ
　　 _./ （・ ）ll（・ ） ∨　　　　 _/　 0) i! 0)　∨　　　　　 _/ （ ・）i!（・ ） ﾞ､_
　／/ ::　:: ∈ゝ ::　::ヽ　　 ／/　::　 ‐-‐　::　ヽ　　　 ／/　 ::　ｰ一　::　ヽ＼
. ゝ/::　::　::　　::　::　::ヽ　 ゝ/　::　::　 ::　 ::　:: ヽ　　 ゝ/　::　::　 ::　 ::　:: ヽく
　　￣￣ |￣￣ |￣￣　　　 ￣￣ |￣￣ |￣￣　　　　￣￣ |￣￣ |￣￣
　　 　 　 | 　 　 |　　 　 　 　 　 　 | 　 　 |　　　　 　 　 　 　 | 　 　 |
　　　　⊂! 　 　 !つ　　　　　 　 ⊂! 　 　 !つ　　　　　　　 ⊂! 　 　 !つ

　　　　　ジャン　　　　　　　　　　ポール　　　　　　　　　　　ベル



　ジャン！

>457
違います。メールサーバの機能です。

>458
人に意志を伝えられる日本語会話の勉強の方が先だぞ？
きみは。

>460
あ、ども、ご親切にありがとうございました。

>>461
たとえば
#!/bin/sh
で記述されたＣＧＩのサンプルあったら教えてくださいって
ことなんだけど、そんなに理解不能だった？

>>458
http://www.google.co.jp/search?q=CGI+%22%23!bin/sh%22+echo+%22Content-type:text/html%22

>>464
さんきゅー！
どもありがと

>463
うん。shで「なんの」スクリプトが作りたいのか意味不明

apeboradにカウンタをつけたいです。
cgiをいじることになるみたいなのですけど、
どうすればよいでしょうか？

カウントできればカウンタはなんでもいいです。
よろしくお願いします。

http://www.2apes.com

>>467
じゃあ適当なもの選んでつけてください。付け方はカウンタの説明だろうと思います。
http://tadamono.to/counter.html

<ol>
<li>xxx
</ol>
こうやって書くと、

1 xxx

ってなると思うのですが、
縦と横にスペースが入ってしまいます。

そこで、Perlでこれを表現したいのですが、
どう記載すればいいのかわかりません。

どなたかご教授ください。

すみません。

×そこで、Perlでこれを表現したいのですが、

○縦と横のスペースを入れずにPerlで表現したいのです

でした。

(・。・)?　

age

川o・-・) 〈 perlはまったく関係ありません。cssを勉強てください。

カーネルのバージョンをｃｇｉを使って探りだすプログラムを作りたいです。
telnet address 23でカーネルのバージョンが出るので、
それを利用してとろうとしても取れませんでした。
なんとかなりませんか？
ソケットを使って。
apache とftpはとれたのですが・・

>474
そのCGIをローカルで使って、よそにあるサーバの
カーネルのバージョンが取りたいって意味？

ｕｐｄａｔｅを促すプログラムなんです。
versionを調べて。
そのｃｇｉをサーバにあげておいて

>ｕｐｄａｔｅを促すプログラムなんです。
>versionを調べて。

余計なお世話だと思うが。

そういうテキトーな理由をつけて
つまらんアタックをかけるつもりに一票

パスワードCGIさがしてるんですが、できるだけ強度が固いのがほしいです
おすすめのCGIがあったら教えてください<(．．)>

>479
Basic認証を使っているのがいいと思います。
CGIで認証するものの中には、CGI自体で認証をかけているものもありますが、
手軽な分リスクもありますから。

>>480
Basic認証ですね！有難うございます
今からBasic認証のものを探してみます（＾-＾）

>>481
探すモンじゃないですよ
http://www.google.com/search?as_q=Basic%94F%8F%D8&num=100&btnG=Google+%8C%9F%8D%F5&as_epq=&as_oq=&as_eq=&lr=lang_ja&as_qdr=all&as_occt=any&as_dt=i&as_sitesearch=

>>482
ぐふっ（；；
なるほど、でした。勉強しに逝ってきます

>482-483
でもまぁ、メール使った自動パスワード発行システムのスクリプトとかも
ありますからね。
KENTWEBやレスキューにあったと思います。

CGI.pmであっぷろーどの作業をしてます。
フォームから画像ファイルをアプすると、指定のディレクトリに
正常にアプされて、それ以外にルートに
　"CGITempxxx"　というファイルが出来ます。なぜですか？

>>485
ワタシにはさっぱり分かりませんが、CGI.pmの中をTempで検索してみました？
何か出て来るんじゃないでしょうか。

>485
環境が書いてないですが、Win系ではファイルハンドルをクローズすると自動で消されます。

いま、オブジェクト指向なプログラミングに凝ってるんですが、Perlのバージョンが５でないと動きそうにないんです。
で単刀直入に、Perl ver5( >= )の普及率ってどのくらいなんでしょうか。
「ほとんどのサーバってPerlの４だからやめた方が〜」とかご存知の方おられましたら是非ご意見をば…

ほとんどのレンタルサーバはPerl5です。
未だにPerl4をメインで使ってる人を知りません。

そうですか…。いや、古いバージョンを放置してるとこってあるかと思ったんだけど。意外とそうでもないか。
ありが�dです。>>489

漏れのプロバのスペースがPerl4。
色々不便。

実際問題Perl4は少ないと思う。
プログラミングする前に自分の使えるサーバーのPerlのバージョン調べたら？
配布するんだとしたら、Perl4では動きませんとだけ書いておけばいいでしょ。

BBSのCGIがinternal server errorで動きません。
ttp://dream.lib.net/room/cgi/e_resbbs.html
↑ここのやつです。

iswebでは動くのに、今使ってるレン鯖ではムリでした。
前に使ってたレン鯖でも動きました。
で、パーミッションが違うのかと思い、管理人に問い合わせたら、
管理人が同じ鯖にこのCGIをアップしてくれたんですけど、
管理人のアップしたBBSは動いてました。

Perlのパスやパーミッションは合ってるはずです。
管理人は設定は何もいじらずにアップしたそうですが、動いてます。
全部アスキーでアップしてます。

エラーになる原因を教えてください。あと、サーバー側の設定のミスで
自分の借りてるスペースだけCGI不可になることってありますか？

>>492

・Perlのパスを再度確かめるj
・パーミッションを再度確かめる
・.htaccessを弄ってないか考える
・CGI::CarpやKChatchを使ってみる

>>493
やっぱり、Perlのパスもパーミッションも間違ってないです。
他のCGIでも同じ状況になりました。他の鯖では動くのですが･･･

サーバ側の設定ミスというのはありえるのでしょうか？

>494=>492　です。
すいません。

>>494
CGIを置くディレクトリ指定とかないの？cgi-binとか

>494
サーバー側のミスもありえないとは言わないが、
君が間違ってる確率より何万倍も可能性が薄い。

>>496
何もないです。管理人さんがテスト用に置いてくれた
BBSもcgi-binには入ってませんでした。メールでも
ディレクトリ指定はないと書いてました。

レイアウトが自在な掲示板ありません？

>>497
自分でもそう思うのですが、
他の2つの鯖で動くのに、この鯖だけ動かないというのが･･･
自分で思いつくことは全部試したし、
確認も何度もしたのですが･･･

>500
そういう時こそ簡単なものを見落としやすいものさ。
ＦＴＰソフトを変えて試してみるとかしてみたら？

サーバで制限してる関数使ってたりしないの?

あと、レン鯖の説明の書いてあるページをもう一度全部読み直すのも大事。
こういう時ほど基本に立ち戻る。

それでもダメなら、管理者の方に「自分のスペースに」アップして試してもらえ。
それでできないようならあっちのミスだろ？
ただし、それで上手くいくようなら、君は今後管理者に大きな事を言いにくくなるがね。

簡単なCGI(HelloWorldとかｗ)でも動かないようならサーバの設定ミスもありえるかも・・

>>499
http://pc.2ch.net/test/read.cgi/php/1003132904/852-854n

>>501
FTPソフト変えてみました。でも、動かないです･･･。
このソフトでアップして、iswebでは動きました。

>>504
それ試してみます。で、それでもムリなら、
>>503さんのいうように、最後の手段で管理者の方に
お願いします。

>>504
「これはテストです。」と表示されるだけの
簡単なCGIもinternal server errorになってしまいました・・・。

そのコードここに書いてみ。
君の言う事は何か怪しい

まあ良いか。
一度管理に問い合わせてみれば?

>>508
僕が書いたのではなくて、「www入門」にあったのを使いました。
ttp://tohoho.wakusei.ne.jp/wwwcgi2.htm
このページにあります。これもやっぱりiswebでは動きました･･･。

とりあえず一日待ってみろ　何かが変わるかも知れない　（ﾜﾗ

>508
同意。
どうにも怪しい。

>510
そのまんま使ったにしてもそのコードを上げろと言ってるの。
そのまんま使ったから使えるなんて甘い事考えるなよ。
iswebで動いたってtoktokで動かないCGIだってあるわ。
それと、そのレン鯖のURL出せ。
絶対お前は何かを見落としてる。

>>512
#!/usr/local/bin/perl

print "Content-type: text/html\n";
print "\n";
print "<HTML>\n";
print "<HEAD>\n";
print "<TITLE>テスト</TITLE>\n";
print "</HEAD>\n";
print "<BODY BGCOLOR=\"#FFCCCC\">\n";
print "これはCGIのテストです。\n";
print "</BODY>\n";
print "</HTML>\n";

です。パーミッションは管理人さんの指示通り755にしました。
サーバによって動く動かないっていうのがあるのは知ってます。
でも、>>492に書いたとおり、
管理人さんがUPしたのは動いてたので、動くのではないかな？
と、勝手に判断してしまいました・・・。

利用してるのは、管理人さんが無料でしてるレン鯖です。
http://kabocha.org/　←ココです。
管理人さんとも何回もメールでやり取りをしてます。

やっぱり僕が何か見落としてるんだと思います。
それが分からないんですけど･･･

追加

>>513のperlのパスは
#!/usr/bin/perl
に直して使いました。

パーミッション700とか705とか一応試してみてください（ダメだと思うけど・・笑）

>>515
Your brain is rotten.
Die early because a low brain
like you does not have the value of being alive.

？？

755ではセキュリティ的にちょっと（かなり？）マズいので700じゃないと動かないサーバもあるからな。

原因がわかりました･･･。
ここの鯖はpublic_htmlの中にファイルを
アップする方式ではなかったのに、僕が勝手に
public_htmlを作ってそこに入れてしまってました。
で、public_htmlを参照する機能が
完全に無効にされてなかった(htmlは見れた)ので、
なかなか気が付かなかったのです・・・。

レスをくれたみなさん、すいません、やはり僕の落ち度でした。
m(_ _)m

>519
がんばれよ。

すみませんがどなたか教えてください。

ブラウザは一旦BASIC認証にパスすると、同じサーバ上の異なるURL
に対してもAuthorizationヘッダを出力します。(IE5.5sp2, NC4.7
で確認)
このブラウザが記憶している認証情報を、次回サーバが送信するヘッダ
でクリアする方法はありませんか？
言い替えればブラウザは、サーバがWWW-Authenticatoinヘッダで認
証を要求したときだけAuthorizatoinヘッダを出力し、そうでないと
きはAuthorizationを出力しないようにしたいのです。

>521
ない。
ダイジェスト認証使うのを検討したら？

レスサンクス。
ちなみに、.htaccessのない環境です。

うーん、サーバがWWW-AuthenticatoinでMD5をくれてやれば、ダイジェスト
認証に対応していないブラウザが認証に失敗して、以前の認証コードを消去
してくれるなんてことはありませんか…。
でも、公開するものなのでブラウザは不特定だし、トライ＆エラーで疲れま
した…、鬱。

>523
盗聴されない限りにおいてはリスクは乏しいけど、
盗聴される危険性まで検討するんだったら、htaccessがなかったりしたら
お手上げなんじゃないの？
自前サーバならともかく、共用だと、盗聴の危険も出てくるからな。
ま、MD5とか組み込んでもらうかなんかしかないと思う。
ブラウザ落とすまでいつまでも、Basic認証の情報はブラウザーが保持し続ける。
サーバ側じゃなくてブラウザサイドの問題だから。
あとは、SSL化するくらいしかないな？認証ページを。

どもども。
なお相手はVLAN上でして、特定の場所以外でなければパスワードが流れるという
ことは考えられませんし、考えないで逝こうと思います。

今ミケネコさんの.htaccessの資料を読んでますが、考えますに
１ BASIC認証ではセッションの細かい管理はできない。
　（即ち同一サーバに対しては、URLは何であれ常に同じAuthorizationを出し
　　続けてしまうため。同一サーバに異なるBASIC認証が複数あると、ブラウザ
　　を落とさない限り、どちらか一方のみ失敗する）
２ よって、サーバはWWW-Authenticateを返すことはせず、アクセスしてきた
　　やつのIPアドレスを見て必要に応じて401を返してやるのがよいのではないか

と思いました。どうでしょうか。

＞どちらか一方のみ失敗する
もとい、
＞１つを除き、その他はすべて認証ダイアログさえ出さずに401を食らう。
ということです。スマソ。

認証済みのブラウザに、401返すと認証ダイアログが開いた記憶があるけど
IEのバージョンに依存かも。

KENT氏のpetit boardのiモード版、petit2iを使ってるのですが、
http://red.tomato.nu/desperado/software/
iモードでアクセスするときに、レスがあるのかないのかわからないのにそれぞれの書き込みのレスを開いてしまうので、
できればレスがある記事はレスにジャンプするボタンの横にレス件数を表示できればなぁ・・・って思ってます。
（例：　[レス][２件]）cgiをちょっといじれば可能だとおもうんですが、cgi初心者のため全くわかりません。
よろしくお願いします。

>528
http://pc.2ch.net/test/read.cgi/php/988808396/
スクリプト改造工房 Part3

微妙にPerlの言語に関する質問なのですが、「自分自身のＵＲＬ」や「どこから来たか」を調べることはできますか？
どっかしらの特殊変数かな〜と思うのですが。
早い話、掲示板自身のアドレス以外から直接アクセス（カキコ系の）があったときに非常停止するようなスクリプトを書きたいのですが、ご教授お願いします。

Excel VBAについてはどこの板orスレッドで聞けばいいですか

>530
%ENVを調べれば分かる。

ただ、最近はパーソナルファイヤーウォールでリファラーを返さなく
なってるものが多いから、「どこから来たか」を正確に取得できるとは
思わない方がいいよ。

>>532
どちらかというとjavascriptで取得するのが一般的ですな。

<script><!--
document.write('<img arc="a.cgi?ref=' + document.refferer + '">');
//-->


なお、うろ覚え。

>>532氏
ありが�dです。なんとかわかりそうです。
ただ、リファラーを正確に取得できないとなると、むやみに非常停止するわけにも行かないし、かといって全オープンにするのもシャクだし、最善策はどうなのでしょう。
う〜む…。

でも、ブックマークから飛んできた物には使えない。

ちょっと考えたアクセス制限。

まず、ブラックリストに奴のIPを登録。
奴が来た場合クッキーにその情報を渡しブロック。
奴が串をかましてきてもクッキーで割り出し。
その串をリストに追加。

とかね。

>>533・>>535氏にもありが�d。
漏れ的には特定個人をはじくための非常停止機構でもないし、アクセス解析でもないんでJSで取得ってのもいと難しき。

質問です。
カウンタ設置しようと思います。
index.html指定で書かれたカウンタ用のスクリプトcgiを
使用してindex.htmで問題になることはありますか？

537を理解できた奴は神

>>537
スクリプト内のindex.htmlをindex.htmに書き換えればいい

神ゲットー　か？

>540
うむ。ズザー

CGIの質問でなくてすみません。

この板はなんでこんなに人が少ないんですか？
プログラム技術板の隔離板だからですか？

あははは

人が少ない−＞バカが来ない−＞初心者はweb制作に行く−＞ウマー

もしかしたら第二のUNIX板にｗ。

掲示板で排他処理しないと具体的にどんな事態になるのか想像出来ません
色で言うと何色になりますか？

白→良くて灰色、最悪の場合黒

これでいいかい？（わ

JAVAやクッキーがオフだと別のページに
飛ばしてしまう様なcgiってありますか？
これってcgiを使わなくてもできますか？
初心者過ぎて話にならないと仰らずに
入門者のおいらにも教えて下さいな。

これぞＣ言語掲示板の雛型決定版！
のような勉強になる掲示板のソースがあったら教えてください。
よろしくお願いします。

<noscript><meta></noscript>



#!/usr/bin/perl

if(!$ENV{'HTTP_COOKIE'}||){print "location:http://lovelovesex.com/\n\n";exit;}

549さん
早速、どうもありがとうございます。
メモっておいて完成したら試してみます。

別スレでスレ違いだったことに気づきこっちに書き込み直しました。

鯖がhi-hoです。
それでＣＧＩゲームを置きたくて
とりあえずApacheで動作確認したFFAとEndlessBattleを置いてみましたが
FFAは呼び出しの時点でスクリプトエラー
EBは呼び出しはできたもののどれかひとつでもリンク押すとスクリプトエラー
僕の力じゃどうしようもありません。
何か方法は無いでしょうか？

向こうで答えた。

すいません、
CGIプログラム上から別のページへLocationヘッダなどで呼び出す際、
渡す環境変数はいじれませんか？

掲示板サイトにおいて、荒らしの特定用に
レジストリからメアドとか名前を抜き出して、
<INPUT TYPE="hidden" NAME="meado" VALUE="[email protected]">
<INPUT TYPE="hidden" NAME="namae" VALUE="大橋巨泉">
をできる方法はないですか？　VBスクリプトだと、できそうでできません。

＞VBスクリプトだと、できそうで・・
教えて下さい　　（爆笑

　　　 ､-.､._　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　.__
　　　　`ヽ、"'' - ._　　　　　　　　　　　　　　　　　　　　　　　_,;:-‐ ''"/
　　　　　　＼　　　~'' ｰ　,,__　　　　　　　　　　_ ,,.:::-‐ ''" "~　　　 ／
　　　　　　　 ヽ、　　 , 　　 ヾ'ヽ､__　　　 ./'ｉ~　　　　　　　　　　／
　　　　　　　　　＼　 |!　　　丶､＼"ｰｪ''７ /　　　　／　　 _..,,ノ　
　　　　　　　　　　 `ヽｉ`ｰ-;,＿__"''ゝー<''~　,,､-'"~i-ー''"~
　　　　　　　　　　､＿冫=-:::::::::::~"''"⌒￣ ｧヽ,.へ,
　　　　　　　　　　`ー,-''~::::／:::::::　　::::::::::::`>'´,／､丶
　　　　　　　　　　 ／ ／:ｧ'::::::::,i::::::､:..::: :::....ヽｨ'＼ノ::::. ＼
　　　　　　､＿, -/ .:ｧ' .:ｼ ::...::::/!| ::::::|'､::::l__::i:::::;i :::::}::::::　 `ヽ､,＿＿__,
　　　　 ､＿ニ=‐{ .:ﾉ!　i, .:{ｧ'"ﾒ.l{l　::::| 'l''"}::`|.:::::}　:::ﾄ､:: 　 "''＝=ニ　　
.　　　　　`ｰ-／｛./ {　|:{.:{ヾﾂ_..,l,{....:::|. |' ｀ヽﾊ:ﾉ:::l::::|:::ヽ、　　`ヾ、　　
　　　　　　ｧ' ／'.ﾘ　l :l|::ヾ〉.,ｨ⌒ｉ `ｰ''　' 　　`‐ﾘ::ﾉ::ﾉ:::::i､ヽ　　丶ﾄ、
.　　　　　/／　.:/ .:ハ|:iﾊi､'､ヾﾟﾂ　　　 ''"¨ヾ,ｼ:／|:::: ハ:::}:..､.:: ::ｌ ）
　　　　 // /　.:,' .:/:l .ｌ:;:;ﾘ}::} ひ､､　 ｀　　､､-'ｿ　/::'ﾉ'ﾊ::::}::::}:::ノリ　
　　　　 ﾘ　{　.:/! :{ヽト'^^'ﾘ :`　､_⊂ニつ　'' lﾊ|ノ:ノ_ V ル'／
　 　 　 　　l. ::{ ｀ヾ 　‘　.-ｰﾚﾙﾊ''lｰ-‐'"|ﾘﾙｙ⌒~　　　／　
.　　　　　　 ヽ|　　　 　/´　　 /#ハ 　,.:-‐ｌ#l~　　 　／　
　　　　　　　　　　　　 { 　,: ./#/　　　'　　.|.#|..　..ｧ' 　
　　　　　　　　 　　 　 l　.:i/#/ 　 　 　　 　|#.{. ,;'
　　 　 　　 　 　 　 　 l　 ｧ'-‐‐-:::;',.__　　　l.#|/
　　　　　　　　　　　　i ./　　　　　 '　~⌒`ヾ､}'
　　　　　　 　 　　 　 | .{　 :::......　　　　　　　 }
　　　　　　　　　　　 j　.ヾ､_::::::,,:::::::-‐　 .....::ﾉ
　 　 　 　 　　 　 　 ｌ 　{=-‐-::;;_ ｭ `::;;__;;;シ
　￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
http://www.puchiwara.com/hacking/
やっぱコレだねェ〜♪

>553
QUERY_STRINGやPATH_INFO， HTTP_COOKIEくらいしか
できないんじゃないかな

>554
運がよければ HTTP_FROMに入ってるけど，普通は無理。

>555
最近出版されている本に載っているとかマヌケなこと抜かぬなよ。

「誰も書かなかったホントの裏技（秀和）」
「ホームページ危ないトリック＆トラップ（メディアテック出版）」
この２冊の内容はどちらもローカルでしか使えないクソスクリプトだということを
どれぐらいのガキどもが気づいているのだろうか？
内容も煽っているだけのドキュソだし。

抜かぬなよって何処の方言？

で、何でそんなイキリ立ってる訳よ

糞本は、糞餓鬼向けに書かれてんだから丁度良いんじゃねーのか
それとも、萌え萌えBBS荒された復讐の為にその本を買って
実践したけど出来なくて怒ってるのか？
そんな程度の低い本に金出すなら、MSDNの会費払ってfocus辺りチェック
した方がちょっとはマシだぞ

今の旬は、アクティブスクリプトとMIME偽造しての受動攻撃だ
一昔前は、ActiveXだのアプレットだのってレジストリに辿り着くまで
ちょっとは頭使ったもんだが、今はコイツのお陰でいきなりバイナリ
実行だ。
椅子使って天井にぶら下ったバナナ取れる程度の頭で理解出来るだろ

>>560
一旦、HTMLファイルごとダウソロードさせて、そこで抜いたデータを
INPUT TYPE="hidden" で送ることにしました。成功。
なお、両糞本は図書館でコピーしましたので購入していません。
どこのどいつかわからん奴に金払うのももったいないし。

>>559
吉祥寺ですけれど。タイプミスごときを発見してクソレスするのもどうかと。
上げ足取りでよろこんでんじゃねーよ。すんまそんって言ってほしいのか。

すみません初心者の質問です。
投稿した人がリアルタイムで投稿を閲覧できないタイプの掲示板を
探しているんですが、どこかにないでしょうか？（フリー・商用可で）
投稿をまず管理人が確認してから、管理人が手動で閲覧ページに
追加するようなタイプを探しています。
そういうのがない場合は、どういうCGIから改造すれば作りやすいかも
教えていただけるとありがたいです。

>>562ですけどすみません。
掲示板を探していると書きましたが、実際はご意見箱みたいに
使います。管理人が閲覧ページに追加するというのは別になくても
構いません。よろしくお願い致します。

>>562
スクリプト探してるならこっちの方がいいカモネ。
こんなCGI探してますスレッド Ver4
http://pc.2ch.net/test/read.cgi/php/1003132904/

>>564
ありがとうございます！また後で聞いてみます。

携帯電話用の掲示板を見てると、ezwebだけ書き込めない所が多いのは何故？

ここにもあったＹＯ！
http://asian.elitecities.com/books/value.html

>567
職場で開いてしまったじゃないか

>>566

奴らはHDMLだから。

CGI(Perl)で作成したビットマップイメージ(BMPファイル、という意味ではなく、
ピクセル毎の濃度情報の羅列、という広義のビットマップ)を、GIFなり
PNGなりに変換して、クライアントに返してやりたいんですけど、
そういうことって難しいでしょうか？

Cとかで書かれたPNGの圧縮ライブラリをPerlに翻訳するのは相当大変そうですが。
WindowsBMP形式で出力するのならPerlからでも簡単に書けますが…。
その辺の方法で、妙案を知ってる方、教えてくださいです。

>>570
GD.pmは？

Fri Feb 08 19:19:16 2002
↑　この日付を
1970年1月1日00時00分00秒からの秒数に一発変換する方法
ないでしょうか…。

すみません、言語はPerlです。

>572
Date::Parseあたりのモジュール入れれば１発でできる。
標準で付いてるTime::Local使って，自分で関数書いても
10行ぐらいでできる（はず）

私は Time::Piece を勧めておくよ

>572
他の環境で動かない可能性高いけど，自作するならこんな感じかなぁ。

use Time::Local;
sub parse_date {
my($time,%month,$sec,$min,$hour,$mday,$mon,$year);
$time = shift;
@month{qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec)} = (0..11);
($mon,$mday,$hour,$min,$sec,$year) =
($time =~ /\w{3} (\w{3}) (\d{1,2}) (\d{2}):(\d{2}):(\d{2}) (\d{4})/);
return timelocal($sec,$min,$hour,$mday,$month{$mon},$year);
}

#以下テスト
$date = 'Fri Feb 8 20:42:33 2002';
$time = parse_date($date);
print "$date\n"; #Fri Feb 8 20:42:33 2002
print "$time\n"; #3096040756
print localtime($time)."\n"; #Fri Feb 8 19:19:16 2002

>>574,575,576
レスありがとうございます。
この時間、人が少ないので助かりました。
>>576
574を読んで、ちゃんと解決してから書き込もうと思っていたら
コードまで書いて頂いてるとは。ありがとうございました。

perlでつくられたチャットを軽量化しようとおもっています。

nphスクリプトとgzipを実装しようとおもっていますが、この二つを導入するデメリットや注意点などありますでしょうか。

gzipを実装。
データ量とのトレードオフでマシンパワーを使う。

>>579
レスthxです。
2chの場合はあまりCPU負荷が増えなかったそうですが、gzip実装する場合としない場合、どちらが鯖に優しいですか？
チャットなので20秒に１度10kb程度のデータです。

Perlの場合、メモリを異様に食うのと速度が遅いのが問題だと思うんだよね。
一番の近道はCで実装する事だと思うよ。

>>581
いっそアセンブラｗ。

>578
前にチャットスレで見た，
ログをHTMLじゃなくてJavaScriptで書き出すってのはどう？

>>581-582
そこまでの力量がない腐れ厨房なんです、すみません(^^;;
でもせめて負荷の高いCGIおくのだったら、かんたん出来る軽量化はやっておきたいなあというわけなんです。

>>583
javascript、検討したんですがカスタマイズがしにくかったり、同期でトラブル微妙にもってたり、何より漏れの脳味噌の処理能力を超えていて(^^;;
にゃかにゃかうまくゆかんです……

ぐーぐるってみてもnphとgzipはとりあえずやっといて損はなさそうなので、やってみますです。

>584
mod_perlとか SppedyCGIのほうが効果あるんじゃない？
普通のチャットなら，プログラム起動に 10かかるとして，処理は 3くらいしかかかってない。
起動時間を縮めたほうが効果的。

sendmailでメール送信したとき
２行目以降の先頭文字が一文字飛ばされてしまうんですが原因不明で困ってます。
日本語だと当然省略された行からjis変換できず化けているようです。
(あ、てことは変換前に何か原因が・・・？！)
いや、変換後に飛ばされてるのかもですが、jcode.plの変換をナシにしても
結果はおなじでした。
誰か助けてください。きっかけをください。

>>585
mod_perlのほうは調べてみて「こりゃー、下手に手をだすと鯖に迷惑をかけてしまいそうだ」と、躊躇していました。

speedCGIのほうは知りませんでした。thx!　ぐーぐるってきます。

>>587
とりあえず、gzipは止めておけ。

POSTメソッドのテストをしたいのですが何か良いツールはありませんか？
例えばttp://www.trusnet.com/secinfo/docs/webprog1/part1-section2.html
のTCP_Scanerみたいなやつ探してます！

>>589
お前、例のbbs.cgiのアレ試したいだけちゃうんかと。

？？？例のbbs.cgiは知らないですが、アレはCSS？
いつもはFreePeekでキャプチャして見てるんですが、これは使えるかなと思いまして。

>589
telnet

携帯でのみ特定の文章(html)を表示させるプログラムがCGIでできるらしいのですが、
ドコで調べればいいのかわからないのでやり方を教えて下さい。

REMOTE_ADDRや HTTP_USER_AGENTを調べる。
あと， HTMLでなら noscriptを使うとか。

>>592
telnetとはめんどいな。
おいらも便利ツールｷﾎﾞﾝﾇ

>>589
見たけど
このようなツールは，プログラミングとTCP/IPについての初歩的な知識があれば作成できる
だとよ！
Delphiで作ったぽいが、持ってても俺は作れん。
googleでも見つからんな。（ｗ

ActivePerl使ってるんですが、
CGIを起動させるたびに、CGItempXXXXXっていうファイルが残るんです。
どうしてですか？

>>588
やっぱgzipはトレードオフでの負荷が高すぎっすか？(-_-;

細かい負荷を検証する方法があればお教え願いたいです。

>592、595、596 さんどうもです。
vectorとか探してもそれらしきものが見つからなかったです。
ってか皆さんはPOSTメソッドどうやってテストしてます？
変数変えるのも面倒で。telnetもTeraTERMとかでマクロ組めば楽なのかな。
もちょっとデバッグの勉強せねば。

引き続きツール情報お待ちしております。

初心者なもので、ちょっとまだわからないです。
PCから来た人に対してはソースも見せたくないんです。
UAを指定すればいいということはわかるんですが、
それは具体的にはどうすればいいのでしょうか？
質問ばかりですみませんが、ご存知の方ご教授下さい。

>>599
POSTメソッドのテストってのが何なのかワカランけど
ヘッダとポストされたデータ見るなら、Proxomitronが簡単便利。
http://www.pluto.dti.ne.jp/~tengu/proxomitron/
↓ こんなカンジ

POST /cgi-bin/test/bbs.cgi HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */*
Referer: http://192.168.1.1/cgi-bin/2chbbs/index2.html
Accept-Language: ja
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)
Host: 192.168.1.1
Content-Length: 148
Pragma: no-cache
Connection: keep-alive
Cookie: NAME=名無しさん
Browser reload detected...
Posting 148 bytes...
submit=%8F%91%82%AB%8D%9E%82%DE
FROM=%96%BC%96%B3%82%B5%82%B3%82%F1
mail=
MESSAGE=%8F%91%82%AB%8D%9E%82%DE
bbs=2chbbs
key=1010920016
time=1012492903

HTTP/1.1 302 Found
Date: Sat, 09 Feb 2002 19:33:57 GMT
Server: Apache/1.3.22 (Win32)
Set-Cookie: NAME=名無しさん; expires=Tuesday, 12-Mar-2002 00:00:00 GMT; path=/
Set-Cookie: MAIL=; expires=Tuesday, 12-Mar-2002 00:00:00 GMT; path=/
Location: ../2chbbs/index2.html
Keep-Alive: timeout=15, max=100
Connection: Keep-Alive
Transfer-Encoding: chunked
Content-Type: text/html

>>599
うぇ、リンク先見たら601とちょっと違うみたい。
ヘッダ自体はProxomitronで自由に送れるけど、
ポストしたいならクライアント書いたほうが…。

PerlかJavaで書いてみ
どっちも100行位で出来るから
俺はPerlで書いて%POSTの値を直接書き換えてる

>601、602、603 さんどうもです。
Proxomitron なるほど、local proxy でフィルタがメインのソフトなんですね。
win板でスレも見つけました。ttp://pc.2ch.net/test/read.cgi/win/1010675673/
落としてみましたが、高機能ですね。これから使ってみます。

100行位．．．どこかにサンプルないですかねぇ…。甘すぎ?

>604
んー、サンプルは荒らしツールだろ　　（笑
漏れのはちょっと変なスイッチとかゴチャゴチャ付いてるんでね
まあ、どっちにしてもまともなパケット飛ばすなら全部Perlで出来るから
やってみれ

１：%POSTにPOSTの内容、%HEADにヘッダの内容
２：%POSTのエスケープ s/([^ \w])/printf"%%%02X",ord$1/eg for(keys %POST);
３：%POSTを連結してlengthを取っておく
４：use IO::Socketしてサーバに繋ぐ
５：ヘッダから順に流し込む

もっともプリミティブなDUKE　　ｗ

Perlなのですが、printfを使って得る出力結果を戻り値として得る方法は無いでしょうか？

例えば、
printf ( "%05d", "1" )の時は00001を文字列として受け取りたいのですが。

>>606

sprintfと言う便利すぎる関数がある。

$a = sprintf ( "%05d", "1" );

後から読み返して日本語がぷーなので補足しますが、
printfによるフォーマット付き出力をprintしないで得る事は出来るか？という事です。

>>607
早いありがとうございました。

>>607
早いレスポンスありがとうございました。です。。(´д`)

>>605
DUKEってPerlDUKEってものなんですね。調べてようやく分かりましたが
つまりは諸刃の剣ってことで、なかなか転がってるものでは無いのですね。
大変参考になりました。Perlもっと勉強しよっと。

gif表示のアクセスカウンタ作ったんですが、ネスケ６でだけ表示がおかしいんです。
画像連結にはgifcat.plというのを使ってます。
他のブラウザではちゃんと表示されるんです。
どうしてですか？

>>612
ソースを見せて下さい。
それとどうおかしいのか説明きぼん。

ありがとうございます。カウンタの本体で画像連結してる部分は以下です。
開設サイトのサンプル通り。
require "gifcat.pl";
binmode(STDOUT);
print &gifcat'gifcat(@files);　　#@fileは1.gif、2.gifなど
あと、gifcat.plはたぶん有名なライブラリだと思いますが、中身は理解してません。
画像には透過gifを使用。画像サイズはすべて統一。
ネスケでの症状は、一桁しか表示されなかったり、
黒文字の背景透過のはずが白字に文字が透過になったりとそのときによって違う。
よろしくお願いします。

>614
その時によって違うという事は、カウンタの画像のうちのどれかに問題がある可能性が高いのでは？
同じ処理をしていて違う結果が出るとしたら、ブラウザなどの不具合か、
「カウンタの特定の数字でその現象が起こる」という可能性が高いと思うのだけれど。
例えば、画像の内、ひとつだけが透過GIFになってなかったりとか。

ありがとうございます。
同じカウント数でもネスケだけ（バージョン6.2だけ）だめでした。
しかし、ブラウザによって挙動が違うのは、ちょっと僕の理解を超えてます。
初心者なのでわからんですが．．。ブラウザにとっては単なるgif画像ですよね？？
今気づきましたが、html内のimgタグで参照しているときは崩れた一桁、
cgiを直接ブラウザで実行した場合は全桁表示で同様に崩れています。
うーわからん。よろしくお願いします。

NN6は使ってないからよくわからないけど、「アニメーションをオフにする」とかなってない？
IEだとアニメーションオフだと表示されないんだけど、関係ないかな？

>>612
gifcatの冒頭に
;# アニメGIF同士を連結することはできません。
;# アニメGIF対応のブラウザでなければ、最初の画像しか表示されません。
;# 高さの異なるGIFファイルは連結できません。
と記されているけども上記三点は確認した？
俺も>>617さんと同じ意見です。
まあネスケはユーザー少ないんだからIEで動けばいいんじゃねえのヽ（´ー｀）ノ
なんちて。お役に立てなくてスマソ。

それとどうしてもダメだったらgifcat.plを使わなければいいじゃん。
ちょっと（かなり）動作が遅くなるけど、一桁ずつCGIで処理する方法とか。

ありがとうございます。なんだかやたら重いですねここ。
アニメはしてないんですけどね。
imgタグひとつでやりたいんですが、ばらばらの複数桁表示することってできるんですか？
うーむ、不勉強なもので、どうやるんだろう。

なんか日本語おかしかった。
imgタグひとつでcgi呼び出して、ばらばらのgif画像を表示するのは無理ですよね？？
桁数分のimgタグ書かないとだめですよね？
うーん、それはめんどくさいなあ。全部で10個くらいカウンターあるし。
4桁でも40個タグ書かなきゃならんのか。

>620
gifcat.plはアニメーションとして扱われている。
俺も理屈は知らないが、とにかくブラウザは「アニメーション」として認識している。
元の画像がなんであれ。
だから、アニメーションをオンにしておかないと表示されない。

バラバラ複数表示は、1/10000、1/1000、1/100、1/10、1/1の桁の数字をそれぞれ表示させればいいだろう。
IP取るか何かで重複カウントをしないようにして。

重いのは攻撃受けてるかららしいぞ。
ttp://mentai.2ch.net/accuse/

>621
IMGタグを書くのをめんどくさがるような奴は、プログラミングに向いてない。
あきらめろ。

何かNNでそんな問題有るってのは前に聞いた事あるぞ
取り合えずファイル変えて何個か試してみれ

# GDで吐き出せって解が無いのはネタか?

なるほどなるほど。gifcatはアニメーションなのか。
でも、他のアニメgifは表示されてるし．．。
取り敢えず、画像変えてみます。

攻撃されてるんですか。攻撃してる暇あったらimgタグ40個でも書くっちゅうのに。
とりあえず、ありがとうございました。GD、調べてみます。

パレットは同一か？

newsproを設置したいのですが、どうすればいいのかさっぱりわかりません。
どなたかnewspro設置に関する解説の載っているHPなど、ご存知の方はいらっしゃいませんか？

>623
ずらっと並んだIMGタグ見て悦に入ってるヤツはプログラミングに向いてない。
>612
いかに少ない手間で望んだ処理を実装できるかがプログラマのセンスだ。
頑張れ。

>628
望んだ処理を実現できなかった時に別の手段を考えられない奴もプログラマにむいてないと思うぞ。

File Upload CGI Second Editionを設置したら、一部ファイルが削除できなくなってしまいました。
削除方法を教えてください。
掲示板も潰れてて質問もできないです。
http://homepage1.nifty.com/~heppoko/
↑ここで配布してます。

プログラマに向いていない度
>>612＞＞＞＞＞＞＞＞>>628＞＞>>623
>>628
＞いかに少ない手間で望んだ処理を実装できるかがプログラマのセンスだ。
少ない手間で済まそうと、CGI.pmを多用して鯖に迷惑をかける人の発言っぽいので減点。
>>629
激しく同意
>>612
タグのたかが40個も書けない奴はJAVAを書くとしたらハローワールドしか
書けません。逝ってﾖｼ

削除用CGIスクリプトを見つけて自己解決です。
また質問するかもしれないのでよろしく。

>>630
File Upload CGI Second Editionというのを設置した事がないんだが、
FTP（か付随のファイルマネージャ）を使って削除すればいいんでは？
其れとも、それ自体ができないのか？　関係ないならスマソ

>>633
CGIで負荷をかけつつファイルをうｐするなんてナンセンスだよね。
FTP使ったほうが数倍まし。
実際そういうスクリプトってプログラマが自己満足（勉強）のためだけに作成
してるパターンが多いと思う。。

>>634
20-21番ポートが閉じられている教育機関がどれだけ多いか考えたこと無いだろ？

インターネットへのゲートウェイとしてHTTPプロキシしか用意されていない環境とか想像したこともないだろ？

FTPでも負荷はかかるって驚愕の新事実だろ？

自分の世界だけで人をバカにしないように。

>>635
"設置したら"っていってるんだからFtpで設置したんでしょ

>>635
別にバカになんかしてなぃょぅ。。
実際漏れは自己満足だけのためにアップロードcgiを作成中だから
言ってみたんだよ。ｺﾞﾒﾝﾈ。

>>612
gifcat.pl使って同じ問題発生してるよ。
透過gifを使った場合にグチャグチャな表示になる。
透過gifじゃない場合は最初の一桁が黒くなる。
とほほのページも後者になってるから、たぶんgifcat.plの問題っぽい。
全然解決策じゃないけど、透過gifを止めて桁数を1つ多くしとくとか。

すみません。教えてください。
ＳＳＩのような感じで外部htmlをcgiのページに入れることって可能ですか？
ちなみにshtmlに外部htmlだと「#include」を使います。
こんな感じにcgiのページに取り組むことって出来るのでしょうか？
よろしくお願い致します。

>>639
CGIにそのような機能は無いが、
CGIスクリプト自身で実装は可能。

ありがとうございます。
やっぱそういった機能はないんですか。

＞CGIスクリプト自身で実装は可能。

たとえばどういった方法ですか？
重ねて質問でスミマセン・・・。

HTMLファイルをオープンしてプリント。

>>642
うーんやっぱそれしかないですかぁ。
いろいろありがとうございました。
勉強になります。

17ｽｸﾘﾌﾟﾄで作った掲示板をリスト表示するスクリプトをかいて下さい

>644
みかえりは？

http://www.wired.com/news/business/0,1367,42276,00.html
みたいなこんまつきURLは、どういったシステム（？）を
使ってるときのURLなんですか？

>>646
開発者の趣味じゃないの？

>>631
>少ない手間で済まそうと、CGI.pmを多用して鯖に迷惑をかける
この部分、詳しくキボンヌ

WindowsでＣＧＩチェックするには何使ってますか。
anhttpd使ってたんだけど、だんだん重くなって困る。win98se
ってことでapache入れてみたんだけど、サーバーにＰＵＴするときは１行目は
絶対書き換えなきゃならないの？

>>648
>>631じゃないが
CGI.pmはメモリを食う(といってもても1MB程度だが)のだ。
それにコンパイルにもかなり時間がかかる。これCGIスクリプトとしては致命的。
自鯖やmod_perlならともかく、共用鯖で使用するのはお勧めできない。

　　　 ／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　CGI.pm、素人にはお勧め出来ない。
　　 ＼|　　　＼＿/　／　　＼＿＿＿＿
　　　 　＼＿＿＿_／

CGI.pmの機能のうち、URLデコードしか使わないのなら、おなじみのコードのコピペかcgi-lib.plで十分だよな。

>>652
得意げな顔して何がコピペかcgi-libだよな、だ。
お前は本当に分かっているのかと問いたい。問い詰めたい。小一時間問い詰めたい。
まぁ普通はCGI::LiteかCGI::Minimalでも使ってなさいってこった。

>>653
しかし事実だろ。

質問質問！
http://pc.2ch.net/test/read.cgi/php/1003132904/928で発言したんだけど、cgiってphpの変数出力ってできるのかな？
ちょっとcgiのこと（仕組みとか）わからないんだけども、cgiはphpの実行権限がないのかな、とか思った。かなり的外れっぽいけど

URLデコードもファイルのアップロードも、もう汎用のルーチンが
出そろっているにもかかわらず(しかも、俺専用サブルーチン化も終わってる)
CGI.pm使うメリットってあるのでしょうか？

>>649
httpd.confで
ScriptInterpreterSource registry
というところを探してみな。
せっかくだからapacheスレも読んでおけ。ためになるはず。

>>656
メリットがあるか否か、と問われれば"ある"だろうよ。
param()を初めとしてquery_string()、header()、self_utl()、cookie操作といったメソッド群は捨てがたい。
ただそれに伴うデメリットが大きすぎるように感じるので俺は自作のを使うが。

どなたか教えてください。
あるドメイン上で食べさせたCookeiを全く違うドメイン上で有効にさせることってできるんですか？

>659
DNSのセキュリティホール使ってなりすましましょう。

>660
そうゆう問題になってしまうんですか．．．。
要するに別々の違うドメイン同士でシングルサインオンを実現したいんですけど、
何かやりかたありますか？

あのね、Cookieがそんなことが簡単に許したらさ、サイトに来る
やつのオンラインショッピングやバンキングのIDとパスワードを
getしようとする輩の片棒を担ぐことになりませんか？

>661

print <<HTML_SOURCE;
<HTML>
<HEAD>
　<TITLE></TITLE>
　<META http-equiv="refresh" content="0;URL=目的のドメイン">
</HEAD>
<BODY>
　<INPUT type="HIDDEN" name="id" value="id">
　<INPUT type="HIDDEN" name="pass" value="pass">
</BODY>
</HTML>
HTML_SOURCE

とりあえず移動はできたけど？

両方ともSSL内で、最初のドメインでログインした情報、でなくてもいいんですけど、
「どっからのリンクか」とかIDとかをCookeiにのこして、
移りたいドメインの方でそのCookeiを認識して、
そのままログインできないかってことなんですけど、
やっぱり無理なものですか？
突拍子もないこと言ってたらすみません。

>>638
めちゃめちゃ遅レスですが、gifcat.plの件、ありがとうざいます。
gifcat.plの中身を勉強してみます。

結局、Cookie と ビスケットの違いは何なんでしょうか？

このままでは のどが乾きすぎて食べることができません。

CGI.pmのコンパイル時間ってそんなに気になるものか。
そうなると、他のモジュールもつかえねーなぁ。
まあおれも自作のCGI::*作ってるけど。

>>667
コンパイル時間よりモジュールの能力や使用目的と
メモリの消費量との比較の話だと思うぞ。
デコードしたいだけで使うな、しかも共用鯖で。って話。
かといってすげー高機能なことをしたいし実際
するモジュールなのでメモリくいますって言われてもウザいけどな。
結局は「共用鯖でメモリくうな」って話か。@data=<IN>と一緒で。

http://www.ace-cgi.jp/
↑のニセビンゴゲームEXと言うのをDLして、鯖にUPもしたんですけど、
説明が不十分すぎて全然わかりません。
これはどういうタグを打ったら、HPに表示されるんですか？
そして、説明にはビンゴの一日に発表する数字が変えられるとか書いてあるけど、
CGI初心者なのでどこを書き換えればいいのか全然わかりません。
質問メール禁止ってかいてあるけど、あんな説明じゃ全然わからないので、
メール送ったらやっぱり無視されてるし・・・。
もう2chでしか解決する手段がないんです。
どうかよろしくお願いします。

sendmail等が使用出来ないサーバではご利用頂けません。
ってかいてあるよ

>>669
アンタが何をしたいのか、説明が不十分すぎて全然分からない。
> これはどういうタグを打ったら、HPに表示されるんですか？
どういう意味？

>>669のサイトより引用

> このようなホームページを運営していると、色々な方からメールを頂きます。
> 励ましのお言葉やお礼を言ってくださる方。本当に嬉しく思います。
> このようなメールを頂ける為、私の場合は結構恵まれていると思います。
> しかし、本当に「常識あるの？」という人も非常に多いのです。
> まったく知らない人にメールを送る場合、普通は「送っていいものか」考えませんか？
> たとえば、「○○についてのメールはお断りします」「メールを頂いても返信致しません」等、注意書きがないかをよく捜してからメールするのが普通ではないでしょうか。
> 私のＨＰには、あちこちに「サポート目的のメールはお断りします」と書いているのにも関わらず、沢山のサポートメールが届きます。
> 性格的に、来たメールに対して無視する事が出来ずにそれなりの返答をしておりました。が、きりが無いので今では返事を出す事を辞めました。
> 文面が丁寧であればまだ我慢も出来ますが、礼儀も何もあったものではないメールも多いです。
> 「うまく行かないんですけど〜どうすればいいの？」「パーミッションってなに？」
> 突然知らない人にこんな口調でものを言っていいもんなのか、、、、

>>669
これでもメールを送るとは、お前相当な厨だな。

>>657
ありがとうございます。勉強します。

HTML::Template に変わる軽くてイケてる Template モジュールないかな。
いままで、平気で HTML::Template 使ってたが、なんだか馬鹿でかいモジュール
は迷惑らしいんで。

>>674 自分で作っちゃえば？

biglobeでapebord+を使おうとしているんですけど、
うまく行かないので教えて下さいませ。

とりあえずapeのオンラインマニュアルに従って設定して、
鯖にあげ、パーミッションもそこに書いてあるとおりに変更しました。

それからapebord_p.cgiにアクセスすると
Forbidden　
Your client is not allowed to access the requested object.
と出てしまいます。

cgi自体の設定は何度も見直したので間違いはないと思います。
サーバメッセージからやはりパーミッションに問題があるのでしょうか？
鯖によって別のパーミッションを設定した方がいいのでしょうか？
また実際にbiglobeにapebordを設置している方がいらっしゃったら
アドバイスを下さい。

Your client is not allowed to access the requested object.
って、エラーが出てるでしょ。
許されてないわけよ。ようするに。

>>766
つまりはビッグローブではエイプは使えないと言う事ですね。
アリガトウございました。
諦めがつきました。

>>678
ディレクトリのパーミッションは大丈夫？
http://kingdom.biglobe.ne.jp/help/secstabl.html

>>665
とほほのサイトにはこう書いてある。
> ・Netscape 6.* では、一番最初の桁がうまく表示できないことがあり
> ます。→ 一番最初の画像の大きさが全体と異なる場合に表示がおか
> しくなるという、ブラウザ側のバグが原因だと推測しています。

>>679
あれ？ディレクトリにパーミッションなんてあったんですね。
ありがとうございます。試してみます。
後ほど報告します。

ちなみに679さんはビッグローブでapebord使ってるんですか？

調べたところディレクトリのパーミッションはＯＫでした。
しかし、ダメでした。

なんか、掲示板本体のcgiを755、
jcode.plを705に設定しなければならないんですけど、
片方を755にすると、もう一方も755になってしまうという現象がおきます。
逆に705にしても同じです。
なんなんでしょうか。
とりあえずもう少しイジッてみてダメなら諦めます。
677さんと679さんありがとうございました。

C++でCGIを組みたいのですが、
それに関する良い参考書って無いですか？

>>683
必要ない。

環境変数の取得の仕方。
標準入力からのデータ取得。
標準出力へのデータ出力

ができればいい。

Perl用の参考書を軽く読めばできると思われ。
CGIの参考書と言っても中身はほとんど言語の使い方。

２ちゃんねるのような
フロート型掲示板を設置したいのですが
軽い物有りませんでしょうか？
megabbsはiswebでは無理でした。

>>685
規約に２ｃｈ型掲示板の禁止と無いか？
軽い重いは問題ではない。

そうか！
規約読んでなかった！
megabbsはレス出来ても
スレ立てられなかった

インターネットショップのための
ＣＧＩ＆JavaScript（アングラーズネット）
という本にのっている
買物カゴのプログラムを見ているのですが、
最初のところがさっぱりわかりません。
クッキーを取得して１行ずつに名前をつけているようなのですが、
そのあとcount1 から count7 まで
数字をつけています。
これが、何を意味しているのか知りたいのですが・・・

>>688
ソースも見せずにまぁ・・・。

>688
その本ボクに買ってくれたら教えてあげるYO!

>>688
まあ待て、お前の態度次第では教えてやらんでもないぞ。
WinMXでオレ様にエロゲーを3、4本落とさせろ。そうすれば
教えてやってもよいぞ。

エロゲーありませんが・・・

$count1= 0;
$count2= 0;
while ($count1 <= 50 ){
$xx= @kazu[$count1];
&trans;
@kazu[$count1] = $xx;
if (@kazu[$count1] ne "") {
$H = 1*@kazu[$count1];
if ($H >= 1) {
$count2++;
$datareg1{$count2}="@shouhinnumber[$count1]*@shouhinmei[$count1]*@bikou[$count1]*@kakaku[$count1]";
$datareg2{$count2}="@kazu[$count1]";
}
}
$count1++;
}

foreach (split(/; /,$ENV{'HTTP_COOKIE'})) {
($key,$value) = split(/=/);
$count1= 1;
while ($count1 <= 20){
$shouhin = "shouhin$count1";
if ($key eq $shouhin) {
$shouhin{$count1}= $value;
@data = split(/::/, $shouhin{$count1});
$data1{$count1} = @data[0];
$data2{$count1} = @data[1];
}
$count1++;
}
}

スミマセン。行がそろってしまいました。再度

$count1= 0;
$count2= 0;
while ($count1 <= 50 ){
$xx= @kazu[$count1];
&trans;
@kazu[$count1] = $xx;
if (@kazu[$count1] ne "") {
$H = 1*@kazu[$count1];
if ($H >= 1) {
$count2++;
$datareg1{$count2}="@shouhinnumber[$count1]*@shouhinmei[$count1]*@bikou[$count1]*@kakaku[$count1]";
$datareg2{$count2}="@kazu[$count1]";
}
}
$count1++;
}

foreach (split(/; /,$ENV{'HTTP_COOKIE'})) {
($key,$value) = split(/=/);
$count1= 1;
while ($count1 <= 20){
$shouhin = "shouhin$count1";
if ($key eq $shouhin) {
$shouhin{$count1}= $value;
@data = split(/::/, $shouhin{$count1});
$data1{$count1} = @data[0];
$data2{$count1} = @data[1];
}
$count1++;
}
}

厨でスミマセン。
行頭を下げて、投稿する方法がわかりません。
あきらめました。とほほ。
ご迷惑をおかけしました。

著作権的に問題ないのか？
市販の書籍のコード晒すの。

配列要素の参照に@…？まさかッ！Perl6のコードかッ！

>>696
偶にいるんだよね、こーいうことしちゃう奴。
んでもスライス扱いになるから、意図した動きになるみたいよ。
だから、こーいう書き方したいなら、

($scalar) = @list[1];

とかって書いた方が気持ちよいけど。

>>692
そのソースだと，これくらいしかわからなかった。
@kazuを処理して， %datareg1と %datareg2に結果を入れてる。
そのあとクッキーを読んで，%data1と %data2に結果を入れてる。

改行を含んだ変数($tegami)があるんですが、
この変数を1行毎に処理したいのですがどうしたらいいのでしょうか？
while とか foeach とかでやろうと思っているのですが分かりません

>>699
while($data ne "")
{
$data =~ s/(.*?)\n//;
push(@data,$1);
}

>>700
ごめん。

$data -> $tegamiで。

>>700-701
速レスありがとうございました！
無限ループさせてしまっていました、、、
助かりました

>>700
役に立ったかな？

$data =~ s/^(.*?)\n//;

の方がより良いかも。

foreach ($tegami =~ /([^\n]*?\n)/g) {
　　chomp;
$_ ...
}
とか

A子さん　　　はじめまして
B子さん　　　どうも
A子さん　　　どうも

こんな感じでログファイルに保存してあったとして
B子さんの発言のみをログファイルから読み込んで
表示するにはどのように記載すればよいのでしょうか？

open(OUT,"$logfile");
while(<OUT>){
@log=split/\t/;
if ($log[0]=B子さん){
print @log;
last;
}
}

かな？

>706
それだと、if文のところで、$log[0]がすべてB子さんに書き変わる。

>706
そして、それだと、Ｂ子さんが一回でてくるとそこで終了してしまう。

>706
さらに、openしたOUTはいつクローズしてもらえるかとうずうずしている。

あれ？そうですか？
じゃぁ
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0]=B子さん){
print @hoge;
exit
}
}
でどうですか？

B子さんが一つ以上あるなら
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0]=B子さん){
print "@hoge\n";
}
}
で

>710
だから、そのif文だと
もし($hoge[0]にＢ子さんを代入できたら)｛@hogeを出力して実行終了}
だろ？
@hoge[0]にＢ子さんを代入することを阻害する要因が何一つこれっぽっちもない以上
一行目の配列で終了だよ。

>711
いつ気付くんだろ・・・・

B子さんが一つ以上あるなら
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq B子さん){
print "@hoge\n";
}
}

こうか？

>714
そうだ

「closeしろ」の意味を取り違えてる、とか
B子さんをクォートしなくても良いンか、とか。

open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] == "B子さん"){
print "@hoge\n";
}
}
これでも良し？

んで、俺ならこうする。

open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file) {
@hoge = split(/\t/,$_);
if ($hoge[0] =~ /Ｂ子さん/) { print $_; }
}

>>717
文字にはeqじゃないの？　==でどうなるかわからんけど。
foreach内単に

print if (/^Ｂ子さん/);

ではダメなのだろうか？

OUTって名前が気持ち悪いのは俺だけ？

>717
それだとどうかしらん。

>719　
ぜんぜんおっけーっしょ？

そういやなんでOUTなんだ？普通INとかそれ系だろ。

open IN, "<$logfile" or die;
while(<IN>){
print if /^B子さん\t/;
}
close IN;

>>706-723
こんない沢山のレスありがとうございました。
参考にさせて頂きます。

こんない×
こんなに○
すいません間違えました。

度々すみません。
追加の質問で
B子さんの名前の場所と
コメントの場所を調整するにはどうすればいいのでしょうか？

B子
どうも

こんな感じです。

懲りずに挑戦
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq "B子さん"){
print "$hoge[0]<br>$hoge[1]<br>";
}
}
又は
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq "B子さん"){
@hoge=~s/\t/<br>/g;
print "@hoge<br>";
}
}

でどうでしょ？

>>727
脳内で完結しないで試してから書き込むように。
#!perl
open IN, "<$logfile" or die;
while(<IN>){
if(/^B子さん\t/){
s/\t/<br>\n/;
print;
}
}
close IN;

>>728
s/^(Ｂ子さん)\t/\1<br>\n/;

s/Ｂ子さん/Ｂ子ﾀﾝﾊｧﾊｧ(;´Д｀)/eg;

>>730 コンパイルエラーやんけ

>>729
その場合は\1じゃなく$1奨励な。

>>732
あ、ほんとだ。
外で\でも通っちゃうのか

もしよろしければ教えてください。

文字列を保存ファイルから読み出して、１文字ずつに区切りたいのです。split(//,$aiueo);
半角文字(1とかa)は成功するのですが、全角文字(１とかＡ)が保存されているとその部分だけ文字化けしてしまいます。
どのようにすればうまくいくのでしょうか??。

>>734
だって全角文字って２〜３バイトだし(EUC,SJIS)。
JPerl使うって言ったら怒られるだろうなぁ・・・。

なんかマルチバイト関数とかってなかった？

>>734
Perlメモにそのままのがあったよ。
www.din.or.jp/~ohzaki/perl.htm#JP_Split

それともUTF-8使ってみるとか。

#utf8プラグマを使ってみるてすと。
#このソースの文字コードをUTF-8にすること。
use strict;
use 5.6.0;
use utf8;
use Data::Dumper;

my $str = "あいうえおabcde";
my @strs = split "" , $str;

print Dumper @strs;

結果
$VAR1 = 'あ';
$VAR2 = 'い';
$VAR3 = 'う';
$VAR4 = 'え';
$VAR5 = 'お';
$VAR6 = 'a';
$VAR7 = 'b';
$VAR8 = 'c';
$VAR9 = 'd';
$VAR10 = 'e';

とりあえずは成功。でもほかのファイルから文字列を取り出して処理する場合はどうなるか・・・。

> 734
環境は？ 文字コードは？ それがないことには答えようがないYO!

質問すみません。

投票ボタンを押すとカウントが1増えると言う感じの
CGIを作るにはどう記載をするにはどうすればよいのでしょうか？

1番簡単な記載の仕方を教えていただきたいです。

>>739
#! /usr/local/bin/perl

open(DATA,"dat");
$count = <DATA>;
close(DATA);

open(DATA,">dat");
print DATA $count++;
close(DATA);

print "CONTENT-TYPE:text/plain\r\n\r\n$count";

>>738
Perl5です。
jcode.plを使って、EUCに統一しています。

ご迷惑をおかけしてすみません。（初心者）

>>740
740様ご教授ありがとうございます。

宜しければ

フォームの中身が
name=普通
name=簡単

ログファイルの中身が
普通 1
簡単 2

のような形になるような記載の仕方を教えてください。

度々すみません。

ついでに投票率もわかるようにして頂けると
助かります。

>743
投票率ってなんだよ。対象分母がわからないのに、なんでそんなもんがわかるんだよ。
と、おきまりの煽り文句入れて於いて。
得票率は、全体の件数と選択項目あたりの票とのかねあいだから、
表示ルーチンで逐次計算する必要があるね。
データを集計するルーチンで逐次カウントするか、集計時にあらかじめ、分子と分母
作っておくか選択するわけだね。

>742
その質問は、Web制作板ずら。

最初から、
<input type=radio name=name value=1>普通<BR>
<input type=radio name=name value=2>簡単<BR>
にしたら？

http://px.a8.net/svt/ejp?a8mat=BZGKH+96FLIQ+1I6+5Z6WX
↑と↓どっちのサイトがいい？？
http://px.a8.net/svt/ejp?a8mat=C17UJ+8D9CVM+A0+1NJRXD

>746
ブラクラ

744様,745様
ほんとに単発質問申し訳ございません。
書き込んだ後に気がつきまして対処ができなくどうしようか困っていました。

#! /usr/local/bin/perl

open(DATA,"dat");
$count

......
のやり方をコピペでためしたらDL状況になってしまいました。
どうすれば動作が可能になるのでしょうか。。。

>749
シェルから、which perlとして、Perlの在処を調べる。
また、cgiが実行可能かどうかも調べる。
さらに、httpd.confで、perlをexecにしなければいけないかどうかも考える。

大変だね。

750様
レスありがとうございます。
フォームにしてみたらできました。

しかし、カウントされません。

ここ見てるかぎりじゃ何もせず他人にコード書かせてるようにしか見えないのだが。

>752
ｿﾚﾀﾞ！(◕ฺ∀◕ฺ)

ほか行きます。

すんません、このアクセス解析なんですが、
ttp://www.din.or.jp/~himura/at-works/access/access.html

@niftyで動かしてる人います？replist.cgi?checkでは全部OKと表示される
んですが、パスワード打って解析結果表示させようとすると500エラーが・・。
main.htmlをmain.plにしたり、homepageディレクトリに置いてみたりと

色々やってみましたが、何度やっても「500 内部サーバーエラー」っス（;´Д｀）
パーミッションや転送モードを何度も確認してみましたがダメでした・・。
ちなみにkentさんの「Access Repport」はちゃんと動くので、この改造版の
main.htmlが原因なんでしょうか？サポート掲示板閉鎖してるしもうお手上げッス・・
どなたかご教授ください・・。

>755
それはきっとあなたの設定ミス。
そうでなければ、バグがあるスクリプトを配布している。

携帯用サイトの掲示板を作ってるんですが、
漢字コードは何がいいんですか？
携帯会社によって違うんですか？

>>757
SJIS。

ありがとうございます。常識ですか？
解説サイトご存知でしたら、よろしければお教えください。

>>759
検索。

>>756
ありがとうございます。マジすか・・もう一度確認してみます。
サーバー別の解説みたいなのに@niftyもあるんですが・・niftyじゃ
無理なのかなぁ・・

>760
掲示板できました。ありがとうございます。

素朴な疑問なんですが、転送ＵＲＬ（www2.to）を使っていて
さらにアクセス解析をつけてます
普段リファラで引っかかるアドレスは、当然転送ＵＲＬのアドレスなのですが
たまにリンク元のアドレス（もちろん転送で貼ってもらってる）が引っかかる場合があるのです
もし原因が分かる方がいらっしゃいましたら、
教えていただけないでしょうか…
よろしくお願いします。

あ、ちなみにアクセス解析はレンタルの物とat worksさんのもの
それからTacky's Roomさんの物で同じ結果が出ましたです

>>763
IEはたまにrefferを取りこぼしたりすることがある。

>765
さっそくありがとうございます。
でも今見てきたところ、そういう風に引っかかってるのが
Netscape 4.〜の方のようなのです
６の場合は普通に転送アドレスで来るようなのですが…

ホームページでフォームに入力した内容をメールで送るってやつレンタルで使ってるんですけど、たまにいたずらメールが来るんです。
送信元IPはわかるんですけど、送信元のメールアドレスもわかるっていうCGIを無料でレンタルさしてくれるサイトがありましたら教えてもらえませんでしょうか。

>>767
冷静に考えろ？
お前のメールフォームにはメールアドレス書く欄があるか？
書いてもいないものをどうやって送信するって言うんだい？

>>768あります。でも嘘かかれたらそれでおしまいなのれす。かかないでわかる方法ないでしょうか？
たとえばメールソフトを間接的に使用するっていうCGIとか

レンタル探してるなら板違い

>>769
サーバーサイドで動いてるのにクライアントのメールソフトを制御できるの？
セキュリティホールってやつじゃあ。。。

>>768
メーラーを使う？それなら簡単。

<form action="mailto:[email protected]">

</form>

>>771
すくなくともサーバ側でクライアントの環境をいじりたいとか
思う人って他人のプライバシとか全然関係なしって感じが伝わっ
てくるよ。
そこまでe-mailを確認したいのなら、パスワードで入れないように
して、希望者にメールでパスワードをいれるように全体を変更したら
どうよ。

複数ファイルと文字列を同時にアップロードするcgi作りたいんだけど、データをどう切り分けるか悩んでる。
一行ごとにやるのはだるいから、なんか上手い方法ないかな。

教えて〜！！

↑あ、ＣＧＩ．ｐｍとかは使う気ないからよろしく。

↑あ、教える気ないからよろしく

777げっちゅー

↑意味ねーぢゃん。うせろ！


でもナイス突っ込み(w

http://www.kankyo.metro.tokyo.jp/cgi-bin/tokyokh/bunpu1/p101.cgi
↑こういうのを作りたいのですが｡
データベースの数字と画像の矢印がリンクしていて，「次の時間へ」を押すと、画面が切り替わる｡
どんなプログラム言語やソフトを使えば、できますか？

>>774
よく考えて好きなセパレータ使え。

>>779
まずはHTMLの勉強だ。クリッカブルマップ。サーバサイドとクライアントサイドがあるからどちらもな。

>>779
自分でサーバー用意するならなんでもいいけど、
数あるサーバーで動くのはperlだろうな。

ActivePerlと、WinならAnHttpd、あるいは適当なhttpd、
あと、とほほのperl入門を読め。

>>782
誤爆ですか？

>780
デリミタ？

掲示板のスクリプトです。

ローカルのanHTTPdでは、IEでもNNでも正常に動くのですが、
トクトクサーバーにアップすると、NNでは「モジュール違反です」という
表示がでて、オチてしまいます。

IEでは正常です。

どんな原因が考えられますでしょうか。
IEでは全然平気なのですが。

ローカルで動かしてるかぎりはそうはならないのですが。

あげさせてください。

>>785
広告込みのHTMLが変過ぎる。とか。

>>787
Perlのせいではなかったです。
言われてぴぴんときてjavascript Offにしてみたら動いた…。

ローカルでは動くんだから広告が悪いのかなぁ。

どうもすいませんでした。Javascriptと判ればスレ違いです。
ありがとう。

とあるゲームCGIの説明(?)か何かに、
ログファイルをバイナリデータにしたので処理が速くなった
というような事を書いてあったんですが、
実際にテキストよりもバイナリの方が処理が速いんでしょうか。

>>789
たとえば3という値を保存するとする。

テキストで3を保存すると6bitかかる。
バイナリで3を保存すると2bitですむ。
（これを言うとintは32bitじゃあとかお叱りを受けそうだけど）

後、コンピュータはバイナリでしか数値計算ができないので、数字のテキスト-＞バイナリ変換作業が必要になる（Perlは裏でやってくれる）。

ttp://www.din.or.jp/~himura/at-works/access/access.htmlとか
ttp://dream.lib.net/room/cgi/e_analize.html

この二つはJavaScript有効になってないと解析してくれないんですか？
JavaScriptオフでもログ取ってくれるやつってないんでしょうか？
ちなみにSSIは使えないサーバなんですが・・無理ですか？
kentさんのやつはオフでもリンク元以外は取ってくれるみたいだけど・・
上の二つもそうですか？

Strictなんで<noscript><img〜ともできないっス・・。

>>791
ログは取れる。reffererが取れないだけ。
Javascriptで生成している部分をHTMLに直接書けばいい。
その代わりreddererはあきらめる。

>789-790
そういうこととは別に、ログをバイナリハッシュに変えれば、テキストのログよりも
かなり高速化する。
dbm使うっていうのが近似値だけど。

>>793
質問者でも回答者でもないんだけど、
ログをバイナリハッシュに変えるってどういうこと？
ハッシュのキーをバイナリにして短くするってことなの？
でもハッシュっていうぐらいだから長いキーでも短くなってんだよね、内部的には。

おもしろそうなのでもっと教えて。

>>794
＞でもハッシュっていうぐらいだから長いキーでも短くなってんだよね、内部的には。
長くなるならまだわかるが。

>794
最も簡単に説明するとしたら、テキストのログっていうのは、改行ごとに区切られて
@LINEな配列にシリアルに読み込まれ、並んでいるわけ。
対して、バイナリハッシュは、保存されたデータ構造が%HUSHな状態(連想配列)
にあるので、tieまたはdbmopenで開いたときに、すでに%HUSHな状態として存在できる。
それはちょうど、アナログレコードとCDのような違い。
@LINEから任意な部分を取り出すために必要な労力と、
%HUSHの任意な部分にアクセスするのには、明らかな速度差があるってわけ。
データ件数や扱うデータの質によって様々だけど、使い分ければ速度的に差が出てくるね。

>>795
うそおん。
ハッシュって長い文字列（ハッシュ配列のキー）とかを不可逆的に圧縮して、それをキーにするにゃないの？
チェックサムみたいなCRCみたいな。（違うけど）。

>>792
レスありがとうございます。いや実は、上にも書いた
ttp://dream.lib.net/room/cgi/e_analize.html　これ設置
してみたんですが、JavaScript有効にしていないとログ取らないん
ですよね・・カウンター機能使ってないからなのかな・・

b1=new Date();
a1=window.screen.height;
a2=window.screen.width;
a3=window.screen.colorDepth;
a4=window.document.referrer;
a5=b1.getTimezoneOffset();
document.write("<img src='./hana.cgi?wh="+a1+"&tz="+a5+"&ww="+a2+"&cd="+a3+"&ref="+a4+"'>");

これなんですが、スクリプトのカウンター機能使わないとログ取れない
とかなんでしょうか？それは関係ないですか？

>>796
インデックスをつくっとく、って感じでいいんだよね・・・？
掲示板のログだとしたら、書き込み番号がキーになるのかな？

>797
一般に、gdbmにしろndbmにしろ、tieで作ったデータは大きくなるよ。
圧縮されてもいません。
直接そのファイルを覗いてみるといいです。

>799
その辺はCGI設計者の好みと用途でいいと思いますよ。

やっぱダメっス・・JavaScriptオンにしないとログ取って
くれません。外部ファイルにしてるからですか？
ttp://www.din.or.jp/~himura/at-works/access/readme/index.html
こっちのでも同じでしたヽ（;´Д｀）ノ

PATH_INFOを参照するCGIをperlで作ったんですけど、
interQのCGIサーバーに設置してみたら動かないって報告を受けました。
ファイルが見つからないってエラーです。

調べてみたら、ユーザが設置したCGIを呼び出すための上位CGIが存在していて
こいつがPATH_INFOに当たる部分をファイル名だと決め付けているようなんです。


こういうことをしているところはよくあるんでしょうか？
対策はありますか？

他のCGIサーバーを使うか、
PATH_INFOを使わないように修正するくらいしかない気がするんですけど。

今までUNIXでPerlを使っていて問題なかったのですが、NTサーバ(Jperl)ににしてからファイルオープンができなくなりました。
(具体的にはファイルが開けない。それ以外は普通に動く）
改行コードもwindowsにあわせました。
何か考えられる問題はないでしょうか？

>803
オーバーライドするCGIはよくあるよね。
CGIに限らず、SuEXECでも、そういうことは出来そうな感じがするな。
CGIで自由度が高いことがやりたいんだったら、やっぱりそれなりのサーバを使うしかないと思うよ。
管理人のスキルと度量でだいぶ違うから。

>804
いっぱいありすぎる。
ActivePerl＋jcode.plじゃだめなの？

>806
レンタルサーバの為、環境は選べないです。
サーバ側の問題もありえるとは思えますけど。。

>>805

そういうサーバーが沢山あるようなら修正しなきゃいけないかなー、とか思ってたんですけど
とりあえず今のまましばらく様子見してみます。

データファイルをサーバー上に置いておき、クライアントから
ブラウザで抽出条件を指定して、結果をテキストファイルとして
ダウンロードするようなCGIをperlで作りたいのですが可能ですか？
画面に出力するのは当然のように可能なので、できそうに
思っていろいろ調べてるのですが、ヒントにめぐり合えません。
Content-typeをどうにかしたらいいような気もするのですが･･･
何かヒントでも教えてもらえれば助かります。

>809
多分できない。
スクリプトの中で、一度gzなんかに圧縮して送るといいと思う。

>>810 ↓な感じ？
print qq|Content-type: application/x-download\n|;
print qq|Content-disposition: filename="hoge.txt"\n\n|;
# 以下Text表示

間違えた>>809だ（鬱

>>811
ありがとうございます!!
さらにContent-dispositionでgoogleしたら、もう少し
ヒントが見つかりました!!
まだ、コード書いてませんができそうです。
本当にありがとうございました。

質問させてください。
掲示板などのログファイルに保存されている
ある一定の文字数をCGIに調べさせて表示するにはどうしたらよいのでしょう？

>814
ファイルに保存されている文字数を調べて表示させればいいと思うよ。
どこがわからないの？

ソースの記載がわかりません。
説明不足ですみせんでした。

>814=816
全部ASCIIならファイルサイズ調べるだけ。
一気読みしてるからメモリ効率悪いけど，日本語まじりならこんな感じかな。
require 'jcode.pl';
open LOG, $logfile;
$/='';
$ascii = '[\x00-\x7f]';
$twoBytes = '[\x8E\xA1-\xFE][\xA1-\xFE]';
$threeBytes = '\x8F[\xA1-\xFE][\xA1-\xFE]';
$data = jcode::euc(<LOG>);
$chars++ while($data =~ /$ascii|$twoBytes|$threeBytes/og);
close LOG;
print "Content-type: text/html\n\n";
print $chars;

参考
http://www.din.or.jp/~ohzaki/perl.htm#JP_Split
http://www.mikeneko.ne.jp/~lab/kcode/jcode.html
http://tohoho.wakusei.ne.jp/wwwperl1.htm#Tokushu
プログラミングPerl改訂版 P79,149

えーと、試したのですがうまくいきませんでした。
ファイルはtext形式です。
すごく単純なやり方はないのでしょうか？

age

http://www.atnavi.mlcgi.com/data/gif.cgi?id=askb&jl=13

2ch型掲示板なんですが、メッセージ書き込み時

ああああああああああ（エンター）
あああああああああああああああああ

というように改行を入れると、書き込み確認画面で何故か

ああああああああああ
あああああああああああああああああ あああああああああああああああああ">

になってしまって書き込もうとしても、「本文がありましぇん」と
・・・これはどうしたら直りますか？

↑切れてもうた。
＞になってしまって書き込もうとしても、「本文がありましぇん」と
＞言われてしまいます。

>821
スクリプト変えれ。

CGIで、WEB上でできるクイズを作っています。答えのデータは、クイズのプロ
グラム本体とは別になっています。本体はquiz.cgi、データはxxxxx.cgiとい
う感じにしています。答えを不正に読まれない対策として、データファイル
を.cgiにして、.cgi/へのアクセスも禁止しているのですが、まだ心配です。
パーミッションは現在、本体が755、データの方が644となっています。
このクイズの場合のように、あるファイルの内容を読まれないためには、一般
にどんなことをしておけばよいでしょうか？よろしくお願いします。

>824
データを暗号化する。

>824
あとは、パーミッションを600に設定する。それで動かないようなら動くようにしてもらう。
プロバイダに。

ありがとうございます。データファイルは、拡張子.cgiということで、
基本的にはＯＫなのですね！？

>>823
ありがとう。ちなみに17氏のやつっス。
スクリプトはいじってないんですが、何故かこの現象が・・

正常な書き込み確認の画面のソースはこうなんですが
名前：ｈｈｈ
<INPUT TYPE=hidden NAME=FROM SIZE=19 value="ｈｈｈ">
E-mail<font size="1">（省略可）</font>：
<INPUT TYPE=hidden NAME=mail SIZE=19 value=""><br>
内容：<ul>ああああああああああ <br> あああああああああああああああああ
<input type=hidden name=MESSAGE value="ああああああああああ
あああああああああああああああああ "></ul>

何故かうちのやつは

名前：ｈｈｈ
<INPUT TYPE=hidden NAME=FROM SIZE=19 value="ｈｈｈ">
E-mail<font size="1">（省略可）</font>：
<INPUT TYPE=hidden NAME=mail SIZE=19 value=""><br>
内容：<ul>ああああああああああ <br> あああああああああああああああああ
あああああああああああああああああ "></ul>

・・となって、<input type=hidden name=MESSAGE〜が表示されてないっス・・閉じタグだけ。
どなたかお助けください。

この場所に相応しい内容か分かりませんが、質問します。
あるホームページから、フォームアクションでCGIを起動し、
その結果を、別の新しい窓に表示するようにするには、
何をどうすれば良いですか。

<form method=post action=nanntara.cgi target=_blank>

で逝けなかったっけ？

>831
ご指導、ありがとうございました。
target=_blankを加えてやってみます。

ホームページの中に投票ランキングつくりたいんだけど
どうすればいいの？

>833
メールで投票してもらって自分で開票しランキングＨＴＭＬを組む。

関連サイトをめぐりつつこっちでも質問です・・・。
今画像検索サイトを作ろうと検索エンジンを改造しているところ
なのですが・・・（ちなみに初めてCGI触りました）。

あるHTMLタグの塊を、検索で引っかかった数だけ出力するのが
検索エンジンですよね。
その出力するHTMLをこんな風にします。
print "<form method=\"post\" action=\"file.cgi\"><table>\n;"＃ここは検索出力の前。ヘッダ
print "<<EOF;
<tr><td><img src="$path"></td>#$pathというのは、このサーチエンジン
　　　　　　　　　　　　　　　　#に使用しているデータファイルの中身で
　　　　　　　　　　　　　　　　#画像ファイルのパスが入ります
<td><input type="text" size="60" name="com$no"></td>
</tr>
EOF
#<中略>
print "</table>\n</form>\n</body></html>＃ここはフッタです。検索処理のあと。

検索で引っかかった画像にメッセージをつけて登録するようにしたいので、
検索で出力するHTMLに[input type・・・・」というのを書いています。
そのnameに変数$noをつけて、検索にヒットした数を1から順にふればよいのだ、
と思ったのですが、その$noをどう定義すればよいかその書き方がわからないの
です。
どう書けばよいでしょうか？
$no =　？

＞あるHTMLタグの塊を、検索で引っかかった数だけ出力するのが
検索エンジンですよね。

へぇ。

print "<<EOF;
　　　↑
ヒアドキュメント変じゃないか？

よ・・・読みにく・・・！！

まずは落ち着いて冷静になってから説明をやり直せ。

>837
しまった（汗）
ミスりました

何がしたいのかわからない。
そもそもHTMLを理解しているのか。

先生！たとえば、
if ($hoge eq 'A') { print "Aです"; }
ってあったとしまして、
$hogeが'B'であったときも"Aです"ってprintしたいのですが、
どのように条件に書き加えたらよいのでしょうか。。。？

>842
第１段階
if ($hoge eq 'A') { print "Aです"; }
if ($hoge eq 'B') { print "Aです"; }

第２段階
if ($hoge eq 'A') { print "Aです"; }
elsif ($hoge eq 'B') { print "Aです"; }

第３段階
if ($hoge eq 'A' || $hode eq 'B') { print "Aです"; }

タイプミスすまん。

>>843
先生！ありがとうございました。
第２段階でずっとやっていて、肥大化しまくりだったのが
第３段階でダイエットできそうです。

投票のスクリプトなんですが、
name=hoge
name=hoge2
のような感じで、
投票ボタンを押すと１ポイント加算されて
サブルーチンでその投票率を割り出して表示するには
どうすればいいのでしょう？

スクリプトに組み込めるようにしたいのですが。

>>846
投票率？

票／全体の票の合計＊１００；

>847
それは得票率。
投票率は、投票者／有権者

>>848
>846が投票率を聞いていると思うか？

>>848
勉強になった。

>848-849
どっちも言ってる事は正しいな。
一番間違えているのは>846か？
もう少しわかりやすい表現をしてほしいな。
漠然としすぎ。

>851
しかもマルチポスト臭い。
前にもどこかで同じ質問見て、回答した。
同じ間違いをしていた＞得票率と投票率

北島ｻﾌﾞﾙｰﾁﾝ

怪僧ｻﾌﾞﾙｰﾁﾝ

>>851
えーと、846です。質問の仕方が悪くてすみません。
ですが、私が悪いことにしないでください。
あと、マルチポストはしませんよ。あのやり方嫌いですから。。。

いろいろとすみません。
その得票率というのを割り出して表示するにはどうしたらよいのでしょうか？

>855
>847の計算式に変数を当てはめて、答えをprintする。
それだけだろ。
得票数や全体の票の合計の数え方から教えないといけないのか？

できれば。。。
厨房ですみません。嫌わないでください。

>857
厨房だと自覚してるなら直せ。
わからないなら自分で勉強しろ。
他人のおんぶでだっこか？
俺はお前が嫌いだ。

まず今、自分でなにができて何ができないんだ。
足し算わかるか？
割り算わかるか？
ＣＧＩの設置できるスペースは持ってるのか？
ＨＴＭＬはわかるのか？
無料配布ＣＧＩの設置くらいできるのか？
スクリプトの改造の経験はあるのか？
スクリプトを自分で組めるのか？
ファイル操作するスクリプトを自分で組めるのか？

お前の話し方を聞いてると、そのスクリプトをここの住人に書かせたいように見えるな。
もしそのつもりなら、無料配布スクリプトを探した方がいいぞ。
ここの住人はそこまで暇でも親切でもない。
自分でできることを自分でやろうとしない奴には誰も親切にはしてくれない。
自分でできることを探せ、考えろ。

>858
お答えします。
自鯖にWinでアパッチ入れて
今、CGIを改造しています。

CGIを設置できるスペースはあります。
改造経験は掲示板にフォントカラーの選択機能を取り付けれるくらいです。

ファイル操作はログファイルの読み込みぐらいならできます。
スクリプトを組むスキルまではまだないです。
せいぜい改造ぐらいです。

自鯖って自分で釣って来た鯖のこと？

>860
その鯖にstdoutするらしいけど、腐りやすいからなぁ。鯖は。

すいません。自宅サーバーです。。。

>859
ログファイルの読み込みができるなら、そこから得票数と総数をカウントしろ。
変数の作り方がわかるなら、「総数用の変数」「hogeの得票数」「hoge2の得票数」「hoge3の得票数」・・・と変数を作れ。
あとはログを読み出しながら、hogeの得票ならhogeに＋１、hoge2の得票ならhoge2に＋１としていけば得票数は数えられるだろ？
得票総数は「どの得票であっても総数＋１」すればいいだけだ。
その集計が終わったら、>847の式に当てはめて計算しろ。
計算が終わったらそれを表示させろ。

加算除算の仕方は↓を見ろ。
http://tohoho.wakusei.ne.jp/wwwperl1.htm#CalcOperand

他にもわからない事があったらここで調べてみろ。
http://tohoho.wakusei.ne.jp/
一通り見ておいて損はないページだ。

＞自鯖にWinでアパッチ入れて
まずこれが間違ってる。
自鯖にMacでアパッチ入れなきゃ。
自鯖＝Unixで、TELNETで入れたのかな？アパッチを。
もう眠くて日本語よくわからないや？

それと。
自分でよく意味のわからない単語は知ったかぶって使うな。
知ってる人間を混乱させるだけだ。
サーバーとクライアントの違いくらい勉強しろ。

ご迷惑をお掛けしました。
しばらく勉強をして来ます。

>865
つっこみあんがと。ダウンなので寝るです

全体の項目の中の$hoge1の数はどうやって出せばいいのでしょうか？

書き忘れました。
$hoge1=ﾊﾞﾅﾅ
だとして
バナナの数を求める場合です。

項目数が不定の場合はハッシュ（連想配列）に入れればよい。
while (<FILE>) {
chomp ;
$count ++ ;
$hoge{$_}++ ;
}
foreach(keys %hoge ){
print "項目 : $_ 回数 : $hoge{'$_'}\n" ;
}
print "$hoge\n" ;
ファイルオープンクローズは省略してます。