★三　【 スクリプト改造工房 PART 9 】　★三

1 ：nobodyさん：2006/03/32(土) 04:52:20 ID:WJnup8Dd

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

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

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

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

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

2 ：nobodyさん：2006/03/32(土) 05:04:33 ID:???

Berryz工房

3 ：nobodyさん：2006/03/32(土) 05:22:26 ID:???

スクリプトを改造しているけどうまくできない場合のヘルプはこちらで。

配布先でアドバイスが得られない場合、ここで聞けば
親切な人が助言してくれるかもしれません。

依頼テンプレ

【.　 CGI名 　.】　複数のバージョンがある場合には正確に　　　　　　 　（必須）
【配布先URL】　教えてくれる人が参照する場合があるので　　　　　　 （必須）
【. 置き場所 .】　配布先が閉鎖の場合、すぐ見られるようtxtなどで
　　　　　　　　　　upした場合、 デザインをhtmlで作成した場合など　　（任意）
【ヘルプ内容】　どのように改造したくてどのようにうまくできないか　　（必須）
　　　　　　　　　　機能・動作などを簡潔かつ詳細に

4 ：nobodyさん：2006/03/32(土) 05:23:36 ID:???

■ 前スレ
★三　【 スクリプト改造工房 PART 8 】　★三
http://pc8.2ch.net/test/read.cgi/php/1077525387/

■ 設置の方法がわからない場合には
ＣＧＩ設置について質問　【Part2】
http://pc8.2ch.net/test/read.cgi/php/1104624784/1 (テンプレ)

■ 自分で改造できない場合には
【 スクリプト改造依頼スレ 】(丸投げ) part5
http://pc8.2ch.net/test/read.cgi/php/1141174205/1+3 (テンプレ)

5 ：nobodyさん：2006/03/32(土) 05:24:43 ID:???

http://pc8.2ch.net/test/read.cgi/php/1104624784/2 より

■ エラーメッセージについて

500エラーやInternal Server Errorって言うのは、エラーメッセージじゃないから、そんなもん書いても問題解決に繋がらない。
ちゃんとしたエラーメッセージを書くように。

エラーメッセージはログに記録されている。
ログのありかがわかんないときは、サーバの管理人に問い合わせる。

もしくは、モジュールが入っている事が前提だが、
２行目に
use CGI::Carp qw(fatalsToBrowser);
の一文を挿入する。
したらエラーメッセージがブラウザに表示される。

あとは修正すればよい。
自分で修正できなかったら、エラーメッセージも書いて質問しる。

※ 共有サーバでいきなりテストせず、自宅のPCでテストできる環境を作れ

6 ：>>3-5：2006/03/32(土) 05:28:07 ID:???

要るのかどうかわからんけど、スレだけひょっこり立ってたので貼っといた。
要らないもんだったら(>>5とか)ごめんよ。

7 ：nobodyさん：2006/03/32(土) 08:52:31 ID:KTTgIZMg

http://www.sf.airnet.ne.jp/%7Ets/filter/kogo.cgi?url=http%3A%2F%2Fpc8.2ch.net%2Ftest%2Fread.cgi%2Fphp%2F1143834740%2F

8 ：nobodyさん：2006/04/02(日) 21:43:33 ID:PlGfFHws

ffffff

9 ：nobodyさん：2006/04/05(水) 00:16:10 ID:x6iRtw62

氏ね

10 ：nobodyさん：2006/04/12(水) 02:39:38 ID:haUSJSue

どっこらせ

11 ：nobodyさん：2006/04/15(土) 04:45:18 ID:???

はじめまして。
丸投げスレでレスが得られなかったので自分でやってみようとこちらに来ました。
書き込みが消える条件を変更したいのですが。。。

【.　 CGI名 　.】　烏合MEET1.54.b
【配布先URL】 作者HP
　　　　　　　　　 ttp://www.ugou.net/labo/frame.html
ダウンロード
ttp://www.ugou.net/labo/cgi/dlc/dlc.cgi?file=meet154b.zip

【. ヘルプ内容 】　現在、ログは一定件数で消えていく仕様ですが、
　　　　　　　　　 これを例えば１週間とかの時間で古い順に消えるように
　　　　　　　　　 したいのですが、可能でしょうか？

12 ：11：2006/04/15(土) 04:53:41 ID:???

b_write.cgiの90行目の条件を日付に変えれば良さそうな気がしているのですが、
データに日付の項目を加えておかないと駄目ですかね？

13 ：nobodyさん：2006/04/16(日) 02:54:35 ID:???

>>11-12
書き込み時に日付データも加工して入ってるね。
この日付の加工タイミングをずらすも
新たに消去処理用の日付データを追加するもそのあたりは自由。

問題点としては消去のタイミングが書き込み時のみになること。
書き込みの多い掲示板ならいいだろうけど
そうでないなら、表示処理のところに仕込んでもいいと思う。

14 ：nobodyさん：2006/04/16(日) 04:15:48 ID:???

誘導されてきました。ヨロシクお願いします。
【　 CGI名 　】　携帯絵文字対応BBS「SmallPICT」　（Ver2.161）
【配布先URL】　 http://hdml.cside.com/DLcgi/spict/
【ヘルプ内容】　1.機種情報を表示しないようにしたいのですがどこを消したらいいのかわかりません。
　　　　　　　　　2.アクセス解析のタグを挿入したいのですがどこに入れたらいいのかわかりません。
　　　　　　　　　init.cgiの53行目辺りかと思ったのですがエラーが出てしまいます。
どうぞヨロシクお願いします。

2.の挿入したいタグはアクセス解析dopvSTAR*のもので以下のような感じです。（見本のまま貼っておきます。）

<a href="http://tech.bayashi.net/">
<script type="text/javascript" language="JavaScript">
<!--
//----- ログ取得CGIへのパス(相対パスもしくはURL)
var pa = "パス/dsw.cgi";
//----- ページ名(半角英数文字のみ)
var pg = "ページ名";
//----- 出力タイプ(g=gifカウンタ, p=pngカウンタ, m=gifロゴ, n=出力ナシ)
var p = "g";
//----- カウントアップしないなら "no"
var cnt = "";
var a="&&"; var pf=navigator.platform; var lng=navigator.language;
var swh=screen.width+"x"+screen.height;
var cd=screen.colorDepth; var pd=screen.pixelDepth; var rf=document.referrer;
document.write("<img src='"+pa+"?xx=",new Date().getSeconds(),a+"pg="+pg+a+"p="+p+a+"md=j"+a+"cnt="+cnt+a+"pf="+pf+a+"lng="+lng+a+"swh="+swh+a+"cd="+cd+a+"pd="+pd+a+"rf="+rf+"' alt='アクセス解析' border='0' />");
// -->
</script>
<noscript>
<img src="パス/dsw.cgi?pg=ページ名&&p=g&&md=nj" alt="アクセス解析" border="0" />
</noscript>
</a>

15 ：nobodyさん：2006/04/16(日) 13:49:39 ID:???

>14
とりあえず1.だけ。
スクリプトだけをざっと眺めただけなんで、てきとう対処だけど。
sub dispUAってサブルーチンの最後、
return($ua); （2643行目くらい）
という行の前に
$ua = '';
という1行を入れる。

16 ：nobodyさん：2006/04/16(日) 18:27:42 ID:CDJOsfar

Kentのaskaで設定した書き込んだ人のパスと管理パスと二つで記事を消すようにしたいんだけどどうすればいいかな？

17 ：nobodyさん：2006/04/16(日) 18:48:10 ID:???

>>16
>>3

18 ：nobodyさん：2006/04/16(日) 18:58:50 ID:CDJOsfar

しっかりと書きますね。

【.　 CGI名 　.】　askabbs
【配布先URL】　http://www.kent-web.com/
【. 置き場所 .】　http://www.kent-web.com/
【ヘルプ内容】　設定した書き込んだ人のパスと管理パスと二つで記事を消すようしてたいのですがどうやればいいのですか？

19 ：nobodyさん：2006/04/16(日) 19:14:23 ID:???

しっかりと書いてないじゃん

20 ：nobodyさん：2006/04/16(日) 20:09:43 ID:???

どのように改造したくて

「どのようにうまくできないか」　　

21 ：nobodyさん：2006/04/16(日) 22:14:52 ID:???

>18
日本語でおk

22 ：14：2006/04/17(月) 02:05:34 ID:???

>>15
すごいです！ありがとうございます。
1行入れただけで、機種表示が消えて思うように表示されました。
今まで消すことばかり考えていたのでビックリしました。
本当に助かりました。

2.も引き続きお願いします。

23 ：nobodyさん：2006/04/17(月) 05:29:24 ID:???

>>22
>init.cgiの53行目辺り
これ、ヒアドキュメントでできそうな気がする

24 ：nobodyさん：2006/04/17(月) 08:35:25 ID:???

>>22
つか自分で解決する気無いなら丸投げ行けよ

25 ：nobodyさん：2006/04/17(月) 14:33:06 ID:???

>>14
>>24の通り、スレ違いだと思うけど。

まず解析タグの中にある"を全部\"にしてから
int.cgiの５８行目
</b>と";の間に挿入。

解析タグのパスとかページ名の書き換え方は自分で考えて。
それでも上手くいかなかったら所得方法をIMG式に換えてみる(その場合も\"に)。

26 ：nobodyさん：2006/04/17(月) 15:12:28 ID:???

>>23,25
modulesディレクトリのファイル見ると解るけど、携帯用モジュールは
$BBSsubtitle変数読み込んでいないので、それだとPCからのログしか取れないと思う。
ヘッダとかも全部独立してるし、結構面倒臭い作りになってるな〜コレ。

27 ：25：2006/04/17(月) 16:02:06 ID:???

>>26
それは解っていて、やりやすい方を書きました。
丸投げの方で
>携帯は…どうなんでしょうか？PCで携帯の絵文字を表示させたいだけで
>携帯では殆どアクセスしませんです。
と書かれてたので。

携帯ログもとるにはmodukesの中身のjsky,imode.plで
<body $bodyColStr　で検索して出てきたbodyタグの直後に
IMG式の解析タグ（"を全部\"にしてから）を挿入。

ezweb.pl141行
$title = "<CENTER>$BBStitle$hr2\n";　　"と<CENTER>の間
wap2.pl146行
$title .= "</p>$hr2\n";　　"と</p>の間
にそれぞれIMG式の解析タグ（"を全部\"にしてから）を挿入。
eawebの方はリンクタグを外さないと動かないかもしれない。
(解析の配布元では推奨してはいないが)

28 ：14=22：2006/04/17(月) 23:11:02 ID:???

>>23-27
ありがとうございます。
そんな面倒な物とは知らずにすみませんでした。
>>27
丸投げから誘導されたのですが、あちらの書き込みも見て下さってありがとうございます。
>>14に書いた内容だけでなく、携帯ログもとることができました。
本当に感謝しています。

29 ：25：2006/04/17(月) 23:46:50 ID:???

>28
どうやら成功したようでなによりです。

上でも書いたけど
ezweb.plの書き換えの結果、エラーが出そうなのが心配だ。
古いAu携帯でちゃんと見れるか確認した方が良いと思う。
記述のルールを守らないと
簡単にコンパイルエラー(表示不能)が起きてしまう。
古いAu携帯は少ないと思うからログを取らないという選択もあり。

30 ：nobodyさん：2006/04/19(水) 06:42:18 ID:???

>>29
古いAu携帯で来ている人が知り合いにはいないので
しばらく様子見てみます。
ありがとうございました。

31 ：nobodyさん：2006/04/21(金) 03:13:21 ID:aLUgf6D1

【.　 CGI名 　.】　Color Text
【配布先URL】　ttp://www2u.biglobe.ne.jp/~APercher/retro/cgi/cgi_d01.htm#colortx
【ヘルプ内容】　
Submitを押したときに何も入力してないと「名前（orコメント）が入力されていません」と出てしまうので
そのメッセージを無視して更新されるようにしたい（URLとMAIL構文は削除済み）

自分で色々やってみたのですが、リロードは出来てもメッセージが送信出来なくなったり
コメント部分が空白になって送信されてしまったりでもう何がなんだか・・・

32 ：nobodyさん：2006/04/21(金) 12:31:39 ID:y1+BKuBn

ifで分けるだけじゃダメなのか

33 ：31：2006/04/22(土) 06:22:53 ID:Klpi7ULf

>>32
ifだけだとちょっと分かりそうもないので丸投げのほう逝ってみます・・

スレ汚しすみませんでした。

34 ：nobodyさん：2006/04/26(水) 11:28:36 ID:???

ID:hyGH423P　はただの荒らしですので、皆さん構わないよう注意して下さい

複数スレマルチポスト・コピペ報告スレ35@全板共通
http://qb5.2ch.net/test/read.cgi/sec2chd/1143873802/478-481

35 ：nobodyさん：2006/05/04(木) 15:41:53 ID:79IZMTvl

【.　 CGI名 　.】　searchengine.cgi
【配布先URL】　ttp://www.we-re.net/library/cgi/search/index.htm (説明＆設置用HTMLソースはこちら)
【. 置き場所 .】　ttp://www.we-re.net/library/cgi/search/searchengine_cgi.txt (スクリプト本体)
　　　　　　　　　
【ヘルプ内容】　34行目の &jcode'convert(*value,'sjis'); の変換指定文字コードを
　　　　　　　　　 選択した検索エンジンごとに個別に指定したいのですが、
　　　　　　　　　 45行目以降の選択エンジン判定用の各if構文に34行目の記述を移す形で
　　　　　　　　　 それぞれ付け加えてみても文字コード変換が反映されません。
　　　　　　　　　 この場合、どういう記述にすれば上手くいくのでしょうか？
　　　　　　　　　 jcode.plが入っていないとかエラーが出たとかはいう事はありません。

36 ：nobodyさん：2006/05/05(金) 00:34:45 ID:???

【.　 CGI名 　.】　nicky.cgi
【配布先URL】　http://www.din.or.jp/~raelian/ReadMeNicky.html
【 ヘルプ内容 】　
SpeedyCGI対応。
要するにグローバル変数名を割り出せればいいと思われる。
しかし、nickyは人気がある割りにこの手の情報は皆無。

http://tech-web.net/perl_memo.html#8
ここを参考に出てきた変数を初期化したが不完全。
落ちはしないが、書き込みの初期状態時にゴミが入っている不具合あり。

他にexitの前にundef %USER_VARS;を全て入れてみたが過去ログが表示されない。

仕方がないので、手作業でグローバル変数名割り出し中だが、連休全て使っても恐らく半分も進まない。

なんとかうまい方法を知っている職人を求む。

37 ：nobodyさん：2006/05/05(金) 03:33:23 ID:???

>>36
use strict;

38 ：nobodyさん：2006/05/05(金) 04:33:09 ID:???

>>36
元々SpeedyCGIを意識してないスクリプトを対応させるのは大変だから
情報なんか無くて当たり前だが・・・。

しかし人気があるものに限って凄い作りしてるよね。

39 ：nobodyさん：2006/05/05(金) 05:17:55 ID:???

>37
thx
効率上がりそうだ。
local宣言もひっかかるのが難点だが。
ひっかかったもの丸ごと全部初期化するのが無難？

40 ：36：2006/05/05(金) 09:24:19 ID:???

作業終了。

手順
１．use strict 'vars';を宣言。
２．local変数をすべてmy変数に置換。
３．スクリプトを実行。
４．エラーログにグローバル変数が全てはかれる。
５．エラーログをエディタで整形して初期化ルーチン作成（定数部分は初期化しない）。
６．元のスクリプトを処理開始時点で初期化ルーチンを呼ぶように変更。

以上、数時間でnickyのSpeedyCGI化完全終了。

連休に時間ができた。

>37はネ申

41 ：nobodyさん：2006/05/05(金) 10:19:06 ID:oFARAoVx

【.　 CGI名 　.】
■2ch風掲示板
【配布先URL】
http://perl.toshinari.net/cgi/bbs/new2ch/index2.html
【. 置き場所 .】　配布先が閉鎖の場合、すぐ見られるようtxtなどで
　　　　　　　　　　upした場合、 デザインをhtmlで作成した場合など　　（任意）
【ヘルプ内容】
■携帯対応のレンタル用に改造して頂きたいです。

必要に応じて金もはらいます。是非よろしくお願いします。

42 ：nobodyさん：2006/05/05(金) 11:26:40 ID:???

>>41
丸投げ行けよ。

43 ：nobodyさん：2006/05/07(日) 00:52:21 ID:NJ/WTSjH

【.　 CGI名 　.】サイト内検索
【配布先URL】http://siriasu.s10.xrea.com/cgi/wsrch/wwwsrch.htm
【ヘルプ内容】こんな感じになりました
　・フォームに半角カナがあると文字化けを起こして検索できない
　・検索がきちんと行われてもヒントとして表示されるヒント文が文字化けを起こす

Shift-JISのファイルを検索したいのですがどなたかアドバイスお願いします

44 ：大吉：2006/05/07(日) 07:26:21 ID:ATirsoGK

【.　 CGI名 　.】lilbox
【配布先URL】http://www.websmith.co.jp/lilbox/
【ヘルプ内容】サンプルを動かしてアソシエイトの商品一覧は表示されるのですがレビューも
　　　　　　　合わせて表示したいと思っています。是非お力添えをお願いいたします。

45 ：nobodyさん：2006/05/07(日) 07:55:28 ID:???

>>44
マルチするな、ボケ。
http://pc8.2ch.net/test/read.cgi/php/1141174205/303
302 名前：大吉 投稿日：2006/05/07(日) 07:28:04 ID:ATirsoGK
【.　 CGI名 　.】lilbox
【配布先URL】http://www.websmith.co.jp/lilbox/
【ヘルプ内容】サンプルを動かしてアソシエイトの商品一覧は表示されるのですがレビューも
　　　　　　　合わせて表示したいと思っています。是非お力添えをお願いいたします。

46 ：nobodyさん：2006/05/10(水) 09:22:54 ID:???

【.　 CGI名 　.】　成分解析/Ruby実装(060419日版)
【配布先URL】　http://www1.dks-web.com/seibun/
【ヘルプ内容】　解析結果をTEXTAREAで表示させたいのですが
　　　　　　　　　　結果表示のソースがどれなのかわからなくて・・・お助け願います

47 ：nobodyさん：2006/05/15(月) 18:04:30 ID:MEub9acq

よろしくお願いします。

【.　 CGI名 　.】　もっと書き込み隊
【配布先URL】　http://tackysroom.com/cgi_mkakikomitai.htm
【ヘルプ内容】　掲示板スパム対策として、URL欄とコメント欄に同じURLが含まれるときに弾くようにしたいのですが、
　　　　　　　　どのように記述すればよろしいのでしょうか？

48 ：nobodyさん：2006/05/15(月) 22:46:21 ID:???

>>47
まったく検討がつかないなら丸投げに行けよ

49 ：47：2006/05/15(月) 23:01:16 ID:???

>>48
すみません。移動します。
誘導ありがとうございました。

50 ：nobodyさん：2006/06/06(火) 03:34:14 ID:3gCz1oqj

【.　 CGI名 　.】　BBSNote V8 b版　bbsnote.cgi
【　up先URL 】　http://hipee.moe.hm/index.php　の　2324.zip
【配布先URL】　http://wondercatstudio.com/html/v8.html
【ヘルプ内容】　名前欄の空欄投稿で”名無し”表示させる

$maeno_name = $name;#クッキーセット用
if($name eq ""){
$name = '名無しさん';
}

上の記述を
#書き込み処理950行目あたりにいれてみたけど上手くいきませぬ
助言願います。

51 ：nobodyさん：2006/06/09(金) 04:01:20 ID:???

５０解決しました

52 ：nobodyさん：2006/06/11(日) 12:45:12 ID:gbv6O4j7

【.　 CGI名 　.】　YY-BOARD5.6最新
【配布先URL】　tp://www.kent-web.com/bbs/yybbs/yybbs.cgi
【ヘルプ内容】　なんとかランダムアイコン機能を追加しました。下の奴です。
それに＋してランダムを選択しないと出てこない、
ランダム専用アイコンを追加したいのです。どうすればよいのでしょうか？
色々と試してみたのですが、私にはムリです。
秘密扱いにしたいので、アイコン一覧には表示したくありません。

$ico1 = 'space.gif i1.gif i2.gif・・';
$ico2 = 'ランダム 1 2・・・';

# アイコンランダム追加
if ($in{'icon'} eq 'space.gif') {
$in{'icon'} = $ico1[int(rand($#ico1)) + 1];

53 ：nobodyさん：2006/06/11(日) 13:50:15 ID:??? ?

>>52
if ($in{'icon'} eq 'space.gif') {
$ico1 = ($ico1, $ico2);
$in{'icon'} = $ico1[int(rand($#ico1)) + 1];

54 ：nobodyさん：2006/06/11(日) 14:17:19 ID:???

>>53
ありがとうございます。
$ico1がファイルの場所で
$ico2が上に対となるファイルの名前になります。セットです。

初めは$ico1だけ書けばアイコン選択で出ないと思ってたのですが、
名前無しのアイコンが選択画面、アイコン一覧画面に出てきてしまい。
どうすればいいのかと思いました。
$ico3をどうにかして作るしかないのでしょうか。

55 ：nobodyさん：2006/06/11(日) 18:24:24 ID:???

>>52
>>54
それは$ico1基準で表示されてるから。$ico2基準で一覧作ってもらえればその通りになる。
表示するところのコード見たらいい。
もしくはランダムに選ぶ時だけマージする$specialico = ...みたいなのを用意しておくとか。

56 ：52：2006/06/11(日) 22:27:03 ID:???

>>55
表示に関係してそうな点が2箇所ありました。
<select name=icon>\n";
foreach(0 .. $#ico1) {
if ($ico eq $ico1[$_]) {
print "<option value=\"$_\" selected>$ico2[$_]\n";
} else {print "<option value=\"$_\">$ico2[$_]\n";}}
print "</select>\n";


<tr>
EOM
@ico1 = split(/\s+/, $ico1);
@ico2 = split(/\s+/, $ico2);
$i=0; $j=0;
$stop = @ico1;
foreach (0 .. $#ico1) {
$i++; $j++;
print "<td><img src=\"$imgurl$ico1[$_]\">
$ico2[$_]</td>\n";
if ($j != $stop && $i >= 10) {
print "</td><tr>\n";

これをどういじればよいのでしょうか？よろしければお願いします。

57 ：nobodyさん：2006/06/11(日) 23:47:37 ID:??? ?

>>54
ああそう、
てかスクリプト自体を見てないから何とも言えないけど、

$i = 0;
foreach $tmp(@ico2)
{
if ($tmp eq "") {splice(@ico2, $i, 1);}
$i++;
}

で

58 ：nobodyさん：2006/06/12(月) 01:53:05 ID:???

>>57
ありがとうございます。
早速53の部分を57に変えてやってみました。
そうしたらランダムを選んだときだけアイコンが表示されないようです。
難しいですね。これは。

59 ：nobodyさん：2006/06/12(月) 09:00:16 ID:???

>>58
丸投げ行けば？

60 ：nobodyさん：2006/06/14(水) 01:51:16 ID:???

>>59
そちらにいってみます。