【スクリプト改造工房 PART 5 】

**nobodyさん** · 02/08/01 18:19

#================================
# スレッドの説明
#================================

「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。

質問するときは以下の点に注意して書いて下さい

(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い

※答えてくれないからといって逆ギレする厨はお断り

#================================
# 過去のスレッド
#================================

【PART1】行方不明
【PART2】http://pc.2ch.net/test/read.cgi/perl/986986227/
【PART3】http://pc.2ch.net/php/kako/988/988808396.html (HTML化済み)

**200** · 02/10/04 17:02

>>234
動きました！@DATA = &read_file($datafile);
$agent=$ENV{'HTTP_USER_AGENT'};
$agent =~ s/\,//g;
&read_form;
↑入れないとダメって？？

**220** · 02/10/04 17:08

>>200
設定エラーってさ･･･属性の変更し忘れとかの鯖エラーでしょ･･･。
まぁいいや。

それいれとかないと新規投稿が見えない状態で表示されます。
投稿はされてるんだけどね。
って勝手に推測。
やっとくに越したことは無いと思うけど、ちゃんと動いてるならやらなくていいよ。
i-modeの環境が無いもんでね。
検証出来んのだわ。
すまんね。

@DATA = &read_file($datafile);
&read_form;

この2行だけでｲｲっぽい見た感じ。

**200** · 02/10/04 17:28

>>220
こんな初心者につきあってくれてありがとうございます。
また現われます！
その前にもうちょっと勉強してきますね！

**220** · 02/10/04 17:33

>>200
逝ってらっさい。

漏れもヘタレだから大したことは出来ないけど、勉強してきます。

今携帯持ってきて動かしてみたけど上のレスの追加2行はいらんみたいね。
んじゃそういうことで乙彼さん。

**nobodyさん** · 02/10/04 19:43

なんとなく許せない200がいるスレはここですか？

**nobodyさん** · 02/10/04 20:18

>>239 同士発見

**nobodyさん** · 02/10/05 21:30

ｳﾌ♥

たく · 02/10/06 00:56

http://goa.cside.to/review/momoco.cgi?btype=docomo&mode=tp&ord=new&page=1&file=20021005044342

この掲示板の投稿フォームで<select></select>の中から選んだ内容を
コメント本文に書き込ませたいんですけどうまくできませんでした…

本文には
raiting:<改行>
★★★★<改行>
コメント内容

というような感じにしたいんですけど、
これはフォームをいじるだけではダメで
スクリプトも変えなきゃダメですか？

**nobodyさん** · 02/10/06 01:02

そ

**nobodyさん** · 02/10/06 01:34

>>242

そんなこともできないで商売ができると思うな

たく · 02/10/06 01:46

商売って？してないすけど。。

**nobodyさん** · 02/10/06 04:00

逆切れかよ。

**nobodyさん** · 02/10/15 17:04

ごめんなさい、スレ違いかも知れないんですけれど、
http://ayu.csidenet.com/
こちらの
http://ayu.csidenet.com/cgi/whiteforum.html?
ここで配布されているWhite Forumに文字色選択機能を付けたいのです。出来れば、それぞれのフォーラムに別々の色を最低でも10コくらいで選べるようにしたいんです。ラジオボタンで選ぶ形だとだと凄く嬉しいんですけど。
でもちょっと見てみたんですけれど、なんだかplとかがいっぱいあって、設置するのは出来たんですが改造するには私には難しいんじゃないかと思って…。
私はほんとに、簡単な改造くらいしか出来ないんです。
こういうのって、お仕事として改造して下さるところとかあるんでしょうか？

**nobodyさん** · 02/10/16 04:50

age

**nobodyさん** · 02/10/16 22:09

KENT-WEBのYY-CHATにJavaの記述を施して
「新規発言のみを読み込む機能」を付けたいのだけれど
何でもいいのでアドバイスいただけませんか?

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

もうkentの見た目改造はいいよ・・・

**nobodyさん** · 02/10/18 05:17

あげ

02/10/18 13:26

ttp://kensaku.s13.xrea.com/tosbbs_1.8.zip　
TOS BBSにアイコン機能をつけたいのですが。。

s · 02/10/18 13:34

http://yahooo.s2.x-beat.com/

**nobodyさん** · 02/10/18 15:12

>>252
勝手に付けてくれ。

**252** · 02/10/18 22:38

なら携帯対応板にtosbbsのID機能をhttp://www.url-battle.com/cgi/で交付されてる板に移植したいのですが

**nobodyさん** · 02/10/19 19:03

>>255
勝手に移植してくれ。

**nobodyさん** · 02/10/20 00:35

あげ

太郎 · 02/10/20 00:38

アンケートに答えても結構ですよ
http://www31.tok2.com/home/sanche/cgi-bin/ankeet/enq.cgi?

**nobodyさん** · 02/10/20 00:39

>>258
グロいな

**nobodyさん** · 02/10/20 18:39

DSFBOARDに昇進機能を付ける方法を教えれ！
これ→http://rpg-center.net/bbs/dsfbbs/yybbs.cgi

http://cuo.press.ne.jp/cgi/b07_1.html
この方法は通用しませんでした。

**nobodyさん** · 02/10/20 18:58

それわ残念でした。

**nobodyさん** · 02/10/23 00:21

ealisっていう掲示板に2ch風のトリップ機能とアイコンウプロダ付けたいんですが
詳細ｷﾎﾞﾝﾇ

**nobodyさん** · 02/10/23 00:54

URL くらい書けや。

**nobodyさん** · 02/10/23 13:19

>>262
そういえば、昔
ttp://www.prologue.info/web/
で、そういうの再配布してたな。
ちょっとオリジナル版作者とのいざこざがあって配布やめているらしいが。

**nobodyさん** · 02/10/23 15:49

ealisっていう掲示板に2ch風のトリップ機能とアイコンウプロダ付けたいんですが
詳細ｷﾎﾞﾝﾇ
スクリプト配布場所↓
http://kano.feena.jp/erial/

**nobodyさん** · 02/10/23 17:04

自分で書けや。

**nobodyさん** · 02/10/23 19:33

とりっぷなんて　３分でできるだろ。

**nobodyさん** · 02/10/25 01:14

楽しいｻ～ﾊﾞ～ｴﾗｰで配布されている、
http://www2u.biglobe.ne.jp/~micky/saver/dl/docum.htm
このｽｸﾘﾌﾟﾄを連続登校可能にしたいのですが、
どこをどう削ったら良いのか解りませんでした。
お手数ですが、どの辺を削れば良いか教えて下さい。
よろしくお願いします。

そこの管理人さん恐いので聞けませんでした。

**nobodyさん** · 02/10/25 01:40

>>268　以下の２行をコメントしすればいいかも

if ($ip eq $ips)
{ &html_list; &html_main; exit; }

**269** · 02/10/25 01:41

追記：
５１・５２行目

**268** · 02/10/25 07:48

>268=270
うまくいきました！
今、テストして動作も確認しましたが、問題ナシです。
教えて下さってありがとうございました。

**nobodyさん** · 02/10/25 17:30

ealisっていう掲示板に2ch風のトリップ機能とアイコンウプロダ付けたいんですが
詳細ｷﾎﾞﾝﾇ
スクリプト配布場所↓
http://kano.feena.jp/erial/

**nobodyさん** · 02/10/25 18:17

はい、次～

**nobodyさん** · 02/10/25 23:21

>>272
ソース落とすのめんどくさいんでどっかにテキストで上げれ。

トリップ部分のサブルーチンはこんなんで。
デコードの後ろあたりに変数名変えて入れりゃいいかと。
sub make_trip{
$name =~ s/◆/◇/g; #偽者対策

$k = substr($name,index($name,'#')+1);
$s = substr(substr($k,0,8).'H.', 1, 2);
$s =~ s/[^\.-z]/\./go;
$s =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$t = substr(crypt($k, $s), -8);
$name =~ s/#(\S+)/<\/b> ◆$t <b>/g;
}

**nobodyさん** · 02/10/25 23:52

粘着にマジレスか。おめでてぇな。

**nobodyさん** · 02/10/26 12:36

The RoomさんのCGIにkentさんのCGIのようなメール送信機能をつけたいんですが何処をどうすればいいか教えてください。
今のログを残したいのでこのCGIに送信機能をつけたいんです。
http://www.starcity.ne.jp/~ars/cgi-bin/0test/treebbs.txt←ソースです

よろしくお願いします。

**nobodyさん** · 02/10/26 18:39

http://www.geocities.co.jp/SiliconValley-Sunnyvale/9694/ にあった、
pastlog.cgiというスクリプトを使っています。
表示対象外の拡張子や表示対象外のブラウザは設定できるようになって
いるのですが、対象外のIPを設定できません。
元ソース↓
http://www.geocities.co.jp/SiliconValley-Sunnyvale/9694/pastlog.html

#対象外IP
@extip = ('211.xxx.xx.xx','219.xx.xxx.xx','216.xxx.x.xxx');
は埋め込んでみたのですが、どこで対象外を判断したらいいものか
判りません。
アドバイスお願いします。

**277** · 02/10/26 19:25

>>276
print "<div align=center><br>以下の記事を書き込みました。～
の近く(少し前とか少し後とか)で&adminmalを呼んでください。超適当だけど。

sub adminmail
{
$sendto = 'xxxx@xxxx.ne.jp'; # 宛先
$sendmail = '/usr/sbin/sendmail';# sendmailのパス

if (open(MAIL,"| $sendmail -t"))
{
print MAIL "To: $sendto\n";
print MAIL "Subject: [mail from treebbs]\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 "-----------------------------------\n";
print MAIL "TIME : $nowtime\n";
print MAIL "NAME : $name\n";
print MAIL "SUBJECT : $subject\n";
print MAIL "MAIL : $mail\n";
print MAIL "URL : $url\n";
print MAIL "DELKEY : $delkey\n";
print MAIL "A3 : $a3\n";
print MAIL "IP : $ip\n";
print MAIL "HOST : $host\n";
print MAIL "MESSAGE :\n";
print MAIL "$msg\n";
close(MAIL);
}
}

**276** · 02/10/26 20:03

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

**nobodyさん** · 02/10/27 00:26

>>277
表示対象ログ抜き出し
のあたりじゃないかな。

試してないけど。

**277** · 02/10/27 12:45

280さん、レスありがとうございます。
PartGet(表示対象ログ抜き出し) の中にロジックを追加してみたのですが、
　　if ( $brw =~ /$exip/ )
のところで、何を指定したらIPになるのか、どうも判りません。

#対象外IP
@exips = ('211.xxx.xx.xx','219.xx.xxx.xx','216.xxx.x.xxx');

sub PartGet{
for ($i = $lnum; $i < $lognum; $i++){
　$rec = @inrec[$i];
　my @ldata = split(/\"/,$rec);
　my ($method,$file) = split(/ /,@ldata[1]);　# メソッド,アクセスファイル
　my ($dmy,$cd) = split(/ /,@ldata[2]);　# apacheのコード
　my $brw = @ldata[5];　# ブラウザ

　# 指定IPアドレスを無視を無視　※ここから追加※
　$flg = 1;
　foreach $exip (@exips){
　　#※↓ $brwじゃなくて、何を指定していいのかわかりません　※※
　　if ( $brw =~ /$exip/ ){
　　　　$flg = 0; # 対象外IP
　　　　last;
　　}
　}
　if ( $flg == 0 ) { next;}

オリジナルソース　http://www.geocities.co.jp/SiliconValley-Sunnyvale/9694/pastlog.html

**nobodyさん** · 02/10/27 12:56

>>281
@exips= (); ←このリストに指定したいIPを追加するんじゃない？

一応、以下の行は変更したほうがいいのでは？
if ( $brw =~ /$exip/ ){　⇒　if ($brw=~ /^\E$exip\Q$/){

**２８２** · 02/10/27 12:57

逆だった

if ($brw=~ /^\Q$exip\E$/){

**277,281** · 02/10/27 13:16

282さん、レスありがとうございます。
$brwにはブラウザが入ってしまうので、（ソースのコメントに
書いてありました)
$brwの換わりに別な変数を作って比較元のIPを入れなければ
ダメなようです。でもそこがわからない・・・。
正規表現については、勉強し直します。

**２８２** · 02/10/27 13:36

>>284
あー、そういうことか・・・

$brw の代わりに $ENV{'REMOTE_ADDR'}　でどう？

**277** · 02/10/27 14:23

282さん、うまく説明できなくて申し訳ありません。
お付き合いありがとうございます。

$ENV{'REMOTE_ADDR'}はCGIにアクセスした人のIPですよね。
apacheの生ログから必要な行だけ取り出すCGIなので、現在CGIにアクセス
したIPじゃなくて既にログに記録されてるIPを取り出そうというところで
混乱しているところです。
apacheの解説のサイトに逝ってきます。

**nobodyさん** · 02/10/27 23:02

http://www.big.or.jp/~talk/t-club/soft/mini_r6/imgboard_n.cgi
このあぷろだなんですが
CGIで表示した時にUPされたままの画像が表示されます
これはちょっと回線がつらいんで
UPされたら自動でサムネイルを作成させたいとおもうんですが
そういう改造って簡単にできますか？

**287** · 02/10/27 23:19

それかjpeg/gif/pngをリサイズして保存させる
ライブラリー無いでしょうか？

**nobodyさん** · 02/10/28 01:09

現在の閲覧者を得るにはどうすればいいの？

**nobodyさん** · 02/10/28 01:59

ちっこいウィンドウがいっぱい出てきて止まらなくなる奴教えて！

**その3** · 02/10/28 10:32

>>288
RedHat　Linux（i386）用ならCでコンパイルしたのがある。

**その3** · 02/10/28 10:46

>>288
http://fitness.s7.xrea.com/index3.php
からダウソしてjpegなら

$Sorce_File = "img-box/img123456789.jpg"; #元画像名
$Destination_File = "thumbnail/img123456789.jpg"; #縮小画像名
$Resize_Ratio = 0.5; #半分に縮小
system("./rejpeg $Sorce_File $IDestination_file $Resize_Ratio");

みたいに使う。

**nobodyさん** · 02/10/28 16:32

>>290
立ち去れ

**288** · 02/10/28 23:45

>>291 292
どもありがとうございます。
できたみたいです。

あと同じCGIなんですが
投稿順にならべるっていうのがあるんですが
最新3つしか投稿順になりません
どこをいじれば全部にちゃんねるみたいな
最終投稿順になるんでしょうか？

**nobodyさん** · 02/11/01 14:47

http://www.nurs.or.jp/~b3/
ここで配布してる
サンプル↓
http://www.nurs.or.jp/~b3/styx/styx/styx.cgi
ダウンロード↓
http://www.nurs.or.jp/~b3/cgi/txcount/dlcount.cgi
この掲示板cgiに串規制を入れたいのですが、
ソースをみたら沢山のファイルに分かれていて
どの辺に入れたら一番よいのかいまいちわかりません。
一応KENTのcgiは解説サイトとか見ながらいじったことありますが
このcgiは見たこと無い記述も多くて判りにくいです。

どの辺をいじればいいのかのヒントだけでも良いので教えてください。
お願いします。

それとこのcgiで良く出てくる::というのと、冒頭のuse vars、
この辺のがなんとなくわかりそうでわかりません。
検索して調べているのですが難解なサイトが多くて困ってます。
わかりやすい参考になるサイトとかあったら教えてください。

_ · 02/11/02 03:40

検索してたらPART1のキャッシュが見付かった
http://mimizun.mine.nu:81/2chlog/perl/tako.2ch.net/perl/dat/958370869.html

**nobodyさん** · 02/11/04 07:28

>>295
だから

ダウンロードしなくても済むようにテキストでソースうｐして張れと何度言ったら判るんだぁこのバカチンがぁ！

**297** · 02/11/04 07:37

>>295
でただ串規制といわれると読みこみも規制するのか
書き込みだけ規制するのかわからないけど、
普通に考えて書き込みだけ規制するとしたらpost.plのなかの
sub host_readのなかでいいんでない？串規制にもいろいろあるけど。

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

>>289
http://isweb23.infoseek.co.jp/play/cardplay/cgi-lab.shtml
ｺｺに現在の訪問数を表示するCGIってのがあった。
しょうも無いｸｿみたいなﾔｼばっかしだったけどゴミ箱にはﾜﾗﾀ。

**295** · 02/11/04 21:55

>>298
この連休中でいろいろ調べてやってみてますた。
処理の流れがなかなかわからなくて、しらみつぶしに見ていって
多重投稿を禁止するルーチンがあったのでその辺からいじってみてます。

>>297
こーいうファイルがいくつにも分かれているcgiはどうするのが一番よいのでしょうか？

あい · 02/11/04 23:06

携帯用のランキングCGIプログラムを捜しています。
何卒お願いします。

**nobodyさん** · 02/11/04 23:09

>301

ここにもいたか！
マルチはｳｻﾞｲんだよ！

**冗談解らないnobodyさんへ** · 02/11/04 23:22

携帯用のランキングCGIを捜しています。
何卒お願いします。

◆CxWBqy7wZQ · 02/11/05 18:29

303>>CGIスクリプトを検索できるサイト、探せばいくつかあるよ。
いってみたら。

**nobodyさん** · 02/11/05 19:12

携帯だぞ、携帯
ｱﾌｫじゃねぇのか？

マルチは無視しろよ。

**nobodyさん** · 02/11/05 22:03

KENT WEBのチャットは、入室しているときのフレームと投稿フォームをローカルに保存してちょっと改造すれば、それを使って投稿できますよね（説明が下手ですみません）
その投稿フォームの中に書いてある
「<option value="#RRGGBB">」などを
「<option value="#000000 style=&"font-size:2em&"">」のようにすれば、CSSが使えてしまいます。
それができないようにしたいのですが、うまくいきません。

ワイワイチャット（ttp://kent-web.com/chat/yychat.html）を例に、改造方法を教えていただけないでしょうか？

**306** · 02/11/05 22:05

ちょっと文字参照の使い方を間違えました…
> 「<option value="#000000 style=&"font-size:2em&"">」のようにすれば、CSSが使えてしまいます。
ではなくて
> 「<option value="#000000 style="font-size:2em"">」のようにすれば、CSSが使えてしまいます。
です。

よろしくお願いします。

**nobodyさん** · 02/11/05 22:20

>>306
最新バージョンでは使えないんじゃない。
s/&/&/

**306** · 02/11/05 22:45

>>308さん
ありがとうございます。
> s/ //g
> s/&/&/g
で解決したようです（これを、上下逆にしてしまったらいけませんけど）

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

質問させていただきます。宜しくお願いします。

ttp://www.kent-web.com/chat/robo.html
（スクリプト説明）

ttp://www.kent-web.com/chat/robo/robo.gif
（チャット画面サンプル）

↑この人工知能型チャットスクリプトを、フレーム表示ではなく、
　一画面に発言フォームとログが出るように作り直したいんです。

簡単なHTMLなら書けるし、BBSの背景色を変える程度のCGI改造なら出来るので、
わかるかなーと思ってソースを見てみましたが、さっぱり分かりません。
どこをどう書き直したら、フレーム表示ではなく、一画面表示となるでしょうか？

**310** · 02/11/07 19:21

>>310
怪しいなと思っているのは、以下の部分なのですが、src以下がURLでは無いので、
フレームを解除した時にどう書くべきなのかが分からないんです。

#------------------#
# フレームを生成 #
#------------------#
sub frame {
# クッキーを取得
&get_cookie;

# クッキーにリロード時間／行数のない場合は初期値を代入
if ($ck{'retime'} eq "") { $ck{'retime'} = $re_sec; }
if ($ck{'line'} eq "") { $ck{'line'} = $line[1]; }

&header;
print <<"EOM";
<frameset rows="147,*">
<frame name="form" src="$script?mode=form&retime=$ck{'retime'}&line=$ck{'line'}">
<frame name="log" src="$script?retime=$ck{'retime'}&line=$ck{'line'}">
<noframes>
<body>
フレーム非対応のブラウザの方は利用できません
</body></noframes>
</frameset>
</html>
EOM
exit;
}

**310** · 02/11/07 19:26

>>310
スクリプトのtxt版はここにあります。

ttp://www.devicestyle.co.jp/robo.txt

よろしくお願いします……

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

とりあえず動けばいいって感じで
#============#
# 設定完了 #
#============#

$string = &decode;
&deny;
#if (!$string) { &frame; }-----------------削除またはコメントに
if ($mode eq 'form') { &form1; }
if ($mode eq 'into') { ®ist('into'); }#-----変更
if ($in{'comment'} && $mode eq 'msg') { ®ist('comment'); }
if ($mode eq 'bye') { &byebye; }
&form2;#---------------------------追加
&log_view;

続き · 02/11/07 19:36

#----------------------------#
# フォーム2 : 発言フォーム #
#----------------------------#
sub form2 {
#®ist('into');-------削除またはコメント

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

print "発言自動消去</td></form></table>\n";#</body>\n</html>\n";--変更
#exit;--------------------削除かコメント
}

#--------------#
# 記事表示部 #
#--------------#
sub log_view {
#&header;----------------削除かコメント

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
以上

続き · 02/11/07 19:37

最初の入室時のみ
robo.cgi?mode=form
でアクセスしないといけない。

続き · 02/11/07 19:38

® = &reg です。

**bery** · 02/11/07 20:34

はじめまして、わからないことがあったので質問させて頂きます。

ttp://mo-mo.vis.ne.jp/1sample/t/ud_meisai/mo-erv002.cgi（設置例）

ttp://mo-mo.vis.ne.jp/cgiskin/bbs/mo-erv002pkm.htm(↑の説明)

この背景（画像）を表示を一個でスクロールしないようにしたいのです。
HTMLならできるんですが…CGIでやってみようにも全くわかりません。
コメント記入部の方（左）側の画像はフレームの中央部。
右のログ表示部分はフレームの左上部分に画像を表示したいんです。

CGIでは無理なのでしょうか…？

**nobodyさん** · 02/11/07 21:51

>>317
それはCGIの改造ではなくCSSだろ？

**bery** · 02/11/07 23:02

あ、そうなんですかすみません（^^;
そちらの方で質問してみます…

**310** · 02/11/07 23:56

>>313-316
ありがとうございます！

すみません、確認させて頂きたいんですが、
書いて頂いたスクリプトの中の「?」はそのままでいいんでしょうか？
（例：>313の「$string=?」等）

それと、初心者で申し訳ないんですが、
>>316の意味が分かりませんでした。

頂いたスクリプトを、そのまま該当箇所にコピペしてみましたが、
internal server errorが出てしまいました。

**nobodyさん** · 02/11/08 03:36

皆様はじめまして、とほほさんのwwwserch.cgiについて質問させてください。
現在wwwserchを実際に稼動しているのですが、
データ量が多くなるにつれ表示件数が膨大になって困っています。
そこで表示結果を分割して表示させたいのです。
（10件ずつ表示して｢次へ｣のリンクで次の10件を表示といった感じで・・）
このような事は可能でしょうか？
可能なら何処をどのように改造すれば良いかお知恵を拝借させてください。。
なんとか自力でしようと頑張ってみたもののサッパリで・・
宜しくおねがいします。。

此方にソースをtxtでアップしてみました↓
http://www.geocities.co.jp/Milano-Kotto/1097/wwwsrch.txt

**310** · 02/11/08 11:04

>>313-316
このスクリプトを書いて下さった方、まだ見てらっしゃいますか？

>>320
の質問にお答え頂けると助かります……
厚かましくてすみません。

02/11/08 11:46

これは本当らしいです。かなり選ぶのに参考になります。
ttp://isweb19.infoseek.co.jp/computer/atkinson/atkinson/osusume_book_ryouhou.htm

続き · 02/11/08 16:36

>>322
何か&が参照されちゃって、もう一回
#============#
# 設定完了 #
#============#

$string = &decode;
&deny;
if (!$string) { &form1; }--------------------変更
#if ($mode eq 'form') { &form1; } ------------削除またはコメントに
if ($mode eq 'into') { &regist('into'); }#-----変更
if ($in{'comment'} && $mode eq 'msg') { &regist('comment'); }
if ($mode eq 'bye') { &byebye; }
&form2;#---------------------------追加
&log_view;

続き · 02/11/08 16:39

あとフォーム２で
target="log"
を削除する。（リロードのたびにウィンドウが開くため）
とりあえずなのでHTMLは変です。（</head>が２個になったり）

**310** · 02/11/09 12:28

>>324-325
四苦八苦しながらやってみたら、一画面で動きました！
とりあえず使う分には問題なさそうなので、HTMLの変な所は気にしないことにします。
どうもありがとうございました！

**nobodyさん** · 02/11/09 20:34

あの・・・マジで質問です
kent-webのaska.cgiにひみこーどをつけようと思うんですが
ほかの場所はうまくいったんですがここだけわからないんですよ
書き込み処理部分に

{ # 対フェイザーオンの場合は実際に発行されたコードかどうか照合
if ($FORM{'facheck2'} eq '') { &error('チェックコードエラー',"投稿コードが入力されてません(^^;;");
}
$dukecheck = $FORM{'facheck2'} . $FORM{'facheck3'};
if ( !open(DB,"$himicode_log") ) { &error('0'); }
@lines = <DB>;
close(DB);
$himikocheck=0;
foreach $line (@lines) {
chop($line);
if ($dukecheck eq $line) {
$himikocheck=1;
}
}
if ($himikocheck != 1) {
&error('x');
}
}
っていれたら、いくらひみこーどがあってても
チェックコードエラーってでてしまうんですよ
誰か教えてくれないでしょうか？

**nobodyさん** · 02/11/09 22:58

>>327
ウザイ
自分で考えろや豚野郎
二度と書き込むなボケ

**perlド素人** · 02/11/09 22:58

17氏スクリプトにdame処理を追加したいんですけど、
まったくわかりません…
どなたかやってみたことある方いらっしゃいますでしょうか？

…厨房質問なのでsage

**nobodyさん** · 02/11/10 00:06

>>329
おんぷちゃんねる

**nobodyさん** · 02/11/12 06:24

295のところにあったのですが
ttp://www.nurs.or.jp/~b3/scripts/proxy/
これを複数クライアント対応にできないでしょうか？
これを置いてあるところでは
数行書き換えるだけでできると書いてあるのですが
さっぱりわかりません・・・

これはperl串というものになるのですか？それともCGI串なのでしょうか。
ソースはリンク先に直接はってあります。
おながいします。

**331** · 02/11/12 18:29

説明が足りなかったようなので書き直します。
http://www.nurs.or.jp/~b3/scripts/proxy/
ここにある、CGI proxy(?)についてです。
リンク先に、ソースがそのまま貼ってあります。
多分100行無いと思います。

これは、IPが一致した一人のクライアントしか受け付けないのですが
これを複数のクライアントが接続できるようにしたいです。
forkしたあと、クライアント受付をすればよいのかもという所までは
思いついたのですが、どうすればよいのかわかりません。

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

**nobodyさん** · 02/11/13 02:29

>>331
何に使うわけ？
ただ「串」という言葉に惹かれてるだけっぽいが。ｗ

**331** · 02/11/13 03:44

>>333
そういうCGIを見つけたのは初めてなのでやってみたいだけという気持も大きいですけどｗ
ircで使えるみたいなので使おうかと。

【 スクリプト改造工房 PART 5 】

【スクリプト改造工房 PART 5 】