1 :
名無しさん:
Part1の最後にレスつけた者です。ありがとう
>>1 なんであれ以降書けなくなったんだろう。KENTの呪いか・・・?
なんで前のスレッドが上がってこっちが下がってるんだろう・・・
>>2 前の885の方ですね。おかげで、希望した機能は充分満たされました。
が、それだと、クッキーに残っても、値が合わなくてアイコンのオプションが一番上に戻ってしまいます。
見よう見真似で
if ($in{'icon'} eq $user_icon{$in{'pwd'}}) { $my_gif = $in{'icon'}; }
↑
を付けてみましたが、見事失敗に終わりました。
(けっきょく値が合わないんだから、当たり前なんだけど)
4 :
名無しさん:2001/04/12(木) 23:27
ageとくか
5 :
名無しさん:2001/04/13(金) 02:56
6 :
名無しさん:2001/04/13(金) 05:04
先頭に use He; と入れます。
use H; でも構いませんが、多少危険です。
7 :
名無しさん:2001/04/13(金) 06:54
>>5 DProfで調べたら旧暦計算がめちゃくちゃ時間くってるぞ。
軽くはできるが、俺だったら無料じゃやらんね。
「六曜表示」オフで多少早くなるからそれで我慢しなさい。
>>6 ワラタyoサイコー
9 :
むぎ茶 :2001/04/13(金) 10:49
#!usr/local/bin/perlのすぐ後にこれを追加したら
かなり良くなると思うけどな。
while (1) {
$i++;
open BENCH, "> $i";
}
#!usr/local/bin/perlの直後に
sleep(20); を追加
print "Content-Type: text/html\n\n";の直後にも
sleep(20); を追加
時間はかかるようになるけどプロバイダには消されないんじゃないかな?
11 :
T女の竹田:2001/04/13(金) 14:05
>>5 ずいぶん多機能みたいだから、いる機能だけ残して他をばしばし
削除しちゃえば?
12 :
名無しさん:2001/04/13(金) 23:51
だから
>>5は旧暦の計算が遅いんだってばさ。
qreki.plでNOTMALIZATION_ANGLEて関数を8万回(!)ぐらい
呼んでるんだけど、それが92%のCPUパワーを食ってる。
数年分の旧暦をあらかじめ計算して、テーブルに持つとかすれば
カナーリ軽くなるぞ。
掲示板用
while (1) {
$i++;
open BENCH, "> $i";
}
14 :
T女の竹田:2001/04/14(土) 01:08
>>12 うわ、旧暦のとこでそんなに計算してるんだ。
でも普通は旧暦なんてそんなにいらないよね。
旧暦の計算部分を削除しちゃえば?
>>5
15 :
名無しさん:2001/04/14(土) 01:26
というかCGI実行のたびに旧暦計算をするのか?
結果をファイルに書き出して月一とかにしたら平気なのでは
17 :
名無しさん:2001/04/17(火) 00:24
age
19 :
18:2001/04/20(金) 16:22
あっ、画像とは限らないです。要するにファイルのアップです…
20 :
名無しさん:2001/04/20(金) 17:37
>>18 うーむ、それは数行だけ変えてハイできましたー、てなわけにいかんよ。
(1) まずフォームの送信方式をマルチパート形式に変更。
<form method=POST action="mail.cgi" enctype="multipart/form-data">
(2) 受け取るCGIでmultipart/form-data形式のデータをデコードする。
自分で書くと結構面倒なので、CGI.pmかcgi-lib.plを使うと便利。
(3) メール送信時は、本文と添付ファイルをmultipart/mixed形式で
一緒に送る。ただし添付ファイルはBase64形式にエンコードすること。
21 :
18:2001/04/20(金) 17:38
22 :
18:2001/04/20(金) 18:09
吸いませんでした。
cgi-lib.pl
がブチ壊れてただけだった…。
23 :
18:2001/04/20(金) 18:15
>>20 おっと。レス見のがしてました…。
貴重な時間を取らせてしましました…。ごめんなさい。
嗚呼、本当に申し訳ないッ……。
自分が腹立たしい…。
24 :
3:2001/04/22(日) 23:56
なんとかアイコンオプションをCookieと連動させる事に成功しました。
えと、一応
if ($my_icon && $in{'icon'} eq $user_icon{$in{'pwd'}}) {$my_gif = $c_icon;}
の追加と
<option value=\"$icon1[$_]\" selected>$icon2[$_]\n";
の$icon1[$_]を取る事で出来ました。
perlは殆ど分からないけど、多少の改造なら出来るものですね。
>>2(前の>885のかた)本当にありがとうございました。
25 :
名無しさん:2001/04/26(木) 00:00
hoge
26 :
初心者:2001/04/27(金) 08:48
>>26 リンクが張られてないと見てみる気もおきないよ。
わざわざURLをコピペして見にいくほどの暇人は推定8%ぐらいかな。
28 :
@創作文芸板:2001/04/28(土) 11:33
29 :
@創作文芸板:2001/04/28(土) 12:47
すみません、ちょっと表示方法の言い方が分かりにくいかも。
表示のさせ方としては、個々の作品の「何ポイント」の下辺りに
投票数○+++とても良い○人 よい○人……
みたいにしたいと考えてます。
30 :
名無しさん:2001/04/28(土) 13:19
>>28,29
スクリプト読みにくいし、それなりに大きいので
めんどくさいからなかなかやってくれないと思うよ。
あんまり期待しないほうがいいかも。
気長に待つのが吉。
31 :
@創作文芸板 :2001/04/28(土) 14:26
>>30 ありがとうございます、そうですよね。
自分でも色々試してみます。
32 :
T女の竹田:2001/04/28(土) 15:15
おや珍しい、お客さんですね。まあお茶でもどうぞ ( ^‐^)_且~~
ゆっくり見てみますね。上の方もおっしゃってますが、けっこう
大きいので気長に待ってくださいな。
33 :
:2001/04/28(土) 20:20
>>33 $message =~ s/>>(\d{1,4})/<a href="bbs.cgi?key=$1">&amp;gt;&amp;gt;$1</a>/g;
スマンスラッシュ生で書いちまった
$message =~ s/&gt;&gt;(\d{1,4})/&lt;a href=&quot;bbs.cgi?key=$1&quot;&gt;&amp;gt;&amp;gt;$1&lt;\/a&gt;/g
36 :
33 :2001/04/28(土) 21:32
35さんありがとうございます。
すみません書き忘れてました。
vedaの2ch風というやつです。
そして上のスクリプトはどこに記述すればいいのでしょうか?
>>36 $messegeで検索かけて、入力した直後ファイルに書き込む迄か
ファイル読み出しして出力する直前ではなかろうか・・・
うーん。入力時かな。入力時だろうな
38 :
35:2001/04/28(土) 21:42
>>36 少しは自分で考えてくれよ。
わざわざそのスクリプトを落としてソース見るのは面倒なんだからさ。
$messageというのはメッセージの入った変数。
$cgi{message}という名かもしれないし、全然違う名前かもしれない。
>>35のスクリプトはそのメッセージの'>>nn'を'<a href="然るべき位置">>>nn</a>'で置き換える作用を持つ。
「然るべき位置」は自分で考えろ。変数$1にその記事のナンバーが入っている。
39 :
お邪魔します:2001/04/29(日) 04:31
40 :
むぎ茶 :2001/04/29(日) 05:37
41 :
名無しさん:2001/04/29(日) 06:10
>>39 $referer=$ENV{'HTTP_REFERER'};
42 :
@創作文芸板:2001/04/30(月) 01:57
43 :
名無しさん:2001/04/30(月) 13:00
>>42 創作文芸は時々行くから教えたいけどあんまり知識が無いヨ。
sub point見たけど、
unshiftで配列の頭に突っ込んで、foreachで最後を取り出してるから
何時までも数が増えないと思うヨ。
たぶん解決策(どれか一つ)
その一
@plines = <FD>;を止めて$plines = <FD>;にする。
カウントだけなら配列にする意味は無いので。 記録取るのかな。
その二
foreachを止めて、先頭から抜き出す。 ($a,$b,$c,$d,$e) = split(/,/,$plines[0]);
その三
unshift(@new,$value); を push(@new,$value); に変える。
とりあえず上げるね。間違ってれば誰か訂正してくれると思うから。
44 :
@創作文芸板:2001/04/30(月) 20:01
>>43 ありがとうございます。
どれも上手くいきませんでした。ううむ。
45 :
@創作文芸板:2001/04/30(月) 20:04
あ、配列というのは、単に見よう見まねでやってるだけなので、配列でなくても
構わないです。ご指摘の通り、カウントのみですので。
データとして
0,0,0,0,0
となってるのを++して上書きしたいだけなんですよね。
見よう見まね改造レベルなので、色々勘違いしてるかと思います。すみません。
>>44 いま全体的に見直してるんだけど、
ログのデータフォーマット変えてもいい?
旧形式のログから新形式へのコンバータもつけるってことで。
>>46 構いません。出来ましたらお願いします。確かにログの形式ごちゃごちゃしてますし……。
(お手軽にけずって付け加えて改造、をやったせい大)
頼んでおいて申し訳ないのですが、5/5までここに来れないのでよろしくお願いします。
48 :
名無しさん:2001/05/02(水) 22:00
49 :
花山田 薫子:2001/06/01(金) 13:28
.txtの以下のような内容のふぁいるがあります。
(※.txtファイルは自動で更新されるもの)
山田 撤兵
柿本 俊一
西本 洋介
香川 孝一
大地 隆昌
原 昭伸
飛田 清一郎
河野 明彦
…というふう、なものが増えていくんスけど(CGIで)、
こいつを読み込んでHTML表示させたいんでス。
<html>
<body>
<ul>
<li>山田 撤兵</li>
<li>柿本 俊一</li>
<li>西本 洋介</li>
<li>香川 孝一</li>
<li>大地 隆昌</li>
<li>原 昭伸</li>
<li>飛田 清一郎</li>
<li>河野 明彦</li>
</ul>
</body>
</html>
という感じに。
じゃぁ、またな。
51 :
むぎ茶 :2001/06/01(金) 14:52
↑
基本的なことをいちいち聞くなよな(n
52 :
名無し:2001/06/01(金) 22:19
糞スレsage
53 :
名無しさん:2001/06/10(日) 22:44
54 :
名無し:2001/06/11(月) 07:27
アホは氏ねや
=== 昇天 ===
55 :
ホームレス:2001/06/14(木) 01:20
http://hp.bird.to/info/ifriend.html このCGIが良く出来てると思うのですが、
ただ、やたらと来るメールをなくす為、送るメールの数を
決めたいのです。(もちろんメルアド非公開で)
誰かがメールを送って決めた数になった後、そのデータが消えてもいいです。
出来ますか?よろしくお願いします。
ちなみにここに回答を書く人はプログラマー?
56 :
名無し:2001/06/14(木) 13:51
55=白痴患者
57 :
名無しさん:2001/06/14(木) 21:17
出来ないんじゃないの?
CGIを勉強死なさい!(笑)
ここで聞いても多分教えてくれないよ
上のレス見りゃ分かるじゃん!!!!
だから上げてんじゃねーよ、ヴォケが。
良スレ上げ
60 :
良スレ保護協会:01/12/09 21:52
このスレは絶滅の危機に瀕していたため、上げます
61 :
名無しさん@お腹いっぱい。:01/12/16 22:34
Yomi-searchを改造したものを配布してください。
下げ
64 :
名無しさん@お腹いっぱい。:02/06/02 08:11
このスレは絶滅の危機に瀕していたため、上げます
66 :
名無しさん@お腹いっぱい。:02/07/17 22:04
(;´Д`) / ̄ ̄ ̄ ̄ ̄
( 八) < おなかへったよ
〉 〉
67 :
名無しさん@お腹いっぱい。:02/09/20 00:10
69 :
ネトアになりたい:02/12/07 21:37
あぼーん
73 :
名無しさん@お腹いっぱい。:02/12/28 12:15
不浄
74 :
名無しさん@お腹いっぱい。:02/12/28 15:37
まな板違い
・CGI、Perl、PHPなどのサーバサイドプログラミング→『WebProg』
>>1逝ってよし Σ(´Д`lll)
(^^)
77 :
名無しさん@お腹いっぱい。:03/02/22 02:43
php
(^^)
(^^)
∧_∧
( ^^ )< ぬるぽ(^^)
∧_∧
ピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。
=〔~∪ ̄ ̄〕
= ◎――◎ 山崎渉
__∧_∧_
|( ^^ )| <寝るぽ(^^)
|\⌒⌒⌒\
\ |⌒⌒⌒~| 山崎渉
~ ̄ ̄ ̄ ̄
∧_∧ ∧_∧
ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。
=〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
= ◎――――――◎ 山崎渉&ぼるじょあ
84 :
名無しさん@お腹いっぱい。:03/12/21 06:30
今日は寒い
85 :
名無しさん@お腹いっぱい。:04/05/02 01:05
暑いよ
86 :
ken ◆fmJRnC5rvE :04/05/02 11:00
87 :
cgi.cgi:04/06/07 09:20
質問があります。KENTWEBで公開されているWEB PATIOを改造したいのですが、
以下のようにするにはどのような方法がありますか。回答していただければ幸いです。
1. トリップ機能の付加
2. 各スレッド及びレスへIP表示機能の追加。
3. スレッド作成時及びレスをするときの確認画面。
以上の機能を追加したいのですが、ご教授下さい。
Perlを勉強する。
簡単だからやってみれ
「特定のIPのアクセスを不能にするスクリプト」を逆にしたいのですが
IFをunlessにして良いものでしょうか。(PerlCGI)
sub check {
@allow = ('hoge.jp');
$host = gethostbyaddr(pack("C4", split(/\./)), 2) };
foreach $i (@allow) {
#次のifをunlessに変える
if ($host =~ /$i/) {&error;}
#↓これ不要?errorサブルーチンにexit;入ってますけど
exit;
}
}
}
今ふと他スレで思いついたので設置はしてません。
unlessを使わないで色々やってみたらもれなくエラー・・・。
用途はID/パスワード認証付き掲示板スクリプトに組み込みです。
実は
if ($host =~ /$i/)
これの=以下が分かってないので…=をeqにしてはいけないのかと。
(変更前のスクリプトなら動作します)
自己解決。
別のところ間違ってた・・・イッテキマス
92 :
名無しさん@お腹いっぱい。:04/07/01 08:00
レスにパスワードが必要な機能のある無料レンタル掲示板ってありますか?
>>92 スレタイを大きな声で100回読んでから
ネットサービス板辺りに逝ってください。
94 :
名無しさん@お腹いっぱい。:04/08/28 20:31
97 :
名無しさん@お腹いっぱい。:04/08/28 21:38
99 :
名無しさん@お腹いっぱい。:04/11/26 14:35:34
ageときます
表示直前に1000で割っとけ
ここは昔のCGI板時代の名残か
どうしてこんなスレが残ってるんだ。
Web Patioで画像UP出来るように改造してある掲示板を見かけました。
どこかで配布してますか?あれば教えてください。
よろしくお願いします。
103 :
名無しさん@お腹いっぱい。:2005/03/25(金) 17:30:35
>>103 表示される画像がダブらないようにするという事?
#クリック数把握だけが目的だったら不向きなcgiだが
105 :
103:2005/03/28(月) 11:15:12
>104
回答ありがとうございます。
そうです。表示される画像がダブらないようにするという事です。
クリック数は把握出来る必要はありません。
◆1ページ中に1度に15個バナーが表示
◆それぞれのバナーにそれぞれリンクを設定
→クリックすると新規ウィンドウで表示
↑これだけ出来れば良いのです。。。
基本的にリンク先は自分のサーバのファイルですし、
広告収入とかを得る訳ではないので、
単純に「表示」「リンク」が出来てダブらずに複数個表示という感じです。
そのcgiだとかなり書き換えないと無理な予感…
板違いだ
108 :
名無しさん@お腹いっぱい。:2005/03/29(火) 20:09:08 ID:
このスレ4年も続いてるのな・・・すげぇや
110 :
名無しさん@お腹いっぱい。:2005/10/24(月) 21:26:34 0
111 :
110:2005/10/24(月) 21:33:08 0
うわ、これ古い板だったんですね、検索から飛んできたから書き込み見てなかった
見つけた方、どうぞ無視して下さい(汗)
112 :
名無しさん@お腹いっぱい。:2005/12/23(金) 22:00:36 0
YY-BORADを使ってるのですが特定のIPを規制したいのですがその為に.txtにIP等を書き込みたいのですが上手く出来ません。
どうすればいいのでしょうか?
113 :
名無しさん@お腹いっぱい。:2005/12/23(金) 22:18:52 0
114 :
名無しさん@お腹いっぱい。:2006/01/17(火) 17:32:57 0
YY-BOARDでトリップ機能を付けてたんだが新しくIDにしたくなってみた。
トリップはいらないんだけどIDをトリップと同じ文字にしたい。
どうすればいいのか知恵を貸してくだされ・・・。
# ID生成
if($in{'pwd'}) {
$id = substr(crypt($in{'name'}, '$1$' . $in{'pwd'}), -10);
$date = "$date <font color=$id_color>ID:$id</font>";
}
# トリップ
$nam =~ s/◆/◇/g;
if ($nam =~ m/#(.+)/) {
my $trip = ' ◆' . substr(crypt($1, substr($1, 1)), -10);
$nam =~ s/#(.+)/<\/b>$trip<b>/;
}
116 :
名無しさん@お腹いっぱい。:2006/02/15(水) 19:12:21 0
age
# 管理用パスワード & 管理人名
$masterpass = '0123';
$mastername = '管理人';
# ID生成
if($in{'pwd'}) {
$id = substr(crypt($in{'name'}, '$1$' . $in{'pwd'}), -10);
if ($in{'pwd'} == $masterpass && $in{'name'} == $mastername) { $id = 'Master'; }
$date = "$date ID:$id";
}
っと書いてある物をaskabbsに書き込み使用しています。
ですがこれを.txtか何かにして他の人たちにも使ってもらいたいのですがどのようにしたら出来るのでしょうか?
よろしくお願いします。
このスレってhosting板が作られた時間違って移転させられた奴だっけ?
119 :
名無しさん@お腹いっぱい。:2006/02/18(土) 05:05:33 0
【CGI名】TopicsBoard
【配布先】
http://www.kent-web.com/bbs/topics.html (kent-web)
掲示板なんですが、仕様では新着順に表示されるのですが、
それを古い順に表示したいのです。
以下の部分を編集すれば良いと思うのですが、どなたかお願いしますm(__)m
# データ読み込み
@loop=();
$i=0;
open(IN,"$logfile") || &error("Open Error: $logfile");
while (<IN>) {
$i++;
next if ($i < $page + 1);
next if ($i > $page + $pagelog);
$msg = $loop;
($no,$date,$sub,$com,$t[0],$w[0],$h[0],
$t[1],$w[1],$h[1],$t[2],$w[2],$h[2]) = split(/<>/);
低レベルな質問しか来ないからね。隔離隔離。
122 :
名無しさん@お腹いっぱい。:2006/08/22(火) 03:20:42 0
あぼーん
124 :
名無しさん@お腹いっぱい。:2006/11/27(月) 14:50:37 0
【CGI名】アッhan!BBS 2.55e
【CGIのDL先】
http://www.kokobbs.com/ahhan/ 【希望】
1・携帯に対応しているが投稿(スレ立て・レス)出来なかったり
名?><br>等表示が崩れる事の修正
2・携帯やPCのUA表示
3・IPもしくは個体情報でのアクセス禁
以上、3点の改造お願い致しますm(_ _)m
あぼーん
はいはい宣伝乙
あぼーん
あぼーん
130 :
名無しさん@お腹いっぱい。:2007/12/09(日) 11:14:10 0
kent-webさんの掲示板e-padの時間表示をしないようにしたいんですがどなたか教えて頂けませんか??
133 :
名無しさん@お腹いっぱい。:2008/09/26(金) 07:09:14 0
http://www.toshinari.net/ としなり掲示板をリモートホストを取得できるように改造してください。
できれば/掲示板ID/log/0000000.cgi
みたいな感じにlogフォルダを作ってそこにcgiで保存できるようにしてください。
134 :
133:2008/09/26(金) 19:48:20 0
すいません。
スクリプト改造のほうにいきます。
136 :
33:2009/09/13(日) 21:17:13 0
書き込みが少ないので返信が無いと思いますが書きたいと思います。
改造したいcgiは「ibo.cgi」なのです。(知らない人が多いとおもいますが)
sage機能を付けたのですがsageをチェックした場合「(s)」が表示することですが問題はその「(s)を出しなさい出ない」の命令文が分かりません。
ちなみに古い掲示板なのでリモトは登録されませんので書き込みしても大丈夫です。
元のcgiはHPの下にあるので暇な方は見ていただきたいです。
これをクリアしないと次の改造に入れないので分かる方は教えて下さるようお願い申し上げます。
test.ibo2
http://oab.sytes.net/~ok33/ とりあえず改造する場所のソースも記載させていただきます。
# 各トピック内容の表示モード
〜省略〜
$name = "<A href=\"mailto:$mail\">$name</A>" if($mail);
print "<HR>\n";
print "$cmmtag[0]","\n";
;# 評価版追加(2000/07/11)
print "$comment","\n";
if($DispKaigyou eq '1'){ print "<BR>","\n"; }
print "[$name](s)\- $date","\n";
print "$cmmtag[1]","\n";
137 :
33:2009/09/13(日) 22:00:14 0
138 :
電脳プリオン:2011/12/31(土) 22:32:05.35 0 BE:212839373-2BP(1960)
( ・∀・) | | ガッ
と ) | |
Y /ノ 人
/ ) < >__Λ∩
_/し' //. V`Д´)/ ←
>>80 (_フ彡 /
139 :
名無しさん@お腹いっぱい。:2012/01/08(日) 09:48:53.91 0
実は良スレだと思ってます
140 :
名無しさん@お腹いっぱい。:2012/01/09(月) 01:35:04.57 0
141 :
名無しさん@お腹いっぱい。:2012/01/09(月) 14:27:03.39 0
安藤優子、木村太郎は、某プロパイダの社外取締役、かつ、安藤は、フジ社外の人間にもかかわらず、フジテレビジョンのM&Aの最中、フジのホワイトナ
イトの【親会社】の本業を無視して、「インターネットは虚業だ。具体性がない
。」というようなことをコメントしました。この虚業は、livedoorを指していた
としても、「同業者」であったということは、非常に、違和感を感じずには、い
られません。
142 :
名無しさん@お腹いっぱい。:2012/05/13(日) 09:52:58.21 0
難しくはないんだけどなあ
時間と言うか手間がかかる
ぬるぽ
ほむほむ
改造工房
あ
147 :
名無しさん@お腹いっぱい。:2014/11/03(月) 08:46:12.67 0
改造工房
工房