CGIだけど、なんか質問ある？ Part 8
レス数が950を超えています。1000を超えると書き込みができなくなります。
0001nobodyさん
02/09/22 23:15ID:???※CGIは特定の言語に依存するものではありません。
※Perlのコーディングに関する質問は専用スレがありますのでそちらでお願いします。
↓
Perl 初心者コーナー Part16
http://pc.2ch.net/test/read.cgi/php/1032070299/l50
過去ログ・関連スレッドは >>2
0878nobodyさん
02/12/13 18:58ID:iG+3sspL0879nobodyさん
02/12/13 19:40ID:???0880nobodyさん
02/12/14 11:10ID:???0881nobodyさん
02/12/14 20:21ID:???ez j au i pcとか端末によって出る場所を変えたいのですが
0882初心者
02/12/14 21:59ID:KvUqkI+Xプログラムも書き換えたりしていないのです。
環境はMacです。フェッチを使っています。
ものすごい初心者厨ですみません。
0884nobodyさん
02/12/14 22:35ID:???初心者な事を謝る必要は無い。
まともに質問できないことを詫びろ。
＞アップロードできたり、できなかったりします
ネットワークが不安定なんじゃないか？
しょっちゅう切断されるとか。
0886nobodyさん
02/12/15 13:23ID:???0887nobodyさん
02/12/15 13:42ID:???0888nobodyさん
02/12/15 14:31ID:KknhLQGQそこで、C言語のソースをCGIにコンパイルするコンパイラーはあるん
でしょうか？ちなみに環境はwindowsです。よろしくお願いします。
0889nobodyさん
02/12/15 14:33ID:???・・・
0890nobodyさん
02/12/15 14:40ID:KknhLQGQそれじゃＣ言語でＣＧＩを作るにはＯＳはＵＮＩＸじゃないと無理なんで
しょうか？
0891nobodyさん
02/12/15 15:33ID:???Windowsのサーバで使うならWindowsでコンパイルしないといけない。
VisualC++とかBorland Cコンパイラーとか使う。
間違ってもWindowsでコンパイルしたのをUNIXで動かそうとは思わないように。
0892nobodyさん
02/12/15 15:54ID:KknhLQGQありがとうございました。
コンパイルすると、exeファイルができますよね。
その後、どのようにCGIのようにホームページ上で動かせばいいんですか？
もし、ご存じだったら教えてください。よろしくお願いします。
何度も質問すいません。
0894nobodyさん
02/12/15 17:09ID:KknhLQGQありがとうございました。
一応AnWEB(AnHTTPD)を使ってしようと思っております。
0895nobodyさん
02/12/16 02:59ID:???telnetでsyntax OKがでても実行すると
[an error occurred while processing this directive]
が出ます。文法も何度もチェックしたのですが間違いが見つかりません。
何か見落としているのだろうか？
0898nobodyさん
02/12/16 10:09ID:???0899nobodyさん
02/12/16 18:18ID:???0900奈美 ◆GIyFjXJ4X2
02/12/17 14:37ID:???「info」等が上書きされてしまいます。
この場合フォルダーを作りそれぞれ格納すれば良いのでしょうか？
よろしくお願いします。
0902nobodyさん
02/12/17 23:44ID:IKEJsjLpは、
hogehoge gehogeho hogegeho gehohoge
を指してるんでしょか？ それとも
hogehoge gehogeho
だけでしょか？
0903nobodyさん
02/12/17 23:47ID:???やってみれ。
#!perl
$q = qr/(hoge|geho){2}/;
@test = qw ( hogehoge gehogeho hogegeho gehohoge );
@result = grep { /$q/ } @test;
print join("\n", @result);
exit;
0904nobodyさん
02/12/19 02:44ID:6brHe4qscgiが置いてあるＵＲＬを入力すればいいんですよね？
0906じょ
02/12/19 11:15ID:???GATEXってCGIのセキュリティってどうです？
高い？低い？
0907nobodyさん
02/12/19 17:21ID:???0908nobodyさん
02/12/19 23:11ID:ZsaWrRnVhanako
father
taro
grandfather
kenzo
grandmother
hana
上記のようなテキストファイルがあります。
これを奇数番目をキーとし、偶数番目を値とする連想配列にしたいのですがどうしたらいいでしょうか？
つまり、
motherは、hanako
fatherは、taro
grandfatherは、kenzo
grandmotherは、hana
としたいのです。ご教授ください。
0909908
02/12/19 23:13ID:???0911nobodyさん
02/12/20 02:17ID:???思いつきで書いただけだから
動くかどうかしらんけど
こんなのじゃだめかな？
$i=0;
open<IN>;
@hoge=<IN>;
close<IN>;
$h=@hoge;
while($i<$h){
$rensou{$hoge[$i]} = $hoge[$i+1];
$i += 2;
}
0912nobodyさん
02/12/20 04:41ID:???ハッシュに入れるだけ
@data = qq/key name key2 name2 key3 name3/;
%hash = @data;
print $hash{key3} . "\n";
0913nobodyさん
02/12/22 15:21ID:???require "jcode.pl";
# 取得したいホスト名
$host = "headlines.yahoo.co.jp";
# 取得したいディレクトリィ
$page = "/hl?a=20021222-00000015-ryu-oki";
socket(S, 2, 1, 0);
connect(S, pack("S n a4 x8", 2, 80, (gethostbyname($host))[4]));
binmode(S);
select(S); $|=1; select(stdout);
print S "GET $page HTTP/1.0\r\n\r\n";
while (<S>){
$value.=$_;
}
close(S);
jcode::convert(*value, 'sjis', 'euc');
for (my @data = split(/\n/,$value)){
$html.=$1 if($_ =~ /<html>(.*)<\/html>/i);
}
print "Content-type:text/html\n\n";
print <<"HTML";
<html>
$html
</html>
HTML
exit;
0914nobodyさん
02/12/22 15:21ID:???切り抜けません。
何が原因なんでしょうか？
0915nobodyさん
02/12/22 15:34ID:???print "Content-type:text/html\n\n";
for (my @data = split(/\n/,$value)){
print $_,"<br>\n";
$html.=$1 if($_ =~ /<html>(.*)<\/html>/i);
}
0917nobodyさん
02/12/22 20:12ID:???のｲﾝｽﾄｰﾙ方法がわかりません。
誰か教えてください。m(_ _)m
0918nobodyさん
02/12/22 20:29ID:???http://pc.2ch.net/test/read.cgi/php/1037797479/631 ﾏﾙﾁ
0919nobodyさん
02/12/22 21:21ID:???HTTP-Lite Time-HiRes
のｲﾝｽﾄｰﾙ方法がわかりません。
0921nobodyさん
02/12/24 22:15ID:i8a0gT6wHTTP/1.1 200 OK
Server: <環境変数"SERVER_SOFTWARE"の内容を代入>
Date: <現在時刻を所定のフォーマットにして代入>
Expires: <同上>
Content-Type: text/html; charset=shift_jis
Content-Length: <中身の長さを計算して代入>
<以下、HTMLが続く>
（注） 「Status: 200 OK」ではなく、「HTTP/1.1 200 OK」とHTTPレスポンスをそのまま出力しました
ですが、実際の出力を見ると次のようになってました。
HTTP/1.1 200 OK
MIME-Version: 1.0
Server: AnWeb/1.42b
Date: Tue, 24 Dec 2002 12:51:49 GMT
Transfer-Encoding: chunked
Pragma: no-cache
Cache-control: no-cache
Last-Modified: Tue, 24 Dec 2002 12:51:49 GMT
Server: AnWeb/1.42b
Date: Tue, 24 Dec 2002 12:51:51 GMT
Expires: Tue, 24 Dec 2002 12:51:51 GMT
Content-Type: text/html; charset=shift_jis
Content-Length: 393
0922nobodyさん
02/12/24 22:15ID:???どうも、サーバソフトが勝手にいろいろ付け加えてくれたらしく、
ServerやDateが2つできちゃったり（しかもDateは中身が違う）
勝手にキャッシュすんなというヘッダが付け加えられたりしてるんですが、
サーバソフトがこのように勝手に色々くっつけるのはCGIの仕様上アリなんでしょうか？
このCGIの実行環境は次の通りです。
OS: Windows、サーバソフト: AN-HTTPD、
プログラムはC++で書いてBCCでコンパイル
0923nobodyさん
02/12/24 22:17ID:0cpo6YL8nph- ... .cgi
0924nobodyさん
02/12/24 22:21ID:i8a0gT6wあっ、うまくいきました…（実行ファイルなので拡張子はexeですが）
確かそういうファイル名にしなければならないというのはどこかで読んだような気がします…
どうもありがとうございました。
0925nobodyさん
02/12/25 02:41ID:A47bXqvVkent-webのCOSMO GATE-EXとともに用い、
会員制のサイトを作ろうかと考えておりますが、
cook.cgiのところで躓いています。
誰か教えてください。
0927nobodyさん
02/12/27 16:18ID:TOYtlOi1ファイルを読み込んで、先頭にある数字をカウンターとして増やしていきたいのですが、
open(DATA,"<data.dat");
#flock (DATA,2);
@nekosogi = <DATA>;
#flock (DATA,8);
close(DATA);
@nekosogi_copy = @nekosogi;
$sentou = shift(@nekosogi);
$suuji = split(/<>/, $sentou, 1);
$suuji = $suuji + 1;
$jikan = localtime(time());
$all_data = "$suuji<>$jikan<>$data\n";
unshift(@nekosogi_copy, $all_data);
open(DATA,">data.dat");
#flock(DATA,2);
print DATA @nekosogi_copy;
#flock(DATA,8);
close(DATA);
（変なプログラムですみません、もっと効率のいいやり方がありましたら教えてください）
出力される結果が２番目までは順調なんですけど、三番目の書き込みからカウンターが増えてくれないんです。
2<>Fri Dec 27 04:03:46 2002<><><><>その３<>書き込みテスト三番目。
2<>Fri Dec 27 04:03:12 2002<><><><>その２<>書き込みテスト二番目。
1<>Fri Dec 27 04:02:41 2002<><><><>その１<>書き込みテスト一番目。
どこが原因なのでしょうか？
0928nobodyさん
02/12/27 16:29ID:???0929nobodyさん
02/12/27 16:39ID:???なぁ、消極的なんだけど、arrayのコピーなんて重い処理やめてさ、
$sentou = $nekosogi[0];
$suuji = split(/<>/, $sentou, 1);
$suuji = $suuji + 1;
$jikan = localtime(time());
$all_data = "$suuji<>$jikan<>$data\n";
unshift(@nekosogi_copy, $all_data);
じゃだめなの？
って、
$suuji = split(/<>/, $sentou, 1);
ってリストをスカラーで受けてるから$suujiにはリストの要素数である1が常に帰ってきているんでは？
0930nobodyさん
02/12/27 17:10ID:TOYtlOi1shiftは配列に先頭の要素を取り除く関数ですので、あってると思います。
>>929
> $sentou = $nekosogi[0];
なるほど。早速修正。
> $suuji = split(/<>/, $sentou, 1);
> ってリストをスカラーで受けてるから$suujiにはリストの要素数である1が常に帰ってきているんでは？
確かにそうですね(^^；
直したら、無事に動きました!!。教えていただきありがとうございます。
0931nobodyさん
02/12/27 18:59ID:T4onpXWqPerlで書き出す文の中でJavascriptからURLのオプションを変数にして
リンクし、リンクした後のページの中でそのoptionを読みとることをし
たいのですが、ローマ字だとうまく行くのですが平仮名や漢字ではうま
く行きません。どうすれば良いのでしょうか？ブラウザはnetscape6で
やりたいのですが…。アドレスバーに表示されるオプションの部分で漢
字が入るべき部分が"％〜％〜"みたいになっているのですが、それを直
接読み込んでいるからいけないのでしょうか？
そのオプションを表示すると文字化けしていて、SJISやEUCで文字コード
を選択してもうまく行きません。
Javascriptでは
name = document.box.name.value;
URL = htpp://………….cgi?option="name";
location = URL;
としてリンクしています。
このnameってとこに漢字で入力したいのですが…。
どなたかよろしくおねがいします。
0932nobodyさん
02/12/27 19:01ID:???URLエンコードとか文字コードとか基本的な勉強を済ませてくることを激しくおすすめ。
後、箱庭とかやろうと思ってるならやめて♪
0933nobodyさん
02/12/28 22:37ID:Rfn3m+9WまだCGI可なHPが用意できていないのですがCGIがどのように動作するか
遊んでみたいと思いXXX.cgiというのをﾌﾞﾗｳｻﾞで開いたのですが
変な文字ばかり表示されてしまいます
オフﾗｲﾝでCGIの動作を確かめるにはどうしたらいいのでしょうか?
0935nobodyさん
02/12/29 06:07ID:???クライアントはContent-Typeで受け付けられるmimetypeを指定しますが、この時
*を使った表現をよく見ます。
MIMETYPESに正規表現を使った指定はどこまで許されるのでしょうか？
例えば、image/*は問題ないとして、image/j*とかimage/*?gとかやらかしても
問題ないのでしょうか。
0936nobodyさん
02/12/29 12:22ID:v6Y25Wu1なら「入力された文字に全角のダミーを追加すれば変換されるかな？」と思って色々実験したのですがうまくいきません。
どうすればうまく出来ますか？
0938936
02/12/29 13:25ID:v6Y25Wu1ですが、入力文字が全て半角カタカナだと全角に変換されません。
文字の中に全角文字があればきちんと変換してくれるのかな？。と思い、入力された文字にダミーの全角文字を追加してjcode.plに通しても駄目でした。
どのようにすれば半角カタカナを全角カタカナに変換できるのでしょうか？。
0939nobodyさん
02/12/29 13:27ID:???0940nobodyさん
02/12/29 13:27ID:???∩∩
（゜x゜ ）○
0941nobodyさん
02/12/29 14:00ID:ubkFpoNn0942nobodyさん
02/12/29 14:39ID:NRVRZIhk漢字フィルターnkf1.6のソースDLできるところないですか？
0943nobodyさん
02/12/29 14:41ID:???http://www.google.co.jp/search?sourceid=navclient&hl=ja&ie=UTF-8&oe=UTF-8&q=source+nkf
まぁ、無い理由はないわけだけれど。
0944nobodyさん
02/12/29 15:33ID:???#使用するサーバのperlのパスに変更
#初期設定
$dir= './おりものうめぇーーーーー!!!!!!!!!!!!!!!!!!!!!!!!!!!!!/';
# ディレクトリを開いてファイルを選択
opendir(DIR, "$dir");
for (sort { $b cmp $a } grep(/\.html$/, readdir(DIR)){
$print.= "<li><a href=\"$dir$_\">$_</a>\n";
}
closedir(DIR);
# 内容の表示
print "Content-type:text/html\n\n";
print <<"MANCO";
<html>
<head><title>$dir</title></head>
<body bgcolor="#FFFFFF">
<ol>
</ol>
ごちそうさまでした。
</body></html>
MANCO
exit;
0945nobodyさん
02/12/29 15:34ID:???print <<"MANCO";
Content-type:text/html
<html>
<head><title>$dir</title></head>
<body bgcolor="#FFFFFF">
<ol>
</ol>
ごちそうさまでした。
</body></html>
MANCO
exit;
0946nobodyさん
02/12/29 15:46ID:???#使用するサーバのperlのパスに変更
#初期設定
$dir= './おりものうめぇーーーーー!!!!!!!!!!!!!!!!!!!!!!!!!!!!!/';
# ディレクトリを開いてファイルを選択
opendir(DIR, "$dir");
for (sort { $b cmp $a } grep(/\.html$/, readdir(DIR)){
$print.= "<li><a href=\"$dir$_\">$_</a>\n";
}
closedir(DIR);
# 内容の表示
print "Content-type:text/html\n\n";
print <<"MANCO";
<html>
<head><title>$dir</title></head>
<body bgcolor="#FFFFFF">
<ol>
</ol>
ごちそうさまでした。
</body></html>
MANCO
exit;
0948nobodyさん
02/12/31 01:04ID:???Accept ヘッダで指定される内容のことだよね？
それはRFC2616を読んでもらうとわかるけど、
*/* …OK
image/* …OK
image/jpeg …OK
*/jpeg …NG
image/j* …NG
要は「*/*」「<何か>/*」の形でしか*は使えない、ということです
0949ドッグキラー ◆kdDGeR92lk
02/12/31 18:22ID:jW77rwBmこれを使えるようにするにはどうすればいいんですか？
#!/usr/local/bin/perl
foreach $i (3, 2, 1) {
print "カウントダウン : $i \n";
}
0951ドッグキラー ◆kdDGeR92lk
02/12/31 18:26ID:jW77rwBm0953nobodyさん
02/12/31 18:28ID:???0954ドッグキラー ◆kdDGeR92lk
02/12/31 18:31ID:jW77rwBmスクリプトの記述に誤りがある可能性があります
文法チェック等を行ってください。
だと思われ。
0956ドッグキラー ◆kdDGeR92lk
02/12/31 18:37ID:jW77rwBmここきたの今日初めてだから、自作自演してませんが、何か？
それはいいとして、５００なんですが、スクリプトをどうすればいいんですか？
0957nobodyさん
02/12/31 18:56ID:???0960nobodyさん
02/12/31 20:32ID:???0962ドッグキラー ◆kdDGeR92lk
02/12/31 20:41ID:jW77rwBm0963ドッグキラー ◆kdDGeR92lk
02/12/31 20:52ID:jW77rwBm0965nobodyさん
02/12/31 23:40ID:gERFUaa0DBMを利用したProgを作成したいのですが、dbmopenコマンドではデータ
は処理できるのに、tie関数ではエラーは出ないものの、上手くデータ
が処理されてくれません。何故でしょう？
0966ドッグキラー ◆kdDGeR92lk
02/12/31 23:51ID:jW77rwBm>>957のやってもできませんでした。
それで、今もう一回別のとこ修正してやったら、できました。
0968nobodyさん
03/01/01 12:16ID:uU32Gx+S例えばあぷろだで画像をあっぷして、早めにそれを削除しても、
その画像を見た人が１人でも居れば、
あぷろだに記録されてるアクセス情報からその画像を見ることができると聞いたのですが、
具体的にどういう方法なのでしょうか？
なにやら、その画像を見た人のPCから見ればキャッシュがあるので云々
ということらしいのですが・・・他人のキャッシュを拝借するということかな？
うーん・・・。
0970nobodyさん
03/01/01 15:29ID:kImIKAsb今年も、、今年こそ、、
いい思いをしちゃいましょう(^▽^)v
http://ok.halhal.net/~2ch/
0972nobodyさん
03/01/02 10:59ID:???（ちなみにファイルはHTMLです、それを出力するHTMLがあるのですが。。）
Content-Type は何にするとうまくDLできるでしょうか
よろしくお願いします。
0974nobodyさん
03/01/02 13:00ID:???ttp://popup2.tok2.com/home/newbie/script/log2.html
ここにあるログ解析を使おうと思って今試みてるんですが
一回目は読み込むけど二回目以降はアクセスログを読み込んでくれません。
書かれた通りにやっても駄目なんでパーミッションを変えたりしてみたんですが
それでもやっぱ駄目でした。
FTPの転送モードも間違っていないようです。
この場合、どういう原因が考えられるんでしょうか？
誰か教えろこのやろう。
0975nobodyさん
03/01/02 13:51ID:???オーナーっていうのはFTPログインしている人のことですか？
グループメンバーっていうのは同じディレクトリのファイルたちですか？
その他っていうのは、例えばhtmlを見る人ですか？
rっていうのはブラウザで読み込む権限ですか？
wっていうのは、例えばcgiがdatファイルデータを書き込んだりする権限ですか？
xっていうのは、例えばformなんかでデータを送信する権限ですか？
0976nobodyさん
03/01/02 13:53ID:???オーナー：ファイル所有者
グループ：所有者と同じユーザグループのユーザ
アザー：それ以外
r：読み込み可能
w：書き込み可能
x：実行可能
レス数が950を超えています。1000を超えると書き込みができなくなります。