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

1 名前：nobodyさん [2006/03/32(土) 04:52:20 ID:WJnup8Dd] #================================ # スレッドの説明 #================================ 「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。 質問するときは以下の点に注意して書いて下さい (1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い) (2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し) (3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い ※答えてくれないからといって逆ギレする厨はお断り 105 名前：nobodyさん mailto:sage [2006/10/08(日) 14:26:54 ID:???] 【CGI名】 Webclap 【配布先】 guron.net/ 【置き場所】 guron.net/document/dl/cgi/webclap.php 【ヘルプ内容】 UTF-8化しようとして拍手は送れるがコメントが送れない状態になっています。 全ファイルの文字コードをUTF-8にしてwebclap.cgiに以下の変更を加えました。 002　use open ":utf8"; を追加 059　"sjis" を "utf8" に変更 578　charset=shift_jis を charset=utf-8 に変更 603　charset=shift_jis を charset=utf-8 に変更 恐らく間抜けなことをしているのだと思いますが、よろしければご指摘下さい。 106 名前：nobodyさん mailto:sage [2006/10/08(日) 16:56:48 ID:???] エラーメッセージは？ 107 名前：nobodyさん mailto:sage [2006/10/08(日) 17:05:09 ID:???] >>105 その置き場所って本当にお前がこのCGIを置いた場所か？ 108 名前：105 mailto:sage [2006/10/08(日) 21:25:50 ID:???] >106 KCatch.pmで 　 [clap.cgi:226:warn] Wide character in print at 　E:\www\koiyami\uru\clap\clap.cgi line 226, <out> line 21. と出てくるので、とりあえず226行目に　utf8::encode($tag);　を追加してみました。 エラーは出なくなりましたがやはりコメントは送れないままでした。 >107 すみません【配布先URL】です。 コピペしてそのまま書き込んでしまいました。 109 名前：nobodyさん mailto:sage [2006/10/08(日) 21:42:36 ID:???] httpdのエラーログを出せハゲ。 110 名前：105 mailto:sage [2006/10/08(日) 21:59:29 ID:???] >>109 特にCGIのエラーらしきものは見えないのですが、以下になります。 errors.log Sun Oct 08 21:54:59 2006 Error Response 404 Thread 0(ID= 2892) to 127.0.0.1 for "/favicon.ico" 111 名前：nobodyさん mailto:sage [2006/10/09(月) 01:37:59 ID:???] ﾊｹﾞﾜﾛﾀwww 112 名前：aoki [2006/10/21(土) 12:31:47 ID:Z1KRvl//] CGI名■KENT WEBさんのYY-CHAT 配布場所■www.kent-web.com/chat/index.html 改造内容■同じくKENT WEBさんのWindyのように、YY-CHATをノーフレーム式（アイコン有）で表示したいのです。 YY-CHATの機能をそのまま使いたいので、YY-CHATを改造して、フレーム形式をノーフレーム形式に変換希望。 Windy、YY-CHATのソースを見比べてみたのですが、フレーム式からノーフレーム式への転換がやはり分かりません。 どなたかご存知の方、ご指摘いただければ幸いです。 113 名前：nobodyさん mailto:sage [2006/10/21(土) 18:26:33 ID:???] リロードで書き込み中の下書きが消えちゃうけどいいのか？ 114 名前：aoki [2006/10/21(土) 20:15:32 ID:Z1KRvl//] お返事ありがとうございます。リロードは初期設定を手動にして、リロード設定部分を削除しますので、大丈夫です。 すぐにお返事が頂け、嬉しいです。宜しければご指導お願い致します。 115 名前：aoki [2006/10/21(土) 20:18:20 ID:Z1KRvl//] ↑追記↑要するに、フレーム非対応の携帯でも使えるようにしたいのです。 よく、携帯用のチャットは手動ですので大丈夫です。 116 名前：nobodyさん [2006/10/23(月) 02:38:52 ID:oT4S3DMg] 【.　 CGI名 　.】　PatiPati - Version 3.0 - 【配布先URL】　www.gnbnet.com/ 【. 置き場所 .】　www.gnbnet.com/cgi/?mode=mail 【ヘルプ内容】　 ttp://www.gnbnet.com/bbs/index.cgi?mode=view&seq=391 ↑の人と同じことを思ったので質問させて下さい。 ________________________________________________ 拍手ボタンを押す→最初の画面が出る→後の画面はランダムに表示 という表示は可能でしょうか？ 一番最初の画面だけ固定して、その後の画面をランダムにしたいのですが… 宜しくお願いします。 ________________________________________________ の書き込みに、制作者は ________________________________________________ 申し訳ありませんが、こういった要望に対応しているとキリがなくなりますので、 ご自分で改造などして対処してくださるようお願いします。 ________________________________________________ と言っているのですが、どう改造すれば良いのかわかりません。 どうぞ宜しくお願いします。 117 名前：nobodyさん mailto:sage [2006/10/23(月) 08:51:22 ID:???] >>116 自分で改造する気が無いのなら丸投げへ 118 名前：nobodyさん mailto:sage [2006/10/24(火) 04:33:25 ID:???] <?php echo "Hello World"; ?> これをWeb2.0風に改造してください。 119 名前：nobodyさん mailto:sage [2006/10/24(火) 07:03:03 ID:???] 一個前のレスも読めない君の亀田級の脳味噌には佐賀県庁の職員一同も心底がっかりだ。 120 名前：nobodyさん mailto:sage [2006/10/24(火) 14:21:29 ID:???] 私の力量では改造ができませんでした。ご助言 よろしくお願いします。 【. CGI名 .】　　 Revision 1.80 （perlのBBS） 【配布先URL】　　 ttp://revision.s22.xrea.com/ 【. 置き場所 .】　ttp://revision.s22.xrea.com/dlpage.htm 【ヘルプ内容】　　一定数以上の投稿があると、古いログから削除されていくところを、 　　　　　　　　　別のファイルに書き出して保存できるようにしたい。（過去ログ機能の実装） 以上、よろしくお願いします。 121 名前：nobodyさん mailto:sage [2006/10/24(火) 14:56:57 ID:???] 何をどうやったらどう駄目だったのかを書いてアドバイスをもらうのがこのスレ。 それも理解できない丸投げ野郎はもう死んでいいよ。スレ違いを指摘するのもかったるい。 122 名前：aoki [2006/10/24(火) 17:44:33 ID:QIrlktk5] >>121さん、本当に申し訳ございませんでした。ご指摘頂き、ありがとうございます。 >>112の追記です。 自分なりにWindyより、見よう見まねでYY-CHATと引っ付けた、という感じとなってしまいました。このままでは無理だとは思いますが、どのように変更して良いかがわかりません。 基本設定以降が ttp://www.geocities.jp/aokiaoki_332/yychat.html です。 YY-CHATをWindyのように、ノーフレーム版（アイコン有り）で表示したいのです。 「Script Error」と表示されてしまいますので、宜しければご存知の方、ご指摘の程、お願いいたします。 123 名前：nobodyさん mailto:sage [2006/10/24(火) 20:07:51 ID:???] エラーメッセージは？ 124 名前：aoki [2006/10/24(火) 23:35:55 ID:QIrlktk5] 早速のお返事ありがとうございます。今転送しなおしてみた所、著作権部分の「KENT」と出てくるだけとなっておりました。 ttp://www.geocities.jp/aokiaoki_332/chat.html この状態です。本体や入り口が表示されずに、著作権部分だけ表示されました。 125 名前：nobodyさん mailto:sage [2006/10/24(火) 23:44:49 ID:???] >>124 つかWindyにアイコン表示つけたほうが速くないか？ yychatをノンフレームに改造するのは相当大変だぞ 126 名前：nobodyさん mailto:sage [2006/10/24(火) 23:53:42 ID:???] >>124 それは分かったからとっととエラーメッセージの詳細を出せやコラ。 まさかろくに動きもしない駄目スクリプトをローカルでチェックもせずにアップしてるのか？ 127 名前：aoki [2006/10/25(水) 00:23:46 ID:SpiYIrSU] >>125さん>>126さん 早速のお返事ありがとうございました。 メイン処理部分の部分を一部変更して転送し直したところ、エラーメッセージは出ずに著作権部分しか表示されなくなっていました。 やはりWindyの方につけた方が良いのですね。助言ありがとうございました。 自分の知識不足ですので、また出直してまいります。 レス下さった方、本当にありがとうございました。 128 名前：118 mailto:sage [2006/10/25(水) 00:26:03 ID:???] すいませんでした。向こうで聞いてきます。 129 名前：nobodyさん mailto:sage [2006/11/03(金) 18:19:09 ID:???] 【CGI】URL Geter 【配布先】ttp://www.cp-2icro.com/dlpage/info_coll/urlget/ 【内容】 このCGIが気に入っているのでアクセス解析として使いたいのですが リンク元に「その他・ブックマークなど」の項目を追加することはできないでしょうか？ 130 名前：nobodyさん mailto:sage [2006/11/03(金) 18:31:35 ID:???] てきるできないで言うならそりゃできる。 131 名前：nobodyさん mailto:sage [2006/11/03(金) 21:29:16 ID:???] 【.　 CGI名 　.】　cmcboard.zip v0.23 【配布先URL】　cgi-lounge.eek.jp/ 【ヘルプ内容】　 先月未明からi-パラダイス（www.i-paradise.nu/）に設置してある、 サイト内コンテンツの一つであるアップローダーの記事投稿が不可能な状態です PostModeでの記事投稿前の認証を試みますが、 パスワードを入力し認証ボタンを押した次の瞬間空白のページに（ソースを見たところ無記述）移動してしまい、 ファイルのアップロード自体が出来ず、 PostMode以外での投稿はファイルがアップロードされる直前に先述したページが表示され、 ファイルのアップロードが無効になってしまうという状態です Check Modeでのcgiの動作確認も試しましたが、各種パーミッション設定・各種パス等には異常は見受けられませんでした また、この事象と併発するかのように、以前は見られなかった携帯閲覧時の502エラーも見受けられます 試しに他のレンタルサーバーのアカウントを取得し、上記cgiの設置・動作確認を試みてみたところ、 特に問題なくPostModeでのログイン・ファイルのアップロード、通常のファイルアップロードが出来ました 132 名前：131 mailto:sage [2006/11/03(金) 21:30:51 ID:???] 続きです 管理元にその旨問い合わせを行ったところ、 ＞おそらく記事投稿前の認証時の不都合は広告挿入が邪魔をしていると ＞思われますので、その処理の部分に<!--banner-->を挿入して ＞広告の位置を変更してください。 ＞<!--banner-->はHTMLの部分に記述しなければ有効になりませんので、 ＞CGIの処理の流れを見て頂く必要が御座います。 ＞目安として該当の認証を押した後の<BODY>が記述される直後か、 ＞更にいくつか下に設定されると良いと思います。 とのことでした ＞その処理の部分に<!--banner-->を挿入　の部分の処理の手順が分からなく、今回質問を書き込んだ次第です お願いします 133 名前：nobodyさん mailto:sage [2006/11/04(土) 01:02:40 ID:???] まずサポートBBSで聞くべきではないかね？ 134 名前：nobodyさん mailto:age [2006/11/07(火) 16:18:05 ID:???] 【.　 CGI名 　.】Multiple Enquete　投票式アンケート 【配布先URL】popup.tok2.com/home/skry/labo/multiq/ 【ヘルプ内容】コメント欄の書き込みへの禁止ワードを設定したい。 配布先の更新がなく、公式のサポート掲示板 popup.tok2.com/home/skry/labo/support/nabla.cgi が死んでしまっているようなので、よろしくお願いいたします。 135 名前：nobodyさん [2006/11/07(火) 17:15:31 ID:5wPSAWJ0] 【. CGI名 .】　　 Web Patio 【配布先URL】　　 ttp://www.kent-web.com/index.html 【. 置き場所 .】　ttp://www.kent-web.com/bbs/patio.html 【ヘルプ内容】　　アイコン機能を付けたい。 わがままを言えば昇進機能も付けたい。 どうか宜しくお願いします<(_ _)> 136 名前：po ◆iwvS1vwsFQ mailto:sage [2006/11/07(火) 23:34:29 ID:???] >>134 バージョンがいくつかあるんだけどどれ？ >>135 無理 137 名前：po ◆iwvS1vwsFQ mailto:sage [2006/11/07(火) 23:36:48 ID:???] >>134 つーかそもそも落とせなかったよ。古いし、他の探したほうがいいかも。 138 名前：nobodyさん mailto:sage [2006/11/08(水) 13:01:27 ID:???] >>136 無理では無い気もするが まぁとりあえず俺にはできない 139 名前：nobodyさん [2006/11/10(金) 03:57:38 ID:l5C4yy5g] 【CGI名】　LQアクセス制限ライブラリー 【配布先URL】　ttp://www2s.biglobe.ne.jp/~cru/library/lq/ 【設置サーバ】　独自ドメイン 【　質問内容 】　ググったら丸投げや>>451を見つけました。 だが、書かれてるやり方ではCGIごとではなくサイト丸々全部を管理は出来るが、 自分のログを除外出来ないようです。 自分を除外するにはどこをいじればいいのでしょうか？ 140 名前：nobodyさん [2006/11/10(金) 04:11:11 ID:+7tgrk2T] age 141 名前：nobodyさん mailto:age [2006/11/13(月) 20:51:31 ID:???] age 142 名前：nobodyさん [2006/11/14(火) 20:12:31 ID:Zhg0+JNh] 【.　 CGI名 　.】　切って出し日記 【配布先URL】　ttp://wws.cside.com/cgi-plant/ 【. 置き場所 .】　ttp://wws.cside.com/cgi-plant/diary/ 【ヘルプ内容】　 最新の2件を切って出してJSファイルにするとき、 JSファイルの中身を以下のように出力できるようにしたい。 ---JS中身--- document.write('11/13　日記開始<br>'); document.write('11/14　更新<br>'); --ここまで 今は上の行と下の行が逆に出力されている。 143 名前：nobodyさん mailto:sage [2006/11/14(火) 20:16:50 ID:???] 最初は、日記のログに書き込む時に、頭に追記じゃなくて尻に追記する ように考えてみたのだが・・・ログがぐちゃぐちゃになった。 次にJSへ出力する時に順を変えてみようとしたのだが・・・ 「JSファイルに書き込みを〜回まで繰り返す」という処理になっていたので 出力する段階の配列をソートってわけに行かなかった。 144 名前：142 mailto:sage [2006/11/14(火) 20:17:46 ID:???] >>143=>>142です。sageたらIDも消えるんだった（・・・） 145 名前：nobodyさん mailto:sage [2006/11/14(火) 20:40:37 ID:???] >>142 置き場所つーのは『お前が』置いた場所だと何度言えばもうね。 …で、あんまちゃんと見てないけど、 外部JavaScriptへの出力ってkd_diary.cgiの800行目くらいからある部分のことかな。 だとしたら852行目の print JS "document.write(\'$w_line\');\n"; で直接書き出す代わりに適当な配列に格納して、855行目の close(JS); の手前でまとめて吐き出せば良いんじゃないかな。 配列に格納する時に先頭にねじ込めば順番は逆になると思うが。 146 名前：nobodyさん mailto:sage [2006/11/14(火) 23:12:23 ID:???] >>145 半分わかったような気がする。がんがってみる。ありがとん。 147 名前：nobodyさん mailto:sage [2006/11/14(火) 23:17:33 ID:???] おう頑張りな。 148 名前：142 mailto:sage [2006/11/15(水) 00:31:18 ID:???] できました。ありがとうございました（＞＜） 149 名前：nobodyさん [2006/11/25(土) 22:53:31 ID:ocCKf8uF] 【　 CGI名 　】　簡易データベース 【配布先URL】　 ttp://www.rescue.ne.jp/cgi/database/ 【ヘルプ内容】　検索ワードのログを保存したいです（例：log.txt） 　　　　　　　　　　どのようにすればよいのかアドバイスお願いします。 150 名前：nobodyさん [2006/11/26(日) 12:42:51 ID:Y4Eo2nyo] 【.　 CGI名 　.】　I-BOARD/2001 v2.4　　　　 　（必須） 【配布先URL】　www.cj-c.com/　　　　　　 （必須） 【. 置き場所 .】　www.cj-c.com/cgi_s/ibbs2001.htm　　（任意） 【ヘルプ内容】 ・連続投稿規制をつけたいのですが どのようにすればいいかわかりません。アドバイスお願いします。 ・トピック表示のときにレスしたあとに飛ぶページが掲示板のトップページなので レスしたあと飛ぶページをレスしたスレッドのページに飛ぶようにしたいのです。 アドバイスお願いします。 151 名前：nobodyさん mailto:sage [2006/11/26(日) 18:47:16 ID:???] >>150 ひとつめ 投稿のたびにＩＰを記録して同じＩＰなら規制すればいい ふたつめ Location 152 名前：150 [2006/11/26(日) 19:19:57 ID:tkb0DDKs] >>150ですが 説明不足でした。>>151さんすいません。 秒数で連続投稿規制をつけたいのです。 一回投稿したら、10秒は投稿できないようなものです。 よろしくお願いします。 153 名前：nobodyさん mailto:sage [2006/11/26(日) 21:17:21 ID:???] KENTのBBSからその部分パクればええやん 154 名前：150 [2006/11/26(日) 21:53:46 ID:tkb0DDKs] >>153 それってなにか違反になったりしませんよね？ 155 名前：nobodyさん mailto:sage [2006/11/27(月) 08:02:30 ID:???] 再配布とかしない限りはな 156 名前：150 [2006/11/27(月) 16:00:15 ID:kaXmljFh] 連続投稿規制をつけるほうほうがのってるサイトがあったら教えてください 157 名前：nobodyさん mailto:sage [2006/11/27(月) 16:14:05 ID:???] そんなピンポイントな方法は需要から考えてもそのものずばりが見つかるとは思えんし 大人しく自分で処理を考えるべきだと思うよ。死ぬほど簡単だし。 実際に動作するサンプルだってそこら中にあるでしょ。 158 名前：150 [2006/11/27(月) 16:19:00 ID:kaXmljFh] わかりました。 どうもありがとうございます。 159 名前：nobodyさん mailto:sage [2006/11/28(火) 16:35:21 ID:???] 連投規制の処理がKENTの著作だとは知らなかったｗｗｗ 160 名前：1/2 mailto:sage [2006/11/29(水) 22:10:10 ID:???] PatiPati ttp://www.gnbnet.com/patipati/ メッセージを送るためのフォームです。 これによって出力されるHTMLを改造したいのですが、 どのようにいじればよいものかと悩んでいます。 メッセージの送信ページでは2つの項目を用意していて、 <input type="text" name="com"> このようなinputで名前を送信し、 <textarea name="sub1"> このようなtextareaでメッセージを送信するしくみにしています。 デフォルトの設定では"com"の内容のみ送信され、 "sub1"はユーザがオプションで設置するようにマニュアルで書かれています。 メッセージを送信すると、 送信された内容が以下のように出力されるようになってほしいのですが、 <dl> <dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt> <dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd> </dl> 161 名前：2/2 mailto:sage [2006/11/29(水) 22:10:46 ID:???] 現状では以下のように出力されてしまいます。 <dl> <dt>（ここに、<input type="text" name="com">で送ったメッセージが入る） <dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd></dt> </dl> index.cgiを改造すれば解決できそうだということは予想がついていて、 70〜80行目あたりの「$QUERY{'com'}」や、 「$msg」あたりをいじれば解決できるだろうと思うのですが…。 なお、現在はそのへんを以下のように書いています。 $QUERY{'com'} .= "\n<dd>$QUERY{$wk}<\/dd>"; $msg = "<dl>\n<dt>$QUERY{'com'}<\/dt>\n<\/dl>"; CGIの知識はまったくないので、このへんをどのようにすればよいのかわかりません。 あと一歩でなんとかなりそうなので、 どなたかお力を貸していただけるとうれしいです。 162 名前：nobodyさん mailto:sage [2006/11/29(水) 22:23:36 ID:???] バージョンを書き忘れました。すみません。 2006/11/18 Ver3.2 です。 ついでに書いておきますと、 メッセージの送信ページのフォームは以下のように書いています。 <dl> <dt>名前</dt> <dd><input type="text" name="com" value="名前" size="40"></dd> <dt>メッセージ</dt> <dd><textarea name="sub2" cols="20" rows="4">メッセージ</textarea></dd> <dt>返信不要ならばチェックしてください。</dt> <dd><input type="checkbox" name="sub1" value="返信不要">返信不要</dd> <dt>送信ボタン</dt> <dd><input type="submit" name="submit" value="送る"></dd> </dl> 163 名前：nobodyさん mailto:sage [2006/11/29(水) 22:57:56 ID:???] そこまで分かればもう一歩だったのにな。 $QUERY{'com'} .= "\n<dd>$QUERY{$wk}<\/dd>"; $msg = "<dl>\n<dt>$QUERY{'com'}<\/dt>\n<\/dl>"; を $QUERY{'com'} .= "<\/dt>\n<dd>$QUERY{$wk}<\/dd>"; $msg = "<dl>\n<dt>$QUERY{'com'}\n<\/dl>"; にしてみそ。 164 名前：160 mailto:sage [2006/11/29(水) 23:43:59 ID:???] >163 どうもありがとうございます。 最初に謝らなければなりません。 >161でname="com"とname="sub1"についてのことを書きましたが、 >162で書いた通り、「返信不要」のオプション（name="sub2"）をつけております。 $QUERY{'com'} .= と $msg = を>161のように設定しているときは name="sub1"とname="sub2"の送信内容に問題がなかったので、 以下のように例文を端折って書いたのですが…。 <dl> <dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt> <dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd> </dl> >163さんの設定だと <dl> <dt>（ここに、<input type="text" name="com">で送ったメッセージが入る）</dt> <dd>（「返信不要」にチェックを入れた場合のみこの行が入る）</dd></dt> <dd>（ここに、<textarea name="sub1">で送ったメッセージが入る）</dd> </dl> このように「</dt>」が余計になってしまいました。 なお、name="sub2"にチェックしなかったときは希望通りになりました。 せっかく考えていただいてたいへん申し訳ないのですが、 必要な情報をすべて書かなかった私の失敗です。申し訳ございません。 165 名前：160 mailto:sage [2006/11/29(水) 23:53:49 ID:???] 「返信不要」の項目とメッセージを同時に送信しても 「</dt>」が入らなければよいのですが、そのような方法はありますか？ name="com"の内容を「○○」、name="sub1"の内容を「○○」などと、 各nameごとにHTMLのタグを書ければ都合がよいのですが、 元のソースがそういう仕様ではないようなので惜しいです。 もし不可能であれば、「返信不要」のチェックを使用することはあきらめて、 >163さんが書いてくださったものをそのまま使用したいと思います。 あと、>164で『、「返信不要」のオプション（name="sub2"）』と書いてしまいましたが、 正しくは、「返信不要」がname="sub1"で、メッセージがname="sub2"でした。 CGIの仕様で、もともとはメッセージをname="com"として送信するしくみになっているので、 そのへんの順番をいじったため、まぎらわしい文章になってしまいました。 166 名前：nobodyさん mailto:sage [2006/11/30(木) 00:38:52 ID:???] ループの前に $QUERY{'com'} .= "<dt>$QUERY{'com'}<\/dt>\n"; でループの中に $QUERY{'com'} .= "<dd>$QUERY{$wk}<\/dd>\n"; でループの後に $msg = "<dl>\n$QUERY{'com'}\n<\/dl>"; でどうよ。 167 名前：160 mailto:sage [2006/11/30(木) 01:25:36 ID:???] オリジナルのソースと照らし合わせてみたところ、 現在のソースもオリジナルと行番号が同じになっているので、 オリジナル版のソースの行番号を合わせて書きます。 >166 どうもありがとうございます。 「ループの前」というのは、 if($QUERY{$wk} ne ""){}（line69〜）の外側という意味ですよね？ 「while($i <= $sub_su){」（line67）と「if($QUERY{$wk} ne ""){」の間に $QUERY{'com'} .= "<dt>$QUERY{'com'}<\/dt>\n";（>166）を書いてみましたが、 <dt>〜</dt>が何度も出力されてしまいます。 $QUERY{'com'} .= "<dd>$QUERY{$wk}<\/dd>\n";（>166）はline73のそれに置き換え、 $msg = "<dl>\n$QUERY{'com'}\n<\/dl>";（>166）もline79のそれに置き換えてみましたが、 <dd>も同様に、何度も出力されてしまいました。 168 名前：nobodyさん mailto:sage [2006/11/30(木) 01:48:17 ID:???] 何でifがループなんだよ。 ループはそこのwhileだっての。 169 名前：160 mailto:sage [2006/12/01(金) 13:53:05 ID:???] >168 どうもありがとうございます。助かりました。 Proxomitronでグローバル変数の使い方を習っていたので、 それを応用することでとりあえず解決しました。 if($bk_ck == 0){（line65）の中に $QUERY{'total'} .= "<dt>$QUERY{'com'}<\/dt>"; を挿入し、 その後の$QUERY{'com'}をすべて$QUERY{'total'}に書き換えることで解決しました。 これで問題なければよいのですが…。 170 名前：150 [2006/12/03(日) 14:24:33 ID:MG/kBdop] 【.　 CGI名 　.】　I-BOARD/2001 v2.4　　　　　　 　（必須） 【配布先URL】　www.cj-c.com/　　　　　　 （必須） 【. 置き場所 .】　www.cj-c.com/cgi_s/ibbs2001.htm　　（任意） 【ヘルプ内容】　連続投稿15秒規制機能をつけたいのですが if(現在の時間 - 最終投稿時間 < 10秒)er{エラー10秒待ってください} if ($date - $Date{$_} < 15){&er_("<br>連続投稿は禁止です。");} このようにしたのですが 無理のようです。 わかるかたいたらアドバイスお願いします。 171 名前：nobodyさん mailto:sage [2006/12/03(日) 15:16:25 ID:???] それそもそも動いてるのか？ あとエラー出てるならエラー文書けや 172 名前：170 [2006/12/03(日) 18:22:28 ID:Ga649VF2] >>170 それはぼくにいってるんですかね？ 10秒規制を付けたいんですが いつ投稿しても「連続投稿は禁止です。」とでます。 173 名前：nobodyさん mailto:sage [2006/12/03(日) 18:33:18 ID:???] >>170 そんな部分的な変更点（しかも文法がおかしい）だけ見せられてもな おまえ自身よくわかってなさそうだし、現時点でのソースどこかにupして晒せ 174 名前：170 [2006/12/03(日) 19:23:11 ID:Ga649VF2] sakuratan.ddo.jp/uploader/source/date27912.txt こんな感じです。 175 名前：nobodyさん mailto:sage [2006/12/03(日) 19:54:33 ID:???] 最近のガキは計算の順序も知らんのか？ 176 名前：170 [2006/12/03(日) 20:20:18 ID:Ga649VF2] KENTを参考にしてみたんだが 177 名前：nobodyさん mailto:sage [2006/12/03(日) 21:31:55 ID:???] ヘタレだな。 178 名前：nobodyさん mailto:sage [2006/12/09(土) 20:08:53 ID:???] 【.　 CGI名 　.】 切って出し日記 Ver2.5 【. 置き場所 .】　wws.cside.com/cgi-plant/ 【ヘルプ内容】　 改造するのはkd_diary.cgiです。 1ページの表示と過去ログへの移行を、設定した件数ごとではなく 月ごとにしたい。 しかし・・・私の改造では、翌月の投稿をしても動作しませんでした。 ※ちょうど年も変わりますしね。 やってみたのは、このCGI内の ########################################## # ログデータ書きこみ ########################################## の部分。 179 名前：178 mailto:sage [2006/12/09(土) 20:10:20 ID:???] 以下の部分を・・・ 　if($LOGDATA >= $pagemax) { 　　$log_data = pop(@LOGDATA); 　　if($logmax >= 0) { 　　　($l_date,$l_comment,$l_face,$l_weather,$l_color_1,$l_color_2,$l_title,$l_time,$l_min) = split(/<>/,$log_data); 　　　$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log'; 　　　open(OLD,"$log_name"); 　　　@oldLOG = <OLD>; 　　　close(OLD); 　　　unshift(@oldLOG,"$log_data\n"); 　　　sort sorter1 @oldLOG; 　　　open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常'); 　　　print OLD @oldLOG; 　　　close(OLD); 　　} 　} 　if($logmax > 0) { 　　opendir(DIR,"$logdir") || &error('過去ログ格納ディレクトリがありません'); 　　@dirent = grep(/[0-9]+\.log/,readdir(DIR)); 　　@dirent_s = sort(@dirent); 　　@dirent = reverse(@dirent_s); 　　closedir(DIR) ; 　　if($dirent >= $logmax) { 　　　unlink ("$logdir\/$dirent[$dirent]")|| &error("過去ログ($logdir\/$dirent[$dirent])が削除できませんでした"); 　　} 　} 180 名前：178 mailto:sage [2006/12/09(土) 20:45:46 ID:???] 　　$log_data = pop(@LOGDATA); 　　　($l_date,$l_comment,$l_face,$l_weather,$l_color_1,$l_color_2,$l_title,$l_time,$l_min) = split(/<>/,$log_data); 　　#新規投稿データ↓ 　　　($n_date,$n_comment,$n_face,$n_weather,$n_color_1,$n_color_2,$n_title,$n_time,$n_min) = split(/<>/,$line); 　　#現在のログの月を取得 　　$olddate = substr($l_date,4,2); 　　#新規投稿データから月を取得 　　$newdate = substr($n_date,4,2); 　　#現在の月より、ログの方が大きかったら・・・。 　　if($olddate < $newdate){ 　　　$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log'; 　　　open(OLD,"$log_name"); 　　　@oldLOG = <OLD>; 　　　close(OLD); 　　　unshift(@oldLOG,"$log_data\n"); 　　　sort sorter1 @oldLOG; 　　　open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常'); 　　　print OLD @oldLOG; 　　　close(OLD); 　　　}elsif($olddate eq '12' && $newdate eq '1'){ 181 名前：178 mailto:sage [2006/12/09(土) 20:46:16 ID:???] 　　#もし投稿されたのが1月で、直前の月が1月なら。 　　　$log_name = $logdir .'/'. substr($l_date,0,4) . substr($l_date,4,2) . '.log'; 　　　open(OLD,"$log_name"); 　　　@oldLOG = <OLD>; 　　　close(OLD); 　　　unshift(@oldLOG,"$log_data\n"); 　　　sort sorter1 @oldLOG; 　　　open(OLD,">> $log_name")|| &error('過去ログファイル/ディレクトリ異常'); 　　　print OLD @oldLOG; 　　　close(OLD); 　　　} #ここまで 182 名前：178 mailto:sage [2006/12/09(土) 20:49:38 ID:???] あ・・・ミスったorz >>180＋>>181に変えた、ということです。 エラーなどはないのですが、 月が変わったことによる現行ページの更新ができないまま それまでのログにそのまま追加されてる感じです。 183 名前：nobodyさん [2006/12/24(日) 04:13:24 ID:9TMcOB7X] 【.　 CGI名 　.】 レス付き画像掲示板 imgboard 【. 置き場所 .】　www.big.or.jp/~talk/t-club/soft/mini_r6/index.cgi 【ヘルプ内容】　掲示板への投稿が一定数以上なければ、閲覧することが できない制限をつけたいのですが、わかりません。 （来訪者の割りに投稿者が少なく、ＤＯＭを減らしたいため） Perlコーディング初心者質問スレ Part 53 ⇒改造スレへ誘導されました。 184 名前：183 [2006/12/24(日) 04:14:08 ID:9TMcOB7X] ↓こんなのを考えてみましたが、どのあたりに置いたら良いのかわかりません。 （書込みルーチンが長すぎて） ##### 投稿数をcookieに保存する ##### &read_cookie# cookie読込(imgboardルーチン） $post_count = $COOKIE{'imgboard_post'} $new_post_count = $post_count++;#投稿数を1つ加算する # 有効期限を30日間に指定 ($sec, $min, $hour, $mday, $mon, $year, $wday) = gmtime(time + 60*60*24*30); @mons = ('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'); $date = sprintf("%s, %02d\-%s\-%04d %02d:%02d:%02d GMT", $week[$wday], $mday, $mons[$mon], $year+1900, $hour, $min, $sec); print "Content-type: text/html\n"; print "Set-Cookie: imgboard_post =$new_post_count; expires=$date; \n"; ----------------------------------------------------------- ##### 2回以上投稿があれば、掲示板の中身を表示する ##### &read_cookie# cookie読込(imgboardルーチン） $post_count = $COOKIE{'imgboard_post'} if ($post_count > 1) {# 2回以上投稿あるとき、 &top_html;# ヘッダ表示(imgboardルーチン） &output_form_html;# 投稿画面を表示(imgboardルーチン） &output_html("$file");# 掲示板を表示(imgboardルーチン） } else { &top_html;# ヘッダ表示(imgboardルーチン） &output_form_html;# 投稿画面のみ表示(imgboardルーチン） } 185 名前：183 [2006/12/26(火) 15:44:50 ID:p3+/o574] 自己解決、完成しました。 186 名前：nobodyさん [2006/12/28(木) 17:03:53 ID:6RqsItPR] 【.　 CGI名 　.】 Web Board Professional www.web-liberty.net/download/boardpro/index.html 　　　　　　　　　　　　　　（ただし、Ver.2.27です。最新はVer.3.15） 【ヘルプ内容】　転送アドレスを利用した上でクッキーを有効にしたい。 無料の転送アドレスを取得し、本来のアドレスを隠していますが、 そうするとクッキーが利かなくなってしまいます。 クッキーがリファラを記憶し、照合しているため、転送アドと不一致となり、無効となっているようです。 以下がクッキー関連の処理部分です。 どうかお知恵をお貸しください。 sub get_cookie { local($cookie_id) = @_; local %all_cookies = (); foreach (split(/; /, $ENV{'HTTP_COOKIE'})) { local($key, $value) = split(/=/); $all_cookies{"$key"} = $value; } foreach (split(/&/, $all_cookies{"$cookie_id"})) { local ($key, $value) = split(/:/); $value =~ s/&/&/g; $value =~ s/</</g; $value =~ s/>/>/g; $value =~ s/"/"/g; $cookie{&unescape($key)} = &unescape($value); } return %cookie; } 187 名前：186 [2006/12/28(木) 17:05:58 ID:6RqsItPR] 続きです sub set_cookie { local(*cookie, $cookie_id, $hold_days) = @_; if (time() > $cookie{'refresh'} + 60 * 60 * 24 * 30) { $cookie{'refresh'} = time(); } local @pairs = (); foreach (sort keys %cookie) { push(@pairs, &escape($_) . ':' . &escape($cookie{"$_"})); } local $new_cookie = join('&', @pairs); local $date = &gmt_date(time + 60 * 60 * 24 * $hold_days); if ($new_cookie ne $all_cookies{"$cookie_id"}) { print "Set-Cookie: $cookie_id=$new_cookie; expires=$date\n"; } return; } 188 名前：nobodyさん mailto:sage [2006/12/29(金) 13:59:16 ID:???] >>186 クッキーは異なるドメインは参照できない。 それに本来のアドレスを隠すといっているが、ばればれ。 とくにフレーム転送とか。 189 名前：186 mailto:sage [2006/12/29(金) 17:41:09 ID:???] >>188 根本的にダメなんですね。ありがとうございました。 190 名前：nobodyさん [2007/01/03(水) 10:54:46 ID:O8K3holw] : 191 名前：nobodyさん mailto:sage [2007/01/05(金) 12:33:37 ID:???] 【.　 CGI名 　.】　Ans.Q Customize Version（クッキー対応版）　　 【配布先URL】　www.non-policy.com/customize-box/ansq/#question 元々の配布先　www7.big.or.jp/~jawa/ 【ヘルプ内容】　Ans.Qの1.40をつかっていたのですが、 書き込みの時間を入れたくて、上記改造版を設置してみたのですが、 コメントがついてもその記事が一番上に移動しません。 どこをどうすればわからなくてこちらに来てしまいました。 元のサイトで配布されていたいた1.4バージョンは自動で移動していました。 よろしくお願いします。 192 名前：nobodyさん [2007/01/06(土) 02:34:41 ID:5JmlMvQ+] 【.　 CGI名 　.】　MSUBoard v0.15[PHP] 【配布先URL】　cgi-lounge.eek.jp/msuboard.php 【ヘルプ内容】　このスクリプト自体がauだけにしか対応していないので、3キャリア もしくはDoCoMoだけには対応してほしいです。よろしくお願いします。 193 名前：nobodyさん [2007/01/06(土) 03:38:24 ID:WO53R+Nq] 【.　 CGI名 　.】　PHP JoyfulNote 【配布先URL】　script.s16.xrea.com/index2.php 【ヘルプ内容】　画像掲示板なのですが、名前とコメントだけでも投稿できるため、 海外からの定期的なスパム投稿で困ってます。 新規投稿には画像添付が必須になるようにお願いします。 194 名前：nobodyさん [2007/01/06(土) 22:49:45 ID:lBOtCkKI] 【.　 CGI名 　.】　askabbs 【配布先URL】　www.kent-web.com/ 【. 置き場所 .】　www.kent-web.com/ 【ヘルプ内容】　 ・投稿する本文に半角カタカナがあったらエラーメッセージを出したい。 ・しかし「･」など、カタカナ以外はエラーにならないようにしたい。 本文を一旦EUCにして半角カタカナの有無を判定させるのはググればコードがあったので 以下のように書いてOKでした。 が、「・」が半角の場合までエラーになってしまいます。 カタカナ以外を半角カタカナと認識させないというのは、できないものでしょうか？ &jcode'convert(*message, "euc"); if ($message =~ /\x8E/) {&error("ERROR<br>半角カタカナが含まれています");} &jcode'convert(*message, "sjis"); 195 名前：nobodyさん mailto:sage [2007/01/06(土) 22:55:55 ID:???] >>193 海外からのスパム投稿なら、日本語を含まない投稿を遮断したら？ 196 名前：nobodyさん [2007/01/08(月) 19:16:50 ID:RAFN8Ic4] 【.　 CGI名 　.】テキストカウンタDX 【配布先URL】apps.cside.com/cgi/counter/txtcntdx/ 【. 置き場所 .】apps.cside.com/cgi/counter/txtcntdx/ 【ヘルプ内容】設定画面で直前のIPアドレスのカウント拒否はできるんですが、 直前ですので、リーロードがあるとまたカウントされたりしてしまいます。 できれば２４時間以内に同一ＩＰはカウントをしないなど改造できないでしょうか。 自分では非力でできませんした。 どうかよろしくお願いします。 197 名前：nobodyさん [2007/01/09(火) 21:22:59 ID:kjLanKuN] >>193 ここでスパム対策版を配布してる。 ttp://swanbay-web.hp.infoseek.co.jp/index.html 198 名前：nobodyさん mailto:sage [2007/01/10(水) 05:55:31 ID:???] 【.　 CGI名 　.】HiddenCounter Model4(隠しカウンタ/ダウンロードカウンタスクリプト) 【配布先URL】www.chitta.com/nobu/download/ 【. 置き場所 .】up.spawn.jp/file/up64354.txt.html 【ヘルプ内容】 <a href="hcnt4.cgi?カウンタ名@ファイルURL">ダウンロード</a> のように呼び出してカウントさせるダウンロードカウンタです。 ログの閲覧(hcnt4.cgi?パスワード)ページには、カウンタ名とヒット数だけが載ります。 そのログの閲覧ページで、ファイルURLをカウンタ名にリンクさせる形で表示したいのですが、方法が分かりません。 カウンタ名は「$name」、ファイルURLは「$Url」、ヒット数は「$value」になっているみたいなので、単純に <a href="$Url">$name</a> としたのですが、設置ディレクトリがリンクされるだけで、ファイルURLをリンクさせる事ができませんでした。 どうすればファイルURLをリンクさせる事ができるのか、アドバイスを頂けないでしょうか。宜しくお願い致します。 ※テスト環境ではパスワード($Password)は「1234」としています。 199 名前：nobodyさん [2007/01/10(水) 06:40:46 ID:ALgB1HLh] 保守 200 名前：196 [2007/01/12(金) 15:49:54 ID:Sg/zwaZY] 保守 201 名前：nobodyさん [2007/01/15(月) 00:23:08 ID:ho2dYuVd] 【.　 CGI名 　.】Online Server Status v 1.4 English Version 【配布先URL】www.schwebdesigns.com/serverstatus/ 【. 置き場所 .】cowboy.jf.land.to/test.html 【ヘルプ内容】 サーバーの状態確認PHPなのですが、現在サイトのトップページに使用しています。 このスクリプトを最終訪問者から10分後に来た訪問者が実行するようにしたいのです。 最終訪問者の時間記録＞次の訪問者＞時間確認＞10分以内ならサーバーに問い合わせず、画像そのまま。 という形に出来ませんでしょうか？ いざ改造しようにも手も足も出ず書き込んだ次第です。宜しくお願いいたします。 202 名前：nobodyさん mailto:sage [2007/01/15(月) 15:33:53 ID:???] マルチはクタバレ。 203 名前：201 mailto:sage [2007/01/15(月) 18:14:43 ID:???] 重複申し訳有りません。 丸投げスレに依頼しましたのでそちらの方でお願い致します。 204 名前：198 mailto:sage [2007/01/19(金) 22:25:32 ID:???] 宜しくお願いします 205 名前：nobodyさん mailto:sage [2007/01/20(土) 23:53:45 ID:???] >>198 hcnt4.datの中身見れば分かると思うけど、 そのスクリプトはカウンタ名とダウンロード回数しか記録していない。 集計モードではファイルの置き場所が分からないのでそれを表示なんて無理。 どうしてもこのカウンタにこだわるのなら ダウンロード回数をカウントする際にダウンロード先のURLも合わせて記録するようにすれば 一応おまいのやりたかったことも実現できるけど、 おまいの腕なら改造するよりそういう機能を持った別のCGIを探した方が早いだろう。 206 名前：198 mailto:sage [2007/01/21(日) 02:04:43 ID:???] >>205 レスありがとうございます。 ＞ダウンロード回数をカウントする際にダウンロード先のURLも合わせて記録する にチャレンジしていたのですが、自力では無理そうです。 私はこのCGIを気に入っていたのですが、変に改造して不具合が出ても困りますし、(今更ですが)別のものを探した方が早いと思うので、諦めて他に乗り換えます。 アドバイスありがとうございました。 207 名前：nobodyさん mailto:sage [2007/01/23(火) 19:05:41 ID:???] どなたかお願い致します。 【.　 CGI名 　.】　Web Patio 3.06 【配布先URL】　www.kent-web.com/ 【ヘルプ内容】　 投稿フォームにプルダウン式の項目を追加し、その項目をスレッドタイトル横に表示させたいのですが どのように改造すれば良いのでしょうか… 配布元のサポートの過去ログに「ラジオボタンで項目追加したい」と言う物があり、（www.kent-web.com/support/old/62/0281.html） それを参考に見よう見真似でプルダウンに置き換えてみたのですが、 初心者な上に、バージョンも違うので何をどこに追加挿入していいかわからなくなってしまいます… どなたかお力添えお願い致します。 208 名前：nobodyさん mailto:sage [2007/01/23(火) 19:40:59 ID:???] 当然ここで聞く前にKENTのサポート板でも聞いたよね？ そこでは何と言われたのかな？ 209 名前：207 mailto:sage [2007/01/23(火) 22:01:06 ID:???] >>207で記述した過去ログを参考にしてみろと言われましたが、 やっぱり上手く行かなかったのでこちらに質問に来ました… 210 名前：nobodyさん mailto:sage [2007/01/23(火) 22:15:16 ID:???] KENTのサポート板でちゃんと「言われた通りに過去ログを参考にしてみたけど やっぱり分かりませんでした」と言ったんだよね？ 211 名前：207 mailto:sage [2007/01/23(火) 22:24:47 ID:???] そこまではしませんでした…！ また新にスレッドを作成して聞いてみたいと思います＞＜ 厳しいご対応ありがとうございました。 ご迷惑お掛けしてしまい申し訳ございませんでした。 212 名前：nobodyさん mailto:sage [2007/01/23(火) 23:14:12 ID:???] 新しいスレッドじゃなく今のスレッドに続けてレスで書いた方がいいんじゃないかと思うんだが・・・ 質問の内容は続いてるのに、いちいちスレッド立てられたら禿しくウザイよ。 KENTのサポート板覗いたことないからどういう構造になってんのか知らんけどさ。 213 名前：nobodyさん [2007/01/26(金) 08:18:44 ID:FhPFkwLT] 【.　 CGI名 　.】　SS(C-BOARD) 【配布先URL】　www.skullysoft.com/ssc-board/ 【ヘルプ内容】　携帯の固体識別番号を取得し、その取得の際通知を拒否した者をはじきたいのですがどうしたら良いでしょうか？ご伝授ください。 214 名前：nobodyさん mailto:sage [2007/01/26(金) 10:47:43 ID:???] 自己解決しました。アクセル解析してif文で振り分けますね。 215 名前：nobodyさん mailto:sage [2007/01/26(金) 14:08:16 ID:???] ｳﾞｩｫｵｵﾝ！！ｳﾞｩｫｵｫｵｵﾝ！！！ 216 名前：196 [2007/01/27(土) 09:14:27 ID:0yEfcEBm] 誰かお願いします；； 217 名前：nobodyさん mailto:sage [2007/01/27(土) 15:15:20 ID:???] 自分でやる気がないものをここで聞くな。 218 名前：196 [2007/02/02(金) 12:58:55 ID:tLR7xhcU] 自分でできました！ やる気だせばタグを追加すればいいだけで簡単でした。 死ね糞ども。 219 名前：nobodyさん mailto:sage [2007/02/03(土) 11:40:42 ID:???] kent　webにあるWEB PATIOの掲示板でスレッドの返信数を多くしたいので すが（1000くらい）。 普通に返信数の設定を1000に変えるだけで問題はありませんか？ それともSQLとかデータベースを使ったほうがいいですか？ 220 名前：nobodyさん mailto:sage [2007/02/03(土) 11:46:44 ID:???] 知らんがな。サーバ運営に聞けよ。 まあマジレスするとたかだか1000件程度ならデータベースはいらんと思うけどな。 221 名前：nobodyさん mailto:sage [2007/02/12(月) 19:46:19 ID:???] アイコンを1つだけ選択して表示するためのルーチンを改造し 複数選択して表示できるようにしたいのですが アドバイスいただけますでしょうか。 ラジオボタン式からチェックボックス式に変えてみましたが、 当然というか、それだけでは複数表示できませんでしたorz 以下、そのルーチン部分です。 sub icon_select { unshift(@icon_image,""); if($icon eq ""){ $icon = $icon_image[0]; } $sel = ""; foreach $ico (@icon_image) { if($ico ne ""){ $ico_img = "<img src=\"$icon_dir$ico\" align=\"absmiddle\">"; }else{ $ico_img = "なし"; } if($ico eq $icon){ $sel .= "| <input type=\"radio\" name=\"icon\" value=\"$ico\" checked>$ico_img \n";} else{ $sel .= "| <input type=\"radio\" name=\"icon\" value=\"$ico\">$ico_img \n";} } $sel .= " |\n"; return $sel; } 222 名前：nobodyさん mailto:sage [2007/02/12(月) 20:52:26 ID:???] >>221 同じnameで複数の値を送信する用に改造したい場合、 ・値を受け取るところで、値を変数に入れている部分を複数の値を配列に入れる改造が必要である。 ・ｱｲｺﾝを表示する部分では配列に入った分だけ表示されるように改造する必要がある。 223 名前：221 mailto:sage [2007/02/13(火) 02:12:51 ID:???] >>222 アドバイスありがとうございます。 教えていただいた事を参考に改めて挑戦してみます。 224 名前：nobodyさん mailto:sage [2007/02/21(水) 14:01:46 ID:???] 【.　 CGI名 　.】　アイコンTeaChatV2 【配布先URL】　blog.tirno.net/e212.html 【.動作サンプル .】　www.tirno.net/chat2/chat.cgi 【ヘルプ内容】　 TEACHATにpup.cgiを追加したユーザーアップロード形式のアイコンチャットなのですが、 このアイコンが基本的に登録した順にセレクトボックス内に並ぶので、一人で複数とか登録すると だんだんと探したり入室中に変えたりが遣りづらくなってしまいます。 また、登録時にパスを設けた専用アイコンは、また別に並ぶので、 「登録アイコン」「専用アイコン」それぞれを名前昇順で自動的にソートするようにしたいです。 225 名前：nobodyさん mailto:sage [2007/02/21(水) 14:05:25 ID:???] 長くなってしまったので続きます。 関係部分はこんな感じです。(html.plの590〜672行あたり） if(@iconu1){ $facemark = $facemark."<optgroup label=\"〜登録アイコン〜\">"; } foreach (0 .. $#iconu1){ $icon_value = $icon_url . "\/" . $iconu1[$_]; if (!$icon) { $icon = $icon_value; } if ($icon eq $icon_value) { $iconch = " selected"; } else { $iconch = ""; } $facemark = $facemark."<option value=\"$icon_value\"$iconch>$iconv1[$_]\n"; } if(@iconu1){ $facemark = $facemark."</optgroup>\n"; 自分でも色々遣ってみたのですが配列が二重だからか、 ソート関数の使い方が今ひとつ要領を得なかったので此方で質問させていただきました。 宜しければどなたかご教授願えませんでしょうか？ 226 名前：nobodyさん mailto:sage [2007/03/02(金) 01:24:23 ID:???] ttp://www.42ch.net/UploaderSmall/source/1171796861.zip このスクリプトで、ログファイルへのデータ追加時に 現在の年日時を取得して 2007/2/18 20:09 のような形式で行の末端に自動的に書き込むようにしたいのですが、 どの部分にどのような処理を加えれば良いでしょうか？ 227 名前：nobodyさん mailto:sage [2007/03/04(日) 21:22:44 ID:???] とりあえず自分でどう書いてどう動かないのか言ってみ？ 228 名前：nobodyさん mailto:sage [2007/03/10(土) 17:08:20 ID:???] sendmailについてお聞きしたいのですが open(DATA,'| /usr/sbin/sendmail -t "xxxxxx@xxx.xxx"'); これなら通るのですが $mlto="xxxxxx@xxx.xxx"; open(DATA , '| /usr/sbin/sendmail -t $mlto'); これだと通らないで困っています。 目的はログイン制CGI内部でメンバの特定人物指定によるメッセージ機能で メッセージが入るとｍｓｎメッセンジャーや携帯メールにお知らせするためのものです サーバーは個人運営してるところでお借りしているのですがそちらに問い合わせる 前にこちらで相談してからと思いました。基礎を知らないものですみません。 アドバイスがあればよろしくお願いいたします。 229 名前：nobodyさん mailto:sage [2007/03/10(土) 18:29:56 ID:???] シングルクォート内では変数は展開されない 230 名前：228 mailto:sage [2007/03/10(土) 22:32:41 ID:???] >>229 そうでした。忘れてました。ご指摘ありがとうざいます。 ダブルクォートで試してみましたがダメでした。 open(DATA , "|$mailer -t $mlto");も検索して見つけた次行 open(DATA , "|$mailer -t '$mlto'");もダメでした。 open(DATA , "|$mailer -t");print･･･;　print DATA "To :$mlto";もダメでした。 一応一通り試してみたのですが自分では解決できそうにありません。 なにかアドバイスがあればよろしくお願いいたします。 231 名前：nobodyさん mailto:sage [2007/03/10(土) 23:18:11 ID:???] >>228で>>229と言われて>>230に走るようでは それ以上火傷しない内にもう止めろと言いたくなる。 232 名前：228 mailto:sage [2007/03/11(日) 00:10:26 ID:???] >>231 言われる前に一通り試したのですがダメだったので相談しにきたのですが 止めろと言われるなら素直に借りてるサーバの管理者に相談します。 ありがとうございました。 233 名前：nobodyさん [2007/03/12(月) 19:01:30 ID:D70wnXmo] 【.　 CGI名 　.】　2chブラウザ対応掲示板 (PATH_INFO対応) - Perl版　- 【配布先URL】　perl.toshinari.net/cgi/bbs/new2ch/index2.html 【ヘルプ内容】　PC版の場合、アドレスがttp://homepage/ID/（ttp://homepage/test/read.cgi/ID/）となるんですが 　　　　　　　　　携帯のアドレスはttp://homepage/test/mread.cgi/ID/でしかアクセスできません 　　　　　　　　　ttp://homepage/ID/i/でアクセスできる様にしたいのでお願いします 234 名前：nobodyさん mailto:sage [2007/03/12(月) 21:45:30 ID:???] 【.　 CGI名 　.】KENT SUN BOARD(HTMLボード) Ver: 3.9 【配布先URL】www.kent-web.com/bbs/sunbbs.html 【ヘルプ内容】携帯には対応してはいませんが、文字サイズを小さくしたりして 一応携帯からも表示できるようにしました。 そこで、携帯から書き込みをした時に機種名を表示させたいのですが、 とりあえず時間取得の変数に混ぜて表示させてました。 日時のあとに DoCoMo/2.0 N903i(c100;TB;W24H12) このように表示されるのですが、 このN903iの部分だけ表示させるにはどうしたらよいでしょうか？ 改造した部分も書いたほうがいいでしょうか？ 235 名前：nobodyさん mailto:sage [2007/03/13(火) 09:00:16 ID:???] >>234 そこまでできたならperl板行った方が… 正規表現で ^DoCoMo.* (.*)\(.+$ で\\1をとればいいんじゃないかな。 236 名前：nobodyさん mailto:sage [2007/03/13(火) 13:23:35 ID:???] 【.　 CGI名 　.】　nicky.cgi 【配布先URL】　ttp://www.din.or.jp/~raelian/ReadMeNicky.html 【ヘルプ内容】　 同日に記事を二つ以上作成すると、デフォルトでは後に作成したほうが上に来ます。 それを後に作成したほうを前に作成した記事の下に来るようにしたいです。 よろしくお願いします。 237 名前：nobodyさん mailto:sage [2007/03/13(火) 17:28:48 ID:???] >>235 ありがとうございます。 web製作板から誘導されてきたもので。 箇所を書きます。できればここにその形で修正を施してくれればありがたいです。 238 名前：nobodyさん mailto:sage [2007/03/13(火) 17:29:36 ID:???] #------------------------------------------------- # 時間取得 #------------------------------------------------- sub get_time { local($date,@week); $ENV{'TZ'} = "JST-9"; local($min,$hour,$mday,$mon,$year,$wday) = (localtime(time))[1..6]; @week = ('Sun','Mon','Tue','Wed','Thu','Fri','Sat'); # 日時のフォーマット if ($whatsnew) { $date = sprintf("%04d-%02d-%02d (%s)", $year+1900,$mon+1,$mday,$week[$wday]); } else { $date = sprintf("%04d/%02d/%02d(%s) %02d:%02d", $year+1900,$mon+1,$mday,$week[$wday],$hour,$min); # UA記録 my $ua = $ENV{'HTTP_USER_AGENT'}; if ($ua =~ /^L-mode/) { $ua = 'L-mode'; } elsif ($ua =~ /^Mozilla/){ $ua = 'PC'; } $date .= " $ua"; # UA記録終了 } $date;} 239 名前：nobodyさん mailto:sage [2007/03/13(火) 17:31:08 ID:???] こんなかんじで後は$dateをログ生成の適当なところに書き加えてました。 正直今までプログラミングやったことがないので、何度もコピペしたりテストしたりして と、まるっきり初心者です。 何度も携帯機種表示は試したのですがまるっきり。 もしあれならばperl板に誘導していただければ。 240 名前：nobodyさん mailto:sage [2007/03/14(水) 09:16:53 ID:???] >>239 if ($ua =~ /^L-mode/) { $ua = 'L-mode'; } elsif ($ua =~ /^Mozilla/){ $ua = 'PC'; } elsif ($ua =~ /^DoCoMo.* (.*)\(.+$/) { $ua = $1; } 241 名前：nobodyさん mailto:sage [2007/03/14(水) 20:29:06 ID:???] >>240 ありがとうございます。 できました。 242 名前：236 mailto:sage [2007/03/16(金) 04:59:07 ID:???] すみません、自己解決しました。 243 名前：nobodyさん mailto:sage [2007/03/21(水) 15:25:47 ID:???] jewel掲示板 www.groo-web.com/jewel.html この掲示板に禁止ワード設定を組み込みたいんですが、 jewel(改) xxxw007.s12.xrea.com/cgi/merutomo.htm を見て、CGI本体の中に入れてもどうしてもエラーになってします。 あちこちの掲示板CGIを落として見て、jewelCGI本体の中に入れてもエラー。 どうカスタマイズしたら禁止ワード設定を組み込めるでしょうか？ 初心者ですが、jeweはなんとか設置できました。.htaccecsもできた。 あーとーはー禁止ワードだーけー・・・orz なんとか、教えて下さい。お願いします。 244 名前：243 [2007/03/21(水) 16:25:13 ID:TD8dcTEz] # 禁止ワード（いくつでも追加可能） #例　('死ね','淫乱','援助交際','docomo') #新規登録時の名前 タイトル メッセージ ホストに適用。 @input_deny = ('死ね','',''); ##--禁止ワードチェック--## foreach (@input_deny) { if ($in{'name'} =~ /$_/i) { &error("名前に禁止ワードが含まれています。"); } if ($in{'title'} =~ /$_/i) { &error("タイトルに禁止ワードが含まれています。"); } if ($in{'comment'} =~ /$_/i) { &error("メッセージに禁止ワードが含まれています。"); } } これを追加するとエラーになってしまうのです。 何か足りないのでしょうか？ 245 名前：243 [2007/03/21(水) 16:30:54 ID:TD8dcTEz] #■投稿禁止ワード ""で囲って記入　複数設定する場合は『,』で区切ってください #　設定した文字列が名前かメッセージに含まれる場合、投稿できません # 必要ない場合は() @deny_words = ("アダルト","エロ"); foreach $d_words (@deny_words) {if ($title =~ /$d_words/i) {&error("名前に投稿できない言葉が含まれています");} } foreach $d_words (@deny_words) {if ($message =~ /$d_words/i) {&error("メッセージに投稿できない言葉が含まれています");} } これは違うスクリプトですが、 これだけでもできますか？？ 246 名前：nobodyさん mailto:sage [2007/03/21(水) 17:32:36 ID:???] >243 マルチポストしてんじゃねーよ 市ねよクズ pc11.2ch.net/test/read.cgi/hp/1166794984/455 pc11.2ch.net/test/read.cgi/php/1157787046/403 247 名前：243 [2007/03/21(水) 17:38:39 ID:TD8dcTEz] 他のあとにココ見つけたのですよ。ですから他には１つだけです。以下続き。 #####イタズラ投稿防止設定 # リモートホスト（またはIPアドレス）での投稿拒否 #ppp123.abc.or.jp などの場合は、数字の部分がアクセスのたびに異なるので #数字の部分を .* （ピリオド＋アスタリスク）に置き換えます。 #@deny = ('ppp.*.abc.or.jp','web.net'); #などと設定します。 @deny = (); # 投稿記事内容にふさわしくない語句の禁止 # @word = ('セックス','エッチ','スカトロ','test', 'あああ','馬鹿');#などと設定。 @word = (); #投稿拒否 sub deny { foreach (@deny) { if ( $host =~/$_/ ){ &error(1,"あなたの投稿は許可されてません。"); } } } #禁止ワードチェック sub wordcheck { local($string) = $_[0];local($line); foreach $line(@word) { if (index($string,$line) >= 0) { &error(1,"$line<BR>使用禁止の文字が使われているようです。"); } } これでは？ 248 名前：243 [2007/03/21(水) 18:30:09 ID:TD8dcTEz] うー、ページがエラーにならず書き込みができたのは以下だけですが、 禁止設定が働かない。何が足りないのでしょうか？？ #■投稿禁止ワード ""で囲って記入　複数設定する場合は『,』で区切ってください #　設定した文字列が名前かメッセージに含まれる場合、投稿できません # 必要ない場合は() @deny_words = ("アダルト","エロ"); foreach $d_words (@deny_words) {if ($title =~ /$d_words/i) {&error("タイトル名前に投稿できない言葉が含まれています");} } foreach $d_words (@deny_words) {if ($comment =~ /$d_words/i) {&error("メッセージに投稿できない言葉が含まれています");} } もう寸前まで出来てる気がする・・・ 249 名前：nobodyさん mailto:sage [2007/03/21(水) 18:57:27 ID:???] >>243 >>5嫁 250 名前：243 [2007/03/21(水) 19:30:00 ID:TD8dcTEz] エラーは毎回Internal Server Errorと出ます。 鯖のログには何も。。掲示板のエラーログはありません。 やはり無理なのかな・・・orz ランキング２つ、掲示板１つをムーバブル・タイプの中に設置、 ベーシック認証も設置できたのに、このカスタマイズで初挫折。 やはりカスタマイズは難しいですね。 ちなみに、CGIも巡り会って１週間の初心者です。 251 名前：nobodyさん mailto:sage [2007/03/21(水) 20:24:05 ID:???] ローカルにサーバも立てられない餓鬼にCGIなんてまだ早い。 >>243には絶対無理なので受精卵からやり直すように。 252 名前：nobodyさん [2007/03/22(木) 17:29:14 ID:ZUn5Ffec] なんだよ。結局誰も答えられないのかよ。 糞スレ終了だなwww 253 名前：nobodyさん mailto:sage [2007/03/22(木) 21:27:27 ID:???] マルチポストしてなけりゃ、ヒントくらいは教えてやってもいいかと思ったんだけどねえ 3回も同じものを読まされたらそんな気は失せる 254 名前：nobodyさん [2007/03/22(木) 21:50:49 ID:ZUn5Ffec] オマエもただのカスだなwwwwww 255 名前：nobodyさん [2007/03/22(木) 22:03:46 ID:8uBdXhS9] 何で教えてもらう側の態度ってのが出来ないのかねぇ わけのわからん売り言葉見てると折角のモノも書く気も起きん 256 名前：nobodyさん mailto:age [2007/03/26(月) 04:28:29 ID:???] 【 CGI名 】 Anthologys 【 配布先URL 】 www2s.biglobe.ne.jp/~yasuu/cgi2.html 【 利用規約（改造OK確認）】www2s.biglobe.ne.jp/~yasuu/cgi1.html 【 依頼内容 】 投稿するときの名前のクッキー保存をKENTさんとこと同じようにしてほしい。 名前を保存すると、文字化けするからです。 よろしくお願いします。 257 名前：nobodyさん mailto:sage [2007/03/27(火) 10:58:52 ID:???] ソースコピペなり何なりで同じようにすればいいわけだが どこでつかえてるんだ？ 258 名前：２５６ mailto:age [2007/03/27(火) 11:43:48 ID:???] Linuxの自宅サーバー（apache）とレンタルサーバーならば問題なく使用できるのですが、 Windowsの自宅サーバー（apache）だとどうしても、投稿の際の名前の欄が、 二度目から文字化けをしてしまいます。 Windowsの設定だとはじめは思いましたが、KENTさんの掲示板の場合 Windowsでも問題なく使用できているため、以前、セキュリティーなどの問題を指摘されましたが 結局Linuxを使用することになっていたので放置してました。 しかし、今回どうしてもWindowsで使用したいために質問させていただきました。 もし、よろしかったら、何行目をどのように訂正すれば良いのかご教授願えたら幸いです。 259 名前：nobodyさん mailto:sage [2007/03/27(火) 11:48:18 ID:???] それは本当にCGI側の問題なのか…？ 260 名前：２５６ mailto:age [2007/03/27(火) 12:14:21 ID:???] １００％とは言えないです。 ただ、すばらしいCGIなのでどうにかWindowsで 使用したいです。 一応↓が結果です。 　　　　『Anthologys』 ○　自宅サーバーLinuxアパッチ ○　レンタルサーバー ×　自宅サーバーWindowsアパッチ 　　　『KENTさんのCGI』 ○　自宅サーバーLinuxアパッチ ○　レンタルサーバー ○　自宅サーバーWindowsアパッチ それから、なぜCGI側に問題があるかというと、 以前質問して指摘されたことがありました。 他に、CGIのことはあまりくわしくありませんが、 他のCGIが、Windowsで使用できる場合、 設定でどうにかなるのではないかと思ったからです。 261 名前：nobodyさん mailto:sage [2007/03/27(火) 15:04:23 ID:???] >>256 Windows+Apache2ならそうなるので、 　・クッキーをエンコード・デコードする。 　・Apache1系を使う。 のどちらか。 262 名前：nobodyさん [2007/03/27(火) 15:38:55 ID:tZOgiuH5] CGI上で、 男性の画像をotoko.gif、女性の画像をonna.jifとした場合、 それぞれのページにあった画面を表示させる方法を教えてもらますか？ 実際の処理のところに<img src="otoko.gif">を挿入すると、 女性の方にも表示されてしまいます。 263 名前：２５６ mailto:age [2007/03/27(火) 15:46:53 ID:???] 【 CGI名 】 Anthologys 【 配布先URL 】 www2s.biglobe.ne.jp/~yasuu/cgi2.html 【 利用規約（改造OK確認）】www2s.biglobe.ne.jp/~yasuu/cgi1.html 【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの 名前のクッキー保存をKENTさんとこと同じようにしてほしい。 理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、 文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、 自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。 （Windows１系は確認しておりませんが、>>261　さんを参考にさせていただきました。） >>261　さんの言われたように、 記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、 CGIスクリプトの 何行目をどのように変更したらよいかよろしくお願いします。 264 名前：nobodyさん mailto:sage [2007/03/27(火) 16:04:39 ID:???] お前は丸投げ行け 265 名前：262 [2007/03/27(火) 16:34:12 ID:tZOgiuH5] これを応用できませんか？ 男性は0、女性は1となっています。 if ($in{'sex'} eq "0" && $color eq "defwruto") { $color = "$boy_color"; } elsif ($in{'sex'} eq "0" && $color eq "") { $color = "$boy_color"; } if ($in{'sex'} eq "1" && $color eq "defwruto") { $color = "$girl_color"; } elsif ($in{'sex'} eq "1" && $color eq "") { $color = "$girl_color"; } 上の書き込みの画像を表示させる位置に・・・うーん、、お願いしまつ 266 名前：nobodyさん mailto:sage [2007/03/27(火) 16:44:46 ID:???] >>262 if ($in{'sex'} eq "0") { $src = 'otoko.gif'; } elsif ($in{'sex'} eq "1") { $src = 'onna.gif'; } else { $src = 'okama.gif'; } 267 名前：262 [2007/03/27(火) 16:59:22 ID:tZOgiuH5] 独自でできたよ。 ###+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ ## SUB >>> ユーザー出力処理 ###+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ sub member_view { if ($in{'sex'} eq "0") { $word_color = "$boy_color"; } elsif ($in{'sex'} eq "1") { $word_color = "$girl_color"; } ↑この部分を見て男女のページの色を区別してるんだから、 これに画像を当てはめれば良いんだと分かった。 下の方に→$word_colorがあったから。 んで、こうやって if ($in{'sex'} eq "0") { $image = "image/otoko.gif"; } elsif ($in{'sex'} eq "1") { $image = "image/onna.gif"; } 実際に画像を表示させる場所に、 <img src="$image" align="left">を入れたらできた！ 俺って天才だ！ 268 名前：262 mailto:sage [2007/03/27(火) 17:01:00 ID:???] あ、 >>266さん教えてくれたんですね。 わざわざ有難う。でもできたよ。^^)/ 269 名前：nobodyさん mailto:age [2007/03/27(火) 17:14:48 ID:???] 【 CGI名 】 Anthologys 【 配布先URL 】 www2s.biglobe.ne.jp/~yasuu/cgi2.html 【 利用規約（改造OK確認）】www2s.biglobe.ne.jp/~yasuu/cgi1.html 【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの 名前のクッキー保存をKENTさんとこと同じようにしてほしい。 理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、 文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、 自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。 （Windows１系は確認しておりませんが、>>261　さんを参考にさせていただきました。） >>261　さんの言われたように、 記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、 CGIスクリプトの 何行目をどのように変更したらよいかよろしくお願いします。 270 名前：nobodyさん mailto:sage [2007/03/27(火) 17:24:48 ID:???] うざ 271 名前：nobodyさん mailto:sage [2007/03/27(火) 17:31:25 ID:???] >>268 それ$in{'sex'}が0でも1でもない場合を想定できてないぞ 272 名前：nobodyさん mailto:sage [2007/03/27(火) 19:03:25 ID:???] >256,263,269 何度も同じコピペを繰り返すような迷惑なクズの依頼は断わる！ 273 名前：262 [2007/03/27(火) 19:24:24 ID:tZOgiuH5] >>268 オカマを選択させる余地はありませぬ！w 自作掲示板完成まであと少しです。 最後に、 NGワードを外部ファイルで呼び出してチェックさせる秘儀を伝授して下さいマセ、殿！ 274 名前：262 mailto:sage [2007/03/27(火) 19:26:02 ID:???] レス間違え失礼 >>266 >>271 オカマを選択させる余地はありませぬ！w 自作掲示板完成まであと少しです。 最後に、 NGワードを外部ファイルで呼び出してチェックさせる秘儀を伝授して下さいマセ、殿！ 275 名前：nobodyさん mailto:sage [2007/03/27(火) 21:40:24 ID:???] >>274 問題をはき違えてるな。 読解力の無い奴にゃ教える気もおきねーや。 276 名前：nobodyさん mailto:age [2007/03/31(土) 14:46:34 ID:???] 【 CGI名 】 Anthologys 【 配布先URL 】 www2s.biglobe.ne.jp/~yasuu/cgi2.html 【 利用規約（改造OK確認）】www2s.biglobe.ne.jp/~yasuu/cgi1.html 【 依頼内容 】 ↑の掲示板（Anthology）に投稿するときの 名前のクッキー保存をKENTさんとこと同じようにしてほしい。 あるいは、文字化けしないように設定してほしい。 理由は自宅サーバーWindowsのApache2での掲示板に名前を保存すると、 文字化けするからです。尚、自宅サーバーLinux、レンタルサーバー、 自宅サーバーWindowsでのApache１系ならば正常にクッキー保存されます。 （Windows１系は確認しておりませんが、>>261　さんを参考にさせていただきました。） >>261　さんの言われたように、 記事を投稿するさいの名前のクッキーをエンコード・デコード出来るように、 CGIスクリプト↓ umikaze.mydns.to/anthologys.txt の （１９３０行目あたりだと思われます。。） 何行目をどのように変更したらよいかよろしくお願いします。 277 名前：nobodyさん mailto:sage [2007/03/31(土) 15:39:19 ID:???] >>256 >>260 >>263 >>269 >>276 278 名前：２７６ mailto:age [2007/03/31(土) 16:30:59 ID:???] 一応↓も参考にしたのですが、 www.aimix.jp/cgi/accurlenc.html じぇんじぇんわかりません。 先輩各々方 よろしくお願いいたします。 279 名前：nobodyさん mailto:sage [2007/04/01(日) 18:15:14 ID:???] 【.　 CGI名 　.】　Mobile Access 【配布先URL】　ttp://download.torworld.com/page/access/readme.html 【ヘルプ内容】 ソフトバンク機種もちゃんと振り分け・解析が出来るようにしたいのですが どう書き換えたらいいかよくわかりません あと、PC表示ページでフレームを使っているのですが 動作確認してみたところカウンターが表示されません フレームを使う場合は設定や書き換えなどが必要なのでしょうか？ よろしくお願いします 280 名前：nobodyさん [2007/04/19(木) 22:04:34 ID:Nm6vIpzI] 【.　 CGI名 　.】　アルバムPHP 【配布先URL】　ttp://golbed.main.jp/g_album_page.html 　　　　　　　　　 ttp://golbed.main.jp/php/g_album/　（サンプル） 【ヘルプ内容】 ・画像ごとに異なるコメントを出したい ・画像へのリンクを任意の文字列にしたい ・トップに画像とコメントを表示したい 自力で改造しようと頑張ってみたんですがやはり無理でした。 よろしくお願いします。 281 名前：280 mailto:sage [2007/04/19(木) 22:45:12 ID:???] すみません、複数のフォルダを指定する方法もお願いします。 282 名前：nobodyさん [2007/04/21(土) 19:53:28 ID:vsUwQ1K4] >>280さん まだ見てるか知らんけど・・・ ↓こんなんでいいのかな？ ttp://sv1.jp/2ch/g_album_c1/ > 画像ごとに異なるコメントを出したい 「画像のファイル名.txt」のファイルを置いておくと、 コメントとして表示するようにしてみますた。 > 画像へのリンクを任意の文字列にしたい 意味がわかりませんですた。 > トップに画像とコメントを表示したい トップとかの概念が無いような気もするけど、設定できるようにしてみますた。 コメントは同じく「画像のファイル名.txt」で表示されます。 > 複数のフォルダを指定する方法もお願いします。 index.phpの設定んとこで対象フォルダを指定できるようにしてみますた。 ↓ソース ttp://sv1.jp/2ch/g_album_c1/g_album_c1.zip 注意点 ・設定のとこいくつか増えてるんで確認してください。 ・複数フォルダのせいで、ファイル名でソートが曖昧です。 　フォルダ名も含めてソートしてるかも。 ・あんま確認してないんで、おかしいとこあったらごめんちゃい。 283 名前：nobodyさん mailto:sage [2007/04/21(土) 19:55:56 ID:???] 久しぶりに書き込んだらageてもたorz ごめんちゃいorz 284 名前：nobodyさん mailto:sage [2007/05/04(金) 19:01:19 ID:???] 丸投げのほうで反応無かったのでこちらで 【CGI名】 Sn Uploader Candy Type1 【配布先URL】 www.candy-cgi.com/perl/Sn_Uploader_Candy_Type1.html 【ヘルプ内容】 パスなしでUpしてもパスありと同じようにファイルを保存するようにしてほしい パスなしだとhttp://〜/src/file0001.zipなどのようになりますが それを、パスありのときと同じようにhttp://〜/src/file0001.zip_f0FMk3CGphyD2AQNBBtN/file0001.zip といった感じにしたいです。 おねがいします。 285 名前：nobodyさん mailto:sage [2007/05/05(土) 01:07:15 ID:???] で、どこまでやってどこで躓いてる？ 言っておくがここは丸投げできるスレじゃないぞ 286 名前：nobodyさん mailto:sage [2007/05/05(土) 10:54:34 ID:???] とりあえず、189行目から323行目と1061行目から最後までをいじれば良いと思うのですが それ以上はあんまり解りません 287 名前：nobodyさん mailto:sage [2007/05/05(土) 13:32:02 ID:???] じゃ丸投げで延々と待つしかないな 288 名前：LSZmZkpEmkCJhgN mailto:zaebtsa@gmail.com [2007/07/19(木) 17:39:33 ID:???] GMazvB name is Kostya.My nick is Zold . I want to find friends .ICQ 324600825 289 名前：nobodyさん mailto:sage [2007/08/13(月) 23:36:28 ID:???] 丸投げが無い。。。 一から勉強しよ(´・ω・｀) 290 名前：nobodyさん mailto:sage [2007/10/31(水) 00:01:43 ID:???] ICQってまだあんの？ 291 名前：nobodyさん mailto:sage [2007/10/31(水) 13:42:14 ID:???] >>289 【 スクリプト改造依頼スレ 】(丸投げ) part6 pc11.2ch.net/test/read.cgi/php/1157787046/ 292 名前：nobodyさん [2008/02/16(土) 15:55:54 ID:7IBR1+e+] 【.　 CGI名 　.】Variable Board Ver.1.06 【配布先URL】dream.lib.net/room/ 【ヘルプ内容】携帯端末の書き換えについて CGI自体は携帯端末対応なのですが、端末情報が少し古いようで現在での対応が一部できません。 variable.cgiの255行目「端末チェック」部分、 「ASTEL」の項は「KDDI」に変えてauへの対応はできたのですが、 Softbankが現在「J-PHONE」「Vodafone」「SoftBank」の三つがUAとしてあり、 そのうちJ-PHONEにしか端末チェックがなされてません。 「Vodafone」と「SoftBank」がSoftBank端末アクセスの８割を占めているので 両方も端末チェックに加えたいのですが、安易に項目を増やしてみたところ やはりというか何というかUA偽装でチェックしてみても無理でした。 VodafoneがUAの場合、KDDI同様「UP.Browser」がありましたのでそれで出来るかと思ったんですが、 「UP\.Browser」と入れてみても対応はできませんでした。 もし良い方法がありましたら教えてください。 293 名前：nobodyさん [2008/03/03(月) 16:17:11 ID:g0NPU4km] >>292 検索して調べれば判る事は自分で調べなさい！ｱﾎ 263行目を $user_agent =~ /^J-PHONE|^Vodafone|^SoftBank/ に変更すれば判別出切る筈です。 294 名前：nobodyさん [2008/03/03(月) 17:45:27 ID:ztXniNQN] 色々なサイトを見て簡単な更新履歴のcgiを作ったんですが 記事ナンバーをつける事が出来なくて困っています・・・。 ソース www.uploda.org/uporg1282947.txt どうやったら記事ナンバーが追加できるか教えて下さい・・・。 お願いします。 295 名前：nobodyさん mailto:sage [2008/03/03(月) 18:15:10 ID:???] 記事ナンバーって何？ 296 名前：nobodyさん [2008/03/03(月) 18:25:38 ID:ztXniNQN] >>295 掲示板とかについてる記事の番号です。 一つの記事ごとに番号を付けたいんです。 297 名前：nobodyさん mailto:sage [2008/03/03(月) 18:28:58 ID:???] それ本当に自分で作ったの？ 298 名前：nobodyさん [2008/03/03(月) 21:58:38 ID:ztXniNQN] >>297 色んなサイトを参考にして作りました。 299 名前：nobodyさん [2008/03/04(火) 23:01:12 ID:8AwOHZTZ] 【 CGI&PHP名 】 簡易コメント　ver1.0 【 配布先URL 】 nurupo.biz 【 依頼期限 】　１週間以内 【 依頼内容 】 >>1みたいにアンカー機能を付けて頂きたいです 75行目 my $max = @DATA; 76行目 my $res_no = undef; 96行目と97行目の間に追加 $res_no = $max - $i + 1; 97行目　print "[$date] $res_no. $text\n"; を追加でレス番号が付くのはわかったんですけど 正規表現が分からないので、調べられません(ToT) 300 名前：nobodyさん mailto:sage [2008/03/04(火) 23:10:44 ID:???] 正規表現のどの辺が分からんって？ 301 名前：nobodyさん mailto:sage [2008/03/05(水) 06:31:08 ID:???] >>294 日本語で失礼。 投稿内容をログファイルに書く前に、直前のログを取り出す。 そのログにある数字を取り出して、+１したものを最新記事のナンバーとする そのナンバー+投稿内容としてログファイルに追記 ただの更新履歴ならコレで問題ない・・・・と思う コードはあなた以上の初心者なので勘弁。 302 名前：nobodyさん [2008/03/05(水) 20:35:19 ID:Wm0WO3jS] >>300 アンカーの構造から分かりません(∋_∈) 303 名前：nobodyさん mailto:sage [2008/03/05(水) 22:26:38 ID:???] どこまでは考えた？ 304 名前：nobodyさん [2008/03/06(木) 00:39:31 ID:UOTbbi+N] えっと、全然発想すら分からないので >>数字 @DATA[数字] それでｻﾌﾞﾙｰﾁﾝで取り出して表記する？という事だけです･･･ 305 名前：292 mailto:sage [2008/03/10(月) 06:53:01 ID:???] >>293 お礼が遅くなってしまいすみません。 方法がさっぱりだったのでぐだぐだになってしまってました。 お答えくださりありがとうございました。 306 名前：nobodyさん mailto:sage [2008/03/16(日) 17:23:34 ID:???] ari-sin3.hp.infoseek.co.jp/arisin5.html このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので ここで質問させてもらいます。 ・一日にアップロード可能な容量を制限したい。 ・日付や件数で削除するのではなく設定した日付を 　オーバーしたらファイルを削除するようにしたい。 この二つです。 307 名前：訂正 mailto:sage [2008/03/16(日) 17:26:49 ID:???] ari-sin3.hp.infoseek.co.jp/arisin5.html このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので ここで質問させてもらいます。 ・一日にアップロード可能な容量を制限したい ・指定した容量になると古いファイルから削除 308 名前：nobodyさん [2008/04/14(月) 00:14:52 ID:sAfeJoyW] 【.　 CGI名 　.】　p++BBS 2006/03/02版　　【配布先URL】　php.s3.to/ 【ヘルプ内容】www.cj-c.com/にあるChildTreeと同様の記事リストで、レスの更新時間を読んでUP!と表示させたいです。 自作の下記の処理だと親記事の更新時間しか読めてないため、レスがついてもNew!表示時間が延長されません。 レスの更新時間も読みにいく処理がうまく書けませんでした。お助け頂けたら嬉しいです。 素人のクソな処理なので効率化の突っ込みも大歓迎です。よろしくお願いします。 改行が多いと怒られたのでまとめてます… function Kijilist(){ global $SCRIPT_NAME,$log; array_shift($log); //要素1個目に非ログがあるので削除 foreach($log as $l){ list($ano,$no,) = split(',',$l); $carray[] = $no; } $cdata = array_count_values($carray); /*要素数数えて格納*/ $tim = time(); $tgcnt = 0; /*別機能用*/ $page = $_GET['page']; /*別機能用*/ foreach($cdata as $key=>$val){ foreach($log as $l){ list($ano,$no,$res,$now,$name,$email,$sub,$com,$url,$ho,,$pco,$pk,$cnt,$uid) =split(',',$l); if($res==0 && $no == $key) { $val = $val-1;//親記事もカウントしてたのを除外 if($tim-$pk<NEWTIME * 3600) { //NEWTIMEを宣言しないとエラー if($page <= 0 && $tgcnt<PAGEVIEW){ //PAGEVIEWを宣言しないとエラー echo "<a href=\"#$no\">".NEWIMG."{$sub}($val)</a> | ";$tgcnt++; //NEWIMGを宣言しないとエラー } else { echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">".NEWIMG."{$sub}($val)</a> | ";$page--; } } else { if($page <= 0 && $tgcnt<PAGEVIEW){ echo "<a href=\"#$no\">$sub($val)</a> | ";$tgcnt++; } else { echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">$sub($val)</a> | ";$page--; }}}}}} 309 名前：308 mailto:sage [2008/04/14(月) 12:41:15 ID:???] クソな処理なのは変わりませんが、自己解決できました。 310 名前：nobodyさん mailto:sage [2008/04/24(木) 21:25:50 ID:???] 【.　 CGI名 　.】　UpdaterRSS 【配布先URL】　php.s3.to/simple/ 【. 置き場所 .】　php.s3.to/simple/source.php?updaterss.php 【ヘルプ内容】　ping送信機能を組み込みたい。 よろしくお願いします。 311 名前：nobodyさん mailto:sage [2008/05/02(金) 23:36:35 ID:???] 【.　 CGI名 　.】　Miniりすと 【配布先URL】　www.minicgi.net/ 【. 置き場所 .】　www.minicgi.net/cgi2/list.html （サンプルあり） 【ヘルプ内容】 新規登録/編集でcheckbox（inputタグ）を使えるようにして、複数の項目を選択できるようにしたい IDにカテゴリ付けをして、カテゴリ別に表示したい（だけど全表示してくれるページもあると有り難い） この二つの機能を使えるようにしたいんですが どうにもチンプンカンプンで自力では難しいので投稿しました 知恵をお貸しください。よろしくお願いします 312 名前：nobodyさん mailto:sage [2008/05/08(木) 10:00:49 ID:???] 【CGI名】　スレッド天国 ver.1.10 【配布先URL】cgipon.specters.net/ 【置き場所】cgipon.specters.net/tengoku/download.html 【ヘルプ内容】ログのスレ上げをなくしたいです。　 （親スレに子レスが付くと、その親スレごと一番上にあがるやつです） あげ荒らしが猛威をふるってるんで急ぎでお願いしたいです。 3060行位からそれらしい部分があるようにもみえるのですけど perl素人すぎるのか、もの凄く複雑そうに見えちゃって どこいじればいいのか かいもく検討がつきません。 どこいじればいいのか教えて下さい。（ぺこり 313 名前：nobodyさん [2008/05/14(水) 17:55:06 ID:1VhcNHK7] 【.　 CGI名 　.】　phpexit ver.1.1.4 【配布先URL】　chibinowa.net/ 【. 置き場所 .】　chibinowa.net/webapp/phpexit.html 【ヘルプ内容】 　項目の追加をお願いします。 　配布先にスクリーンショット画面がありますが、 　一覧部分の「webplog>perl」の部分（カテゴリの部分）の上部に、2件の項目を追加したく思っています。 　追加項目の内容は、1件はテキストエリア、2件目はコメント欄と同じくらいの文章です。 　個人で、テキストエリアの追加は出来たのですが、肝心の一覧にその部分が表示されず、行き詰っています。 　lib/cmd/edit.php、item.php　などを弄ってあります。 　ご助言お願い致します。 314 名前：nobodyさん [2008/05/16(金) 23:46:50 ID:oqDS1N2X] 313です。自己解決しました。 315 名前：nobodyさん [2008/05/17(土) 02:10:38 ID:Td8Jyj+I] 【.　 CGI名 　.】　Photo Memo 【配布先URL】　www.sa-k.jp/memo/cgi/p_memo.htm 【. 置き場所 .】　www.sa-k.jp/memo/cgi/p_memo/p_memo.cgi 【ヘルプ内容】 10枚までの同時アップロードなのですが、20枚までに増やせないでしょうか。 ファイルを開いて1〜10まである項目を無理矢理20まで増やしてみたのですが、 途中でエラーが出てしまい、どこをどういじったのかもわからず… たくさんあって半日くらいかかっていじってみたのですが、結局わかりませんでした。 よろしくおねがいします。 316 名前：nobodyさん mailto:sage [2008/05/17(土) 04:44:29 ID:???] foreach (@lines) { ($noa,$Yeara,$Montha,$Daya,$suba,$tail1a,$W1a,$H1a,$com1a,$tail2a,$W2a,$H2a,$com2a,$tail3a,$W3a,$H3a,$com3a, $tail4a,$W4a,$H4a,$com4a,$tail5a,$W5a,$H5a,$com5a,$tail6a,$W6a,$H6a,$com6a,$tail7a,$W7a,$H7a,$com7a, $tail8a,$W8a,$H8a,$com8a,$tail9a,$W9a,$H9a,$com9a,$tail10a,$W10a,$H10a,$com10a,$hosta) = split(/<>/); ひどい処理だな｡ 一応html部から全て項目を増やせば動作するはず｡ あるいは１件１行として全体的にリビルドしてしまうか｡ 317 名前：nobodyさん mailto:sage [2008/05/24(土) 20:37:38 ID:???] 【.　 CGI名 　.】　SN Uploader　　【配布先URL】　sugachan.dip.jp/obsolete/snup/ 【ヘルプ内容】 拡張子とMIMEが合わなくてもアップロードできてしまいます。 ログには拡張子合わずと記録されてるので簡単に改造できるかなと思いましたら 知識が全然足りずに改造しても動きませんでした。 何方か知識をお貸しください。 318 名前：nobodyさん mailto:sage [2008/05/24(土) 20:47:10 ID:???] まず拡張子合わずと記録する部分を見つけるんだ そしたらそこの条件を見るんだ そしたらそこでbreakするなりexitするなりしてアップロードできないようにするんだ 319 名前：nobodyさん mailto:sage [2008/05/25(日) 07:43:08 ID:???] sub error{ my ($no,$note) = @_; if (length($note) > 64) { $note = substr($note,0,64).'...'; } $note =~ s/&/&/g; $note =~ s/\"/"/g; $note =~ s/</</g; $note =~ s/>/>/g; $note =~ s/\r//g; $note =~ s/\n//g; $note =~ s/\t//g; $note =~ s/\0//g; my ($message,$dispmsg,$flag); if($no == 98){ $message = ""; } elsif($no == 99){ $message = "UpFileなし"; } elsif($no == 101){ $message = "投稿禁止HOST"; } 　　　　　　　　　（略） # elsif($no == 108){ $flag = 1; $message = "POSTデータ不完全"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTデータが不完全です</td></tr>';} elsif($no == 109){ $flag = 1; $message = "POSTKey不一致"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTKeyが一致しません</td></tr>';} elsif($no == 202){ $flag = 1; $message = "拡張子合わず"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>投稿できる拡張子は'.$set{'up_ext'}.'です</td></tr>';} 見つけたけどわからない・・・orz 320 名前：nobodyさん mailto:sage [2008/05/25(日) 15:57:11 ID:???] エラーナンバー202を記録してるとこ探せばいいだろｗ 321 名前：nobodyさん mailto:sage [2008/05/25(日) 18:41:41 ID:???] {#メイン処理 if(!$in{'upfile'}){ &error(99); } if($set{'post_flag'} && !check_postkey($in{'postkey'})){ error(109); } if($set{'dlkey'} == 2 && !$in{'dlkey'}){ unlink("$in{'tmpfile2'}"); &error(61); } open(IN,$set{'log_file'})||&error(303); my @log = <IN>; close(IN); my ($no,$lastip,$lasttime) = split(/<>/,$log[0]); if($set{'interval'} && $set{'interval'} && $in{'time'} <= ($lasttime + $set{'interval'}) && $in{'addr'} eq $lastip){ &error(203);} $in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); } my $orgname; if(split(/\//,$in{'orgname'}) > split(/\\/,$in{'orgname'})){ my @name = split(/\//,$in{'orgname'}); $orgname = $name[$#name]; } else{ my @name = split(/\\/,$in{'orgname'}); $orgname = $name[$#name];} ここぐらいしか 202 ってところないけど・・・ 322 名前：nobodyさん mailto:sage [2008/05/25(日) 19:14:47 ID:???] もしかしてperlのソース読めないんですか？ 323 名前：nobodyさん mailto:sage [2008/05/25(日) 19:16:16 ID:???] >>322 $in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); } この行をどうにかすればいけるぐらいしかわからん 324 名前：nobodyさん [2008/05/29(木) 19:57:45 ID:Ql0N4gMP] 上げてもよかったのでしょうか… 【.　 CGI名 　.】　Link ＆ Rank 【配布先URL】　taitaistudio.com/ 【. 置き場所 .】　taitaistudio.com/cgi/linkrank.html 【ヘルプ内容】 ユーザーエディット(sub mente)で、サイト名やサイトURLなどに追加して、 新しい変数($kisyu)を追加して、登録者が対応機種を選択出来る 新しい選択欄を追加したいのですが、どうしてもログに追加されません。 挙げ句の果てにはズレてIPが表示されてしまいます。 配布元は改造のサポートは行っていないとの事なので、完全にいきずまってしまいました。 どなたか、御教授よろしくお願い致します。 325 名前：nobodyさん mailto:sage [2008/05/30(金) 03:14:29 ID:???] もっと詳しくかつ明瞭に。 326 名前：324 [2008/05/30(金) 19:04:03 ID:mgybmJwP] ちょっと説明しづらいのですが、 デフォルトでランキングの登録者がサイト名やサイトURL、バナーURL、キーワード、サイト紹介文を決められるのに追加して、 例えば、『サイト詳細』などの新しい項目を作りたいです。 しかし、何度やってもログに記録されずにログから呼び出すことも出来ません。 わかりにくい説明かとは思いますがよろしくお願い致します。 327 名前：nobodyさん mailto:sage [2008/05/30(金) 21:07:56 ID:???] 「何をどうやった」のかを「具体的に」説明してくれないと こっちもアドバイスのしようがないんだが 328 名前：nobodyさん [2008/05/30(金) 21:26:46 ID:mgybmJwP] 全てに新しい変数を追加しました。 329 名前：nobodyさん mailto:sage [2008/06/01(日) 16:00:47 ID:???] ┓(￣∇￣;)┏ 330 名前：nobodyさん mailto:sage [2008/06/14(土) 03:25:31 ID:???] 置いてある場所 www.cj-c.com/cgi_s/cbbs.htm 新規投稿時（親記事）の入力項目（セレクトフォーム）を増やすしたいです。 設定でセレクトフォームをつけれるのですが１つだけで、もう１つ増やしたいのです。 宜しくお願いします。 331 名前：nobodyさん mailto:sage [2008/06/16(月) 05:57:41 ID:???] １．設定で現在の書き方を参考に新しい変数を作ってデータを入れる ２．メインcgiのhtml出力しているところを見つけて同じように書く ３．メインcgiの書き込み、読み出ししてるところを見つけて同じように書く 以上 332 名前：nobodyさん mailto:sage [2008/07/25(金) 03:17:16 ID:???] 【CGI名】 DiaryCGI nicky! 【配布先URL】 www.din.or.jp/~raelian/ReadMeNicky.html 【ヘルプ内容】コメント記入時に、メールが送信されるように設定した場合、 通知メール内容にコメント文も載せるようにしたい。 nicky.CGIの2725行にどのような記述をいれれば本文に入るのでしょうか？ 宜しくお願いします。 333 名前：nobodyさん mailto:sage [2008/07/25(金) 04:48:36 ID:???] >>332 2725行？入れるところはそこじゃないと思うよ。 from : $ENV{REMOTE_HOST}($ENV{REMOTE_ADDR}) agent : $ENV{HTTP_USER_AGENT} という行の下に以下を追加する name : $CommentName message : $CommentMsg 文字化けで読めなかったら $CommentName $CommentMsg をjcodeでjisコードに変換する文をsub SendMailRcvNotice{の下の行に追加 334 名前：nobodyさん mailto:sage [2008/07/25(金) 22:21:13 ID:???] >>333 ありがとうございました！ ちゃんとできました！ 335 名前：nobodyさん [2008/08/07(木) 13:46:25 ID:qpI1q2Ei] 【CGI名】 PRTC BBS 【配布先URL】 一般に配布されていません 【ヘルプ内容】暗号化をしたいです www.rescue.ne.jp/cgi/htpasswd/makepwd-des/ このサイトのような感じで(もっと簡素でも構いません) とにかく出力をしたいんです 下記のソースでcgiを動かしたいのですが、初心者でわかりません 知識不足なのはわかっているのですがどうしてもやりたいです よろしくお願いします sub enc_string{ my ($key, $string) = @_; my @map = (('A' ... 'Z'), ('a' ... 'z'), ('0' ... '9'), '+', '&'); my @key = unpack('C*', $key); my $str = ''; my @x = map { int(rand(200)) } (0 ... 2); @key = map {$x[$_] ^ $key[$_]} (0 ... 2); while($string ne ''){ my $n = substr($string, 0, 3, ''); my @n = unpack('C3', $n); map{$n[$_] ^= ($key[$_])} (0 ... 2); 336 名前：335 mailto:sage [2008/08/07(木) 13:47:25 ID:???] @key = unpack('C3', $n); @key = map {$x[$_] ^ $key[$_]} (0 ... 2); my $a = $n[0] >> 2; my $b = (($n[0] & 3) << 4) | ($n[1] >> 4); my $c = (($n[1] & 15) << 2) | ($n[2] >> 6); my $d = $n[2] & 63; $str .= $map[$a] . $map[$b] . $map[$c] . $map[$d]; } my $a = $x[0] >> 2; my $b = (($x[0] & 3) << 4) | ($x[1] >> 4); my $c = (($x[1] & 15) << 2) | ($x[2] >> 6); my $d = $x[2] & 63; return $str.'<>'.$map[$a].$map[$b].$map[$c].$map[$d]; } 337 名前：nobodyさん [2008/08/09(土) 03:15:31 ID:pVYfvjSg] 【盗聴】web-up.cside.biz【個人情報詐取】 pc11.2ch.net/test/read.cgi/php/1218216303/l50 338 名前：nobodyさん mailto:sage [2008/08/18(月) 18:39:47 ID:???] >>335 それは暗号化キーと暗号化対象文字列を引数に取り、暗号化後の文字列二種を '<>' 区切りで返すサブルーチンです。 あとはそのサブルーチンを適切な引数で呼出し、返値を受取って表示するだけです。 この場合、引数は基本的に任意ですから、必要なものを与えてください。 値の与え方が分からない場合は暗号化アルゴリズムについて調べてください。 ルーチンの呼出し方、または返値の受取り方が分からない場合は、Perl のサブルーチン呼出しについて調べて下さい。 プログラムでの値の受取り方、または値の表示の仕方が分からない場合は、CGI の基礎を学ばれるべきだと思います。 339 名前：nobodyさん [2008/08/22(金) 12:34:43 ID:HAxZZ1Pz] △▲　WebProg 初心者の質問 Part17　▼▽ pc11.2ch.net/test/read.cgi/php/1204462146/l50 （スレ違いしみませんでした）） から来ましたm(__)m CGI掲示板スクリプト、ウェブパティオの記事表示順の変更について教えてください。 bbs.capture-game.com/cgi/mobile.html （バージョンは3.19です） のウェブパティオについて質問なのですが 携帯のレス表示画面で単純に新しいレス記事を上から表示するには 何処を変更したらいいでしょうか？ 初心者の質問スレではreverseを使う所まで教えて頂いたのですが、 何分初心者ですので何卒お願い致します。 340 名前：nobodyさん mailto:sage [2008/08/22(金) 12:37:00 ID:???] >(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い 341 名前：nobodyさん [2008/08/22(金) 12:58:25 ID:HAxZZ1Pz] >>340 すいません。ご指摘ありがとうございます。 補足です。 【.　 CGI名 　.】　携帯対応ウェブパティオv3.19 【配布先URL】　ttp://www.capture-game.com/modules/wfdownloads/singlefile.php?cid=1&lid=2 【. 置き場所 .】　ttp://www.capture-game.com/modules/wfdownloads/visit.php?cid=1&lid=2 【ヘルプ内容】　携帯電話表示でレス表示画面の並び順を通常12345と並んでいるのを54321という風に新しい書き込みからに並び替えたいです。 lib/phone/read.plをいろいろやってみましたがPerlの知識が乏しいため駄目です。初心者の質問スレではreverseを教えていただきましたが、 どの様なプログラムを何処に入れたらいいか解りません。教えて下さい。何行目を（）しなさいみたいに言っていただけたら幸いです。 なにとぞお願い致します。 342 名前：nobodyさん mailto:sage [2008/08/22(金) 12:59:30 ID:???] >少しは自分で考えること 343 名前：nobodyさん mailto:sage [2008/08/22(金) 13:38:02 ID:???] >>342 もしかして # 投稿順にソート @new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; regist.plのここですかね？^^; 344 名前：nobodyさん mailto:sage [2008/08/22(金) 17:08:31 ID:???] >>343 で、やってみたか？ 345 名前：nobodyさん mailto:sage [2008/08/22(金) 17:49:49 ID:???] >>344 やってみました＾＾ これと @new = @new[reverse sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; これを @new = reverse(@new); @new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; 試しましたが無理でしたorz 346 名前：nobodyさん mailto:sage [2008/08/22(金) 23:20:22 ID:???] >>345 reverse() までたどり着いてんならあともう一歩だ。がんばれ。 347 名前：nobodyさん mailto:sage [2008/08/23(土) 01:26:37 ID:???] lib/phone/read.plの２２０行目 while (<IN>) { 　　　　↓ for (reverse <IN>){ ってな感じじゃないかな 348 名前：nobodyさん mailto:sage [2008/08/23(土) 01:32:40 ID:???] >>347 while と for では $_ のスコープに関する扱いに違いがある点に注意。 また逐行処理前提で書かれたループ内のコードが適切でない可能性があるよ。 読んでないからどう影響するかはわからんけど応援してみる。 349 名前：nobodyさん mailto:sage [2008/08/23(土) 01:48:47 ID:???] >>346 >>348 ありがとうございます(^o^) >>347 解りやすくありがとうございます＾＾ 出来た！と思ったのですが（ひっくり返りました（感動）） １ページ表示数以上のレスが付くと一番新しいレスが２ページ目に行ってしまいます（涙） 350 名前：nobodyさん mailto:sage [2008/08/23(土) 03:58:22 ID:???] @new = @new[sort {$sort[$a] <=> $sort[$b]} 0 .. $#sort]; でどうだ？ 351 名前：nobodyさん mailto:sage [2008/08/23(土) 09:27:40 ID:???] >>350 ２カ所とも試してみましたが変わりませんでした(;.;) ありがとうございました。 352 名前：347 mailto:sage [2008/08/23(土) 09:49:35 ID:???] >>349 あとは表示するレスの抽出だけみたいだから $i = 0; while (<IN>) { $i++; if ($i <= $from) { next; } if ($i > $to) { last; } chop; ↑の部分（read.pl２２０行目辺り）を $i= 0; my @line; while (<IN>){ $i++; if ($i <= $from) { next; } if ($i > $to) { last; } push(@line, $_); } for (reverse @line){ chop; ってな感じじゃないかな 353 名前：nobodyさん mailto:sage [2008/08/23(土) 16:32:22 ID:???] >>352 見事に出来ました(T.T) 非常に解りやすく教えて頂き本当に感謝致します。 ありがとうございましたm(__)m 354 名前：nobodyさん [2008/08/24(日) 20:26:26 ID:8OT0ZHuq] 【.　 CGI名 　.】　HiLink ver1.12（サンプルAバージョン） 【配布先URL】　www.e-hws.net/ 【. 置き場所 .】　www.e-hws.net/hilink.html 【ヘルプ内容】 リンク登録時に特定のカテゴリーを選択したとき、表示部のテーブル背景色を変更したいです。 hilink.cgiの「表示データ作成」部分に以下のように追加し if ($category eq 'ああああ' ){$cate_clr="red";} elsif ($category eq 'いいいい ){$cate_clr="blue";} else {$cate_clr="#999999";} スキンのmain.htmlで、テーブルタグにbgcolor="$cate_clr"と入れてみましたが うまくいきませんでした。 なにぶん手探りで、何かおかしなことをやらかしているかもしれないのですが なんとかご教授いただけると嬉しいです。 どうかよろしくお願いします。 355 名前：nobodyさん [2008/08/24(日) 20:38:01 ID:ZUYvYMes] 【.　 CGI名 　.】　へっどらいん 【配布先URL】　php.s3.to/ 【. 置き場所 .】　php.s3.to/net/#amezo 【ヘルプ内容】 このへっどらいんで出力させる場合に<script>コードを無効にしてほしいです ないサイトなら問題ないのですがある場合は気になります よろしくお願いします 356 名前：nobodyさん mailto:sage [2008/08/28(木) 12:17:05 ID:???] >>355 headline.phpの144〜146行目 144:　for($j=7; $j<count($files); $j++){//残りはHTMLデータ 145:　　$line.= $files[$j]; 146:　} の下に、以下の行を加える。 $line = preg_replace('/<script[^>]*>.*<\/script>/','',$line); 表示時だけでなくデータ取り込みの際にも<script>を除去したければ、85行目の上にも同じものを入れる。 84:　if($start || !$head[start]){ 85:　　　$new.= $line; 検証してないけど。 357 名前：nobodyさん [2008/09/02(火) 17:46:02 ID:ikXIt5qG] 【　 CGI名 　】配布用web拍手CGI 【配布先URL】www.webclap.com/ web拍手CGI公式サイトさんのところで無料配布のスクリプトをもらってきたのですが、 ファビコンがプロバイダ側のへんてこファビコンなので変えたいのです！ 自サイトのhtmlページでは自作のファビコンで被せてあるのですが、CGIでファビコンを つけるのはどこをどういじったら良いですか？ clapinit.txt (cgi)　このファイルがあやしかったので、 #-------------- # HTMLヘッダー #-------------- sub header{ print "Content-type: text/html\n\n"; print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">',"\n"; print '<html lang="ja"><head>',"\n"; print "<title>$title</title>\n"; print "</head>\n"; この内に print "<link rel="shortcut icon" href="favicon.ico">\n"; ↑これを加えてみたのですがダメですた。 他にもいじらないとダメだったりするのでしょうか。 もしかして根本的に間違ってたりするのでしょうか…。 どなたかお助けください。 スクリプトダウンロード先は www.webclap.com/etc/download.html←ここです。 358 名前：nobodyさん mailto:sage [2008/09/02(火) 18:03:23 ID:???] print qq|<link rel="shortcut icon" href="favicon.ico">\n|; 書くならエスケープしないと 359 名前：357 [2008/09/02(火) 18:21:23 ID:ikXIt5qG] 358さん、ありがとうっ！ できました。ヽ(　　´　　∇　　｀　　)ノ エスケープてなんのことかさっぱりですが、助かりました！ ありがとうございましたー。 360 名前：WIvuwbtzwfKUbeCY mailto:unprdk@urrwey.com [2008/09/04(木) 04:46:54 ID:???] 8BjBoM <a href="ywnlxptotivr.com/">ywnlxptotivr</a>, [url=rteiyeyfadlo.com/]rteiyeyfadlo[/url], [link=ogppqltwqlls.com/]ogppqltwqlls[/link], qkrzooqzbhel.com/ 361 名前：nobodyさん mailto:sage [2008/09/04(木) 06:55:50 ID:???] PHP限定で改造やります 改造したものはHPで公衆発信します まず以下の情報を書いてレスよろ [スクリプト名]名前は正確に！！ [配布先URL]二次配布できるかできないか確認するためです。うｐローダに置いてあったらスルー [改造内容]何をどのように改造したいのか詳しく。あいまいな内容は基本的にスルー 362 名前：nobodyさん mailto:sage [2008/09/04(木) 20:31:18 ID:???] >>361 スレの趣旨から反するから改造丸投げはNG 363 名前：nobodyさん mailto:sage [2008/09/04(木) 20:58:58 ID:???] 一部も丸投げもどっちでもいいよ 364 名前：nobodyさん mailto:sage [2008/09/04(木) 23:19:35 ID:???] 関連スレ 【 スクリプト改造依頼スレ 】(丸投げ) part7再 pc11.2ch.net/test/read.cgi/php/1220469709/ 365 名前：RZWXbJawD mailto:epezJffuuGpds [2008/09/15(月) 12:13:38 ID:???] map+1409.txt;50;60 366 名前：nobodyさん mailto:sage [2008/09/20(土) 18:44:46 ID:???] www.dotup.org/uploda/www.dotup.org2048.zip.html ゲームの得点ランキングを作ろうと思い、 名前・得点・コメントを入力してランキングに登録するといった形のものを作りたかったのですが、 値を入力し、送信してもうまく表示されません。 logのファイルに書き込みはできてるみたいですが、正しくかけていないように思えます。 どうすればランキングを表示できるでしょうか？ もうどこが間違ってるのか分からなくなってしまいましたので、アップロードさせていただきました。 どなたか修正・ご指導よろしくお願いします。 www.cgi-web.net/download-top.html様の quizというCGIを元に改造してみたものです。 こちらに誘導されました。よろしくお願いします。 367 名前：nobodyさん mailto:sage [2008/09/21(日) 01:27:40 ID:???] >>366 配布元の制限を読むと、あなたが配布元に連絡していない場合、 今回のアップロードは「スクリプトの無断再配布」に当たり、 同サイトの提示するライセンスに抵触する可能性があります。 権利関係を再確認してください。 368 名前：nobodyさん [2008/09/26(金) 20:08:56 ID:ze4UkUPR] 【.　 CGI名 　.】toshinariスクリプト(Perl) 【配布先URL】www.toshinari.net/ 【ヘルプ内容】 としなり掲示板にリモートホスト、IPを取得できるように改造してください。 できれば/BBSID/log/00000.cgi みたいに掲示板IDディレクトリに新しくlogディレクトリを作成してcgiファイルで保存するようにして それでレス削除画面にリモートホスト、IPを表示させるようにしてくれるといいです。 あと、ここからは希望ですが リモートホスト(IP)規制機能と透明あぼーん機能をつけてください。 報酬はリモートホスト、IP取得が500P リモートホスト(IP)規制機能、透明あぼーんまで追加してくださったら+500P払います 369 名前：nobodyさん mailto:sage [2008/09/26(金) 20:33:39 ID:???] Pって何やねん 370 名前：368 [2008/09/26(金) 20:35:04 ID:ze4UkUPR] >>368 すいません、書き忘れてました ウェブマネーのことです。 371 名前：368 [2008/09/26(金) 20:36:50 ID:ze4UkUPR] 安価ミス・・・ >>368じゃなくて>>369 372 名前：nobodyさん mailto:sage [2008/09/26(金) 20:52:29 ID:???] ケチくさいにもほどがあるな 373 名前：nobodyさん mailto:sage [2008/09/27(土) 00:18:26 ID:???] >>368 「ここからは希望」ってあるがじゃあその前は何なんだ 374 名前：nobodyさん mailto:sage [2008/09/27(土) 04:01:31 ID:???] ま、>>1嫁 375 名前：368 [2008/09/27(土) 07:15:06 ID:DmLoG2K4] すいません。書き直します ダウンロード場所：cgi.toshinari.net/wiki.cgi スクリプト名：toshinariスクリプト どんな風に改造するか： としなり掲示板にリモートホスト、IPを取得できるように改造してください。 /BBSID/log/00000.cgiという感じにlogディレクトリにcgiファイルで保存するようにしてほしいです。 報酬はWM1000Pです。 これからは希望ですが ＩＰ規制と透明あぼーんもつけてもらえれば幸いです。 376 名前：nobodyさん mailto:sage [2008/09/27(土) 07:49:04 ID:???] >>375 で、どこまでやったのさ？ 自分で全然やる気ないなら丸投げスレへ行け 377 名前：368 [2008/09/27(土) 16:52:29 ID:DmLoG2K4] >>376 どこまでやったというと？ がんばってもできないから改造依頼したんですが・・・ あと、dat落ちしていない丸投げスレのURL教えてください。 378 名前：nobodyさん mailto:sage [2008/09/27(土) 16:53:18 ID:???] これはひどい 379 名前：368 [2008/09/27(土) 19:14:47 ID:DmLoG2K4] なんとか自分でできそうです 380 名前：368 [2008/09/27(土) 19:25:04 ID:DmLoG2K4] なんとかできました 381 名前：nobodyさん mailto:sage [2008/09/29(月) 07:51:32 ID:???] >>380 自分で出来んならくんなよ 382 名前：nobodyさん mailto:sage [2008/09/29(月) 08:50:14 ID:???] 関連スレ 【 スクリプト改造依頼スレ】(丸投げ) part7再々 pc11.2ch.net/test/read.cgi/php/1222645553/ 383 名前：nobodyさん mailto:sage [2008/09/29(月) 09:02:12 ID:???] 丸投げスレがまた即死したので立てときました。 こっち（工房）にまとめようという意見もあるようですが、一種の隔離スレみたいな 意味合いもあると思うので、やっぱあった方がいいかと…… 384 名前：YwSCdaoYJixVIpCijR mailto:ConstandinosGokasi87@gmail.com [2008/10/03(金) 04:13:35 ID:???] hi, you have super site., 385 名前：nobodyさん mailto:sage [2008/10/04(土) 02:06:40 ID:???] 【.　 CGI名 　.】　ショッピングカート WebCart 2.3x 【配布先URL】　www.cgis.biz/script_web_cart/ 【ヘルプ内容】　 サンプルを見ていただくとわかると思いますが、商品の並び順が新しい番号が 上にくるようになっています。 これをＮＯ．１から表示するようにしたいのですが、どこを改造すればよいか ご教授ください。 私が見た中で、ここかな？と思ったのは、view.phpの153〜154行目と思ってい ますが、どうでしょうか。 386 名前：nobodyさん mailto:sage [2008/10/04(土) 02:07:50 ID:???] じゃやれよ 387 名前：nobodyさん mailto:sage [2008/10/04(土) 02:16:49 ID:???] >>386 じゃやれよって言われても…どう変えればいいのかわからないから聞いているの ですが？ 自分でできそうだったらすでにやってますが、場所が見当ついても、何を変えれ ばいいのかわからず、作者さんもお忙しいとお聞きしましたので、ここで聞いて みたのですが…。 388 名前：nobodyさん mailto:sage [2008/10/04(土) 02:24:39 ID:???] 分からないなりに当たりつけてやってみなよ まさか100%何も見当付かないってことはあるめえ？ 389 名前：nobodyさん mailto:sage [2008/10/04(土) 04:39:31 ID:???] 言語がわからんってことなら丸投げいけば？ 390 名前：385 mailto:sage [2008/10/05(日) 11:16:52 ID:???] 丸投げスレにて教えてもらいました。 誘導ありがとうございましたm(_ _)m 391 名前：nobodyさん mailto:sage [2008/10/05(日) 18:39:28 ID:???] 回答もらってからこっちを終わらせるとかほんと悪質だなｗ 392 名前：nobodyさん [2008/10/07(火) 23:59:17 ID:Zxtb1+eC] >>899 ありがとうございます 393 名前：nobodyさん [2008/10/27(月) 20:40:50 ID:vjLKC+JQ] 【CGI名】スレ天 【場所】cgipon.specters.net/tengoku/download.html 【ヘルプ】トリップつけれるようにしたい ググったらそれらしいのはなんぼかみつかったけど 入れる場所とかわかりません。 ご教授よろしくおねがいします。 ★ ワンポイント 2chのトリップ生成方法は以下のようになっています。 ($name, $tripkey) = split(/\#(.+)/, $form{'name'}); if($tripkey){ $salt = substr($tripkey.'H.', 1, 2); $salt =~ tr/\x3A-\x40\x5B-\x60\x00-\x2D\x7B-\xFF/A-Ga-f./; $salt =~ s/[^\.\/0-9A-Za-z]/\./g; $trip = '◆'. substr(crypt($tripkey, $salt), -10); } print "$name$trip"; 394 名前：nobodyさん [2008/10/27(月) 20:42:05 ID:vjLKC+JQ] 書き込み処理直前、クッキー発行後 ＜ここから＞ #トリップ機能 $in{'name'} =~ s/◆/◇/g; $in{'name'} =~ s/\x23(.+)$/ "◆".trip($1)/e; ＜／ここまで＞ #----------------# # トリップ生成 # #----------------# sub trip { my $key = shift; $key =~ s/"/"/g; $key =~ s/</</g; $key =~ s/>/>/g; my $salt = substr("${key}H.", 1, 2); $salt =~ tr/\x00-\x2d\x7b-\xff/./; $salt =~ tr/\x3a-\x40\x5b-\x60/A-Ga-f/; return substr(crypt($key, $salt), -8); 395 名前：nobodyさん [2008/11/29(土) 15:46:24 ID:kT4OjumG] 【.　 CGI名 　.】　RNA pre2.0b2 (build 051225) 【配布先URL】　web.archive.org/web/20080207152240/http://foaf.jp/~msano/rnanightly_with_extlib.tar.gz　（少し重いですが、DLできます。783kbです。） 【ドキュメント】web.archive.org/web/20070217110104/www.semblog.org/wiki/index.cgi?RNA%c0%e2%cc%c0%bd%f1(nightly%c8%c7) 【ヘルプ内容】 # スクリプト紹介 ・RNA は、Webサーバ上で動作する、RSSアグリゲータの一種です。 　Perl/CGI で実装されています。 　Web上のいろいろなサイトの更新情報を収集するアンテナとしての機能が主です。 ・www.semblog.org/wiki/?rnaで配布されてるスクリプトの開発版です。 ・開発はストップしてます ・isnot.jp/?p=RNA%A5%E1%A5%E2 にも、スクリプトの処理の流れが書いてあります。 　（Perlがわかるかたにはスクリプトを見たほうが早いかもしれませんが） # したいこと ・楽天ブログのRSS等、RSS内に入ってる広告を除去したいです 　具体的には、"PR:"で始まってるitemを除去したいです 396 名前：395 mailto:sage [2008/11/29(土) 15:48:00 ID:???] # やってみたこと、考えたこと ・lib/RNA.pmの800行目付近、cacheしたサイトのデータをStoreして、sortする前あたりで 　除去したらいいのかなと思ってます $self->__cache_sites($new_cache_data); $self->{SiteList}->{RSSArray} = \@rss_array; unless($config->{DateControl}->{AllowFutureEntries}) { $self->remove_future_entries; } $self->remove_ads; # この辺り？ 397 名前：395 mailto:sage [2008/11/29(土) 15:48:35 ID:???] ・lib/RNA/RSS.pmの remove_future_itemsを参考に見よう見まねで書いてみたりもしましたが、 　「titleが "PR:" で始まってるitemを除去する」という書き方がわかりませんでした sub remove_ads { my $self = shift; my %arg = @_; my @new_items = (); foreach my $item (@{$self->{items}}) { if (index($item->{title}, "PR:") < 0) { push(@new_items, $item); } } $self->{items} = \@new_items; } ・処理するタイミングも間違ってるかもしれません ・できれば今後のために、除去するitemの指定方法に汎用性を持たせていただけるとなお嬉しいです 以上よろしくお願いします 398 名前：nobodyさん [2008/12/12(金) 23:58:00 ID:A0lF4mOo] 【 スクリプト改造依頼スレ】(丸投げ)のほうで投稿したのですが、 投稿した後にこちらのスレで質問したほうがいいという書き込みを見つけたので 同じ内容のものを投稿します。 【 CGI&PHP名 】 CSS Yomi-Search（Yomi-Search改造版） 【 配布先URL 】 ttp://www.w-art.org/ 【 依頼内容 】　マーク順設定で検索したとき、ログの並び順を更新日の新しい順にしたい 現在ログをマーク順で表示させています。 デフォルトではＩＤの新しい順で並ぶようになっていますが、 ↓の方法で更新日の新しい順に並ぶようにしました。 web.archive.org/web/20041222074129/yomi.pekori.to/bbs2/wwwlng.cgi?print+200205/02050051.txt しかし、検索した時にログの表示が変になってしまいます。 上記のアドレス先にも検索した時の表示の対処法が書いてあるのですが、 その通りにやってみると並び順はきちんとなるのですが、同じログが２つ表示されてしまいます。 よろしくお願いします。 399 名前：nobodyさん mailto:sage [2008/12/13(土) 00:13:50 ID:???] で、向こうは書きっぱなしで放置逃亡ですか ならマルチは死ねとしか 400 名前：nobodyさん [2008/12/13(土) 00:28:02 ID:fT/e8zoW] 398です。 すいません。 何度か書き込みをしたことはあるのですが、 削除はしたことがなかったのでその辺を何も考えてませんでした。 えと、削除依頼を出せばいいのかな・・ガイドライン読んできます。 401 名前：nobodyさん mailto:sage [2008/12/13(土) 04:59:44 ID:???] >>400 削除依頼じゃなくてさ、このｽﾚに移動しますって書けばおｋ 402 名前：nobodyさん [2008/12/13(土) 09:48:56 ID:fT/e8zoW] >>401 教えて下さってありがとうございます。 向こうのスレに書き込んできました。 以後気をつけます。 403 名前：nobodyさん mailto:sage [2008/12/13(土) 20:10:29 ID:???] >>402 で、このｽﾚは丸投げじゃないんだから自分で出来るところまでやるってのが第一歩。 404 名前：nobodyさん [2009/01/30(金) 15:25:22 ID:Mp+dTJwq] 【.　 CGI名 　.】　phpexit ver.1.1.4 【配布先URL】　chibinowa.net/ 【. 置き場所 .】　chibinowa.net/webapp/phpexit.html 【ヘルプ内容】 　項目の追加をお願いします。 　配布先にスクリーンショット画面がありますが、 　一覧部分の「webplog>perl」の部分（カテゴリの部分）の上部に、2件の項目を追加したく思っています。 　追加項目の内容は、1件はテキストエリア、2件目はコメント欄と同じくらいの文章です。 　個人で、テキストエリアの追加は出来たのですが、肝心の一覧にその部分が表示されず、行き詰っています。 　lib/cmd/edit.php、item.php　などを弄ってあります。 色々修正してみたり、記述を変えてみましたが、増やした項目部分を登録すると増やしたコメント欄とテキストエリアが同じ内容になってしまったりします。 　1度自己解決したのですが、上記問題が出てしまいましたので、どうかご助言お願い致します。 405 名前：nobodyさん mailto:sage [2009/01/30(金) 23:11:27 ID:???] コメント欄とテキストエリアで出力している変数を別にすればいいのでわ？ 406 名前：nobodyさん mailto:sage [2009/02/04(水) 05:16:41 ID:???] 【.　 CGI名 　.】　0chスクリプト 【配布先URL】　0ch.mine.nu/public/scripts/　0chのtest060227.zip 【ヘルプ内容】 0chのtest060227.zipを使用して掲示板を運営しています。 スレッド一覧（ ./subback.html ）にもmeta.txtの内容を書き込もうと思い いろいろ弄ってなんとか形になりました。※meta.txtは掲示板を作って自分で書き込めます。 しかし、これでよいのかどうか自信がもてないため質問します。 varda.plの191 sub CreateSubback{　} 内に require('./module/legolas.pl'); $Caption = new LEGOLAS; META($this,$Index,$Caption); 151# HTMLヘッダの出力 $Caption->Print($Page,undef); 他に sub META{ 　my ($this,$Page,$Caption) = @_; 　my ($title,$link,$image,$code); 　$Caption->Load($this->{'SYS'},'META'); } ミスはないでしょうか？ 407 名前：nobodyさん mailto:sage [2009/02/04(水) 19:33:07 ID:???] レンタル鯖にてメール送信CGIを設置したくPerlで継ぎはぎしてやってみたんですが、 メールは送信されるのですが、件名とメアドまで本文の方に来てしまって、 件名が（無題）で送信者がanonymousになってしまいます。 どうやったら件名とメアドを認識してくれるのでしょうか？ HTMLの入力フォームは、名前、メアド、件名、本文の４つだけです。 408 名前：404 [2009/02/04(水) 19:36:06 ID:KFPddoVr] >>405 解答ありがとうございました。頑張ってみます！ 409 名前：nobodyさん mailto:sage [2009/02/04(水) 19:36:17 ID:???] ソースをさらせばいい ↓そのソースじゃねーＹＯ！ 410 名前：nobodyさん mailto:sage [2009/02/04(水) 20:04:10 ID:???] >>409 ｿｰｽさらします。Perl知らないんでこれが限界っす･･･。 #!/usr/bin/perl $mailprog = '/usr/sbin/sendmail'; require 'jcode.pl'; #Get the input read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); #Split the name-value pairs @pairs = split (/&/,$buffer); foreach $pair(@pairs) { ($name, $value) = split(/=/, $pair); #Un-Webify plus signs and %-encoding $value=~tr/+/ /; $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $FORM{$name} = $value; if ( $name ne "to" ) { push (@fields, $name) unless (grep(/^$name$/, @fields)); } } # set recipient address if form is blank $to = $FORM{'to'}; 411 名前：nobodyさん mailto:sage [2009/02/04(水) 20:04:56 ID:???] 続きです。 ### 送信フォーマット $mail_msg = ""; foreach $field (@fields) { $mail_msg = "$mail_msg-----------------------------------------------\n"; $mail_msg = "$mail_msg($field) $FORM{$field}\n"; } ### ShiftJis to Jis &jcode'convert(*mail_msg, 'jis'); open(MAIL,"| $mailprog $FORM{'to'}")|| die "Can't open $mailprog!\n"; print MAIL $mail_msg; close(MAIL); 412 名前：nobodyさん mailto:sage [2009/02/04(水) 20:12:33 ID:???] メールヘッダがないではないか？ 413 名前：nobodyさん mailto:sage [2009/02/04(水) 23:10:20 ID:???] >>410 まず、スクリプトの先頭に use strict; use warnings; と書いて。 414 名前：nobodyさん [2009/02/05(木) 15:06:41 ID:0clwaODI] 【. CGI名 .】美しい画像掲示板 【配布先URL】ttp://w1.nirai.ne.jp/freeze/appli/file06.html 【ヘルプ内容】 ・ファイルサイズを800000にしたい if($filesize <= 100000){ ここを変更するだけでは下記の行がエラーで上手く表示されません $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); ・画像がない場合の表示 行に画像が1枠しかない場合、残り4枠に'image.jpg' の画像が 表示されるはずが1枠にしか表示されません どうか力を貸して下さい 415 名前：nobodyさん mailto:sage [2009/02/05(木) 15:17:02 ID:???] エラーでメッセージが出ずに行がそのまま出るの？ 416 名前：414 mailto:sage [2009/02/05(木) 16:05:49 ID:???] >>415 ファイル名　oo.jpg アップロード成功！ Warning: Division by zero in bbs.php on line 197 と出て、その行（表示させるテーブル）が凝縮されて画像は表示されません。 417 名前：nobodyさん mailto:sage [2009/02/06(金) 02:28:34 ID:???] じゃもう問題分かったようなもんじゃん 418 名前：414 mailto:sage [2009/02/06(金) 22:45:19 ID:???] >>417 if($filesize <= 100000)をif($filesize <= 800000)に変えるとなぜ $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); がエラーを起こすのか理解できていないので解決できません 419 名前：nobodyさん mailto:sage [2009/02/06(金) 22:45:51 ID:???] いや検証して理解すれよ 420 名前：nobodyさん mailto:sage [2009/02/06(金) 23:33:26 ID:???] 糞スクリプト過ぎるな。 とりあえずその行の直前ででも関係する変数を適当に出力してみれ。 ゼロ除算なのだから、割る数のうちいずれかが0になっている。 値がおかしい変数が見つかったら、その変数に値を設定している部分を全部洗い出して、どういう風に値が変わっていくか調べろ。 421 名前：420 mailto:sage [2009/02/07(土) 01:08:19 ID:???] 配布CGIが糞なのは今に始まった事じゃないから諦めて整理しつつ読んだ。 問題はその変更じゃないな。変な画像が混ざってるんじゃねぇか？ データはそのままで改造前のスクリプトを設置したらちゃんと動くのか？ 422 名前：414 mailto:sage [2009/02/07(土) 13:19:00 ID:???] >>421 アップして表示するのに関しては正常に動きます 画像がない場合の表示はダメです 理想　　　　　　現実 ■□□□□　　　■×××× ■アップした画像 □画像がない場合に表示する画像 ×イメージがない 423 名前：nobodyさん mailto:sage [2009/02/07(土) 13:42:18 ID:???] 表示してみなよ $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); の直前に print "Content-type: text/plain\n\n$a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h);\n"; exit; みたいに書いてさ・・ 424 名前：414 mailto:sage [2009/02/07(土) 14:58:22 ID:???] >>423 ありがとう。テーブルの幅を変えているからダメなんでしょうか？ 何かやればやるほど色んな不具合が見つかり心が折れそうです これは止めておいた方がいいスクリプトですかね（ ＾ω＾） 425 名前：nobodyさん mailto:sage [2009/02/07(土) 17:41:10 ID:???] いや言われたことやれよ・・・ 426 名前：nobodyさん mailto:sage [2009/02/07(土) 18:01:23 ID:???] まあ、問題の切り分けをしようとも考えない>414にはお似合いのレベルだけどな。 image.jpgがスクリプトと同じディレクトリに無いだけ、に一票。 どう見えるかなんざ枝葉末節の問題に過ぎないんだから、HTMLソースどうなってるのか確認しろよ。 427 名前：nobodyさん mailto:sage [2009/02/07(土) 18:40:53 ID:???] 設置することが最終目標の人たちに対して、 デバッグの仕方教えても仕方ないような気がしてきた。 428 名前：nobodyさん mailto:sage [2009/02/07(土) 18:44:15 ID:???] じゃ改造スレじゃなくて丸投げスレ行けと 429 名前：414 mailto:sage [2009/02/07(土) 19:01:15 ID:???] >>425 テーブル幅・ファイルサイズを変えて色々試しました ファイルサイズが関係無い事はわかったのですが 何がいけないかわからなかったです >>426 422の現実は下記の間違いでした ■□××× 430 名前：nobodyさん mailto:sage [2009/02/07(土) 19:47:38 ID:???] >423 >表示してみなよ >表示してみなよ >表示してみなよ >426 >HTMLソースどうなってるのか確認しろよ。 >HTMLソースどうなってるのか確認しろよ。 >HTMLソースどうなってるのか確認しろよ。 （日本語が分からないようなので3回言いました） 431 名前：nobodyさん mailto:sage [2009/02/07(土) 20:07:27 ID:???] >>428 丸投げスレとかあるのかｗ 432 名前：414 mailto:sage [2009/02/07(土) 21:09:57 ID:???] >>430 表示された式をレスすれば解決してくれるの？ ソースを確認と言われても414のサイトにあるソースの ファイルサイズとテーブル幅以外は変更してないので 確認して貰えれば助かるのですが？ 433 名前：nobodyさん mailto:sage [2009/02/07(土) 21:11:49 ID:???] >>432 こちらのスレでどうぞ pc11.2ch.net/test/read.cgi/php/1158647441/ 434 名前：nobodyさん mailto:sage [2009/02/08(日) 07:11:28 ID:???] $bosyu の値が1ならば、登録フォームを表示させる。 0ならば、登録フォームを表示させない。 1か0かは、管理人用ページから設定することができる。　という感じでPerlを組みたいのですが、 まだまだ初心者でよく分かりません。 一応、 <input type=radio name=bosyu value=1>表示する <input type=radio name=bosyu value=0>表示しない というフォームを作り、登録フォームの表示部分に、 if ( $bosyu == 1 ){ 　#登録フォーム } else {} というようにしました。 しかし、管理人画面から1にしようが0にしようが、登録フォームはどのみち消えてしまいました。 この場合、どうしたらよいのでしょう？ もしよろしければ、 www.77c.org/d.php?f=nk5918.lzh に本体をアップロードしましたので、修正箇所など教えていただけますと助かります。 私自身が追加しましたのは、行381,行382,行678,行683,行684　になります。 435 名前：nobodyさん mailto:sage [2009/02/08(日) 07:13:19 ID:???] ごめんなさい、忘れていました。 【.　 CGI名 　.】　Annevote　Ver0.791 【配布先URL】　tackysroom.com/ 【. 置き場所 .】　tackysroom.com/cgi_annevote.htm 【ヘルプ内容】 >>434 436 名前：nobodyさん mailto:sage [2009/02/08(日) 09:39:47 ID:???] >>434 ｽｸﾘﾌﾟﾄを全部見る気はないんで間違っているかもしれんが 684行     else {} →不要 678行     if ( bosyu == 1 ){ →if ( $FORM{'bosyu'} == 1 ){ 437 名前：436 mailto:sage [2009/02/08(日) 10:47:01 ID:???] あはｗ >>436は間違ってるわｗ 設定を別ファイルとかに記録しておかないとダメ!! ゛o(≧◇≦*)oo(*≧◇≦)o″ダメ!!じゃんｗ 考え方としては &decode ;の後に $FORM{'bosyu'}の値が「表示しない」なら別ファイルとかに表示しないという記録をして $FORM{'bosyu'}の値が｢表示する｣なら別ファイルとかに表示するという記録をする 678行目のif文では、別ファイルとかに表示するという記録があるかないかで分岐させればいい 438 名前：nobodyさん mailto:sage [2009/02/08(日) 11:47:45 ID:???] >>437　さん ありがとうございます。 大体構造は理解できました。 if文で変数に値を入力する為には、「記録する」という別の処理が必要なのですね。 まことにお恥ずかしい話ですが、記録させるソースの書き方が分かりません・・・ 例として、記録させるためのソースを教えていただけませんか？ （プログラム内容に沿っていなくても構いません。全体的に「どんな感じ」で書けばいいのか掴めれば幸いです。） 439 名前：nobodyさん mailto:sage [2009/02/08(日) 15:15:31 ID:???] >>438 考え方は排他制御を参考にすればいい $FORM{'bosyu'}の値が「表示しない」ならロックファイルみたいなものを作成し、 $FORM{'bosyu'}の値が｢表示する｣ならロックファイルみたいなものを削除する if文はロックファイルみたいなものが存在していなかったらブロックを実行すればよい annevote.cgiにもロックファイルが使われているからソースをよく読んで自分考えれ 440 名前：nobodyさん [2009/02/12(木) 16:19:46 ID:KnJ40Ap9] 【.　 CGI名 　.】　favicon.cgi 【配布先URL】　blog.dtpwiki.jp/dtp/2009/02/favicon-api-api.html 【ヘルプ内容】　O_SHLOCKとO_EXLOCKが使えないサーバでロック処理をしたい 上記スクリプトをcoreserverに設置し、 MYDOMAIN.com/test/favicon.cgi/http://www.yahoo.co.jp/ などとして呼び出した結果、 Software error: Your vendor has not defined Fcntl macro O_SHLOCK, used at /virtual/MYDOMAIN/public_html/test/favicon.cgi line 97. とエラーが出ます。 O_SHLOCKを削除してテストを続行すると、次はO_EXLOCKが使えないとのエラー。 coreserverのOSがLinuxなので使えないようです。 www.coreserver.jp/help/index.php/spec/ エラーが出る部分を、Linuxで使えるロック処理にするにはどうすればいいのか、 どうぞご教示ください。 441 名前：440 mailto:sage [2009/02/13(金) 10:24:19 ID:???] >>440の件、 flockでなんとか動きました。 ありがとうございました。 442 名前：nobodyさん [2009/04/02(木) 18:02:40 ID:q5b3212c] 【 CGI&PHP名 】 改造ｻﾑﾈｲﾙｶｯﾀｰVer2.3 sam.php 【 配布先URL 】 siokara.que.jp/siokara_accessories.html 【 依頼期限 】　一週間くらい 【 依頼内容 】 1、サムネイル作成元（$img_dir）フォルダーを、複数（7つくらい）指定できるようにしてほしい どうぞよろしくお願いします<m(__)m> 【 スクリプト改造依頼スレ】(丸投げ) part7再々 pc11.2ch.net/test/read.cgi/php/1222645553/ こちらでも依頼しましたが反応がありませんでした 443 名前：nobodyさん mailto:sage [2009/04/02(木) 19:45:21 ID:???] >>442 ここは丸投げｽﾚじゃないんだよ。 自分で改造してわからないことを質問するｽﾚなんだよ。 444 名前：442 mailto:sage [2009/04/02(木) 21:27:22 ID:???] すいません(´；ω；｀)ｳｯ… 445 名前：nobodyさん [2009/04/03(金) 23:39:45 ID:oy8/1v1D] 【.　 CGI名 　.】　もっと書き込み隊2 【配布先URL】　tackysroom.com/page_cgi2.htm 【ヘルプ内容】 外部のテンプレートファイルを読み込んで表示させたいのですが、うまくいきません。 772行目あたりの「ヘッダー上部書き出し」のところに open (FT,"/navi.tmp");　#navi.tmpはテンプレートファイルです。 @navi = <FT>; close (FT); と書き、表示させたいところに print @navi; と書いてみたのですが、表示されません。 解決策ありましたらどうかご教示下さい。 446 名前：nobodyさん mailto:sage [2009/04/03(金) 23:50:12 ID:???] テンプレートに書いてもしょうがないだろ 447 名前：nobodyさん mailto:sage [2009/04/29(水) 09:42:28 ID:???] フリー配布のcgiの改造ヘルプってここでいいのかな…。 【.　 CGI名 　.】arseno-l-0.5 【配布先URL】　ttp://www.geocities.jp/fla774/arseno/ 【ヘルプ内容】　単語の新規登録時に既に登録済みの単語（例えば雨があるのに雨はng。飴ならok）はエラーにする方法が知りたい やってみたことはdl.cgiの中にあるregist_entryで 「新しい単語を配列に書き込む」って処理があったから、その直前に 新しい単語と配列の単語を比較して、一致したら既に登録済みってことでエラーにしようと思いました。 &catch_continuation( "index", $word, $Ip ); &lock_file; &get_index_array( \@index ) or &error( 'open_index', __LINE__, 1 ); $newkey = 0; （追加↓） foreach( @index ){ &error( 'double_word', __LINE__ ) if @index[1] == $word; } （追加ここまで↑） 実際に試してみると、重複して登録できてしまいました。何が原因なんでしょうか。 448 名前：nobodyさん mailto:sage [2009/04/29(水) 09:58:24 ID:???] foreach( @index ){ &error( 'double_word', __LINE__ ) if $_ eq $word; } 449 名前：447 mailto:sage [2009/04/29(水) 10:29:59 ID:???] ありがとうございます。 構文ミスってことでしょうか？ 試してみましたが、やっぱり重複しても登録できてしまいました。 もしかして入れる場所間違ってるんでしょうか…。 450 名前：nobodyさん mailto:sage [2009/04/29(水) 10:48:19 ID:???] &get_index_array内部処理では末尾の改行付いたままだからな 451 名前：447 mailto:sage [2009/04/29(水) 14:48:50 ID:???] つまり &get_index_arrayの単語と比較する前に「改行を除く」か 改行の手前までを比較対象にするようにすればいい、ってことですかね。 やってみます。 452 名前：nobodyさん mailto:sage [2009/04/29(水) 18:30:42 ID:???] foreach( @index ){ &error( 'double_word', __LINE__ ) if $_ eq "$word\n"; } ちと頭悪いがsjisじゃなければこれで良くね？ 453 名前：447 mailto:sage [2009/04/29(水) 21:36:31 ID:???] 試行錯誤してますが、どうもうまくいかないです…。 foreach my $var ( @index ){ my $var == @index; my $var =~ s/\n//; &error( 'double_word', __LINE__ ) if my $var_ eq "$word\n"; } 変数作って一旦配列の単語をコピーし、\nを置換で削って比較、と思ったのですが 既存の単語が消えて、新しい単語に置き換わる、という結果になってしまいました。 （雨、宝物、てすと、の３つがあった時、新たにとんかちを追加すると直前のてすとがとんかちに変わる） >>452 ありがとうございます。試してみましたが、やはり重複登録できてしまいました。 454 名前：nobodyさん mailto:sage [2009/04/29(水) 22:42:25 ID:???] >>453 なんか構文が色々おかしいぞｗ foreach my $var ( @index ){ chomp($var); &error( 'double_word', __LINE__ ) if $var eq $word; } 455 名前：nobodyさん mailto:sage [2009/04/29(水) 22:46:53 ID:???] myの意味も知らんと色々やらかしちゃってるっぽいな 456 名前：447 mailto:sage [2009/04/29(水) 23:30:00 ID:???] >>454-455 ローカル変数にはmyつけるってperlのサイトに出てましたが…違うんですかorz >>454の方法を試すと あめ、山、海の順で登録すると海を追加した後に山が消え、あめがあ行の前に移動して 海があ行先頭にきてしまいました。 どうもchomp命令で改行外すと、索引ファイルが改行なしになって表示が狂うようです。 >>454のmy $varをやめてchomp( @index)としても同様の結果に。 改行を外すのではなく見ないようにする方がいいんでしょうか。（末尾無視するとか） 457 名前：nobodyさん mailto:sage [2009/04/30(木) 00:25:58 ID:???] >>456 うーん、思ったよりおまいさんのperl知識が乏し過ぎてちょと話がしにくいな。 判定方法は>>454のでいいはずだけど、他にもいじっちゃったでしょ。そこがたぶん全然合って無い。 頑張る気持ちは大切にしてあげたいけど、先にもう少しperlの勉強しないと厳しいかも。 急ぎなら丸投げおいで。 458 名前：447 mailto:sage [2009/04/30(木) 21:19:55 ID:???] 言うとおり、改造前に基本から勉強してきます。 付け焼刃の知識じゃどうにもなんないみたいだし…。 とはいえ自分で中身わかってないと、何かあっても対処できないし 急ぎでもないので丸投げ依頼も今はやめておきます。 ありがとうございます。 459 名前：nobodyさん mailto:sage [2009/05/11(月) 18:46:32 ID:???] CGIゲームの中で、javaスクリプトをつかうには、何が必要ですか？ 460 名前：nobodyさん mailto:sage [2009/05/11(月) 19:31:18 ID:???] 別に何も？ 461 名前：nobodyさん mailto:sage [2009/05/11(月) 20:50:00 ID:???] あえて言うならjavascriptが動作するブラウザ 462 名前：nobodyさん mailto:sage [2009/05/16(土) 15:01:23 ID:???] あれ、そうなんですか？ なんで動かないのだろう・・・？ 463 名前：nobodyさん [2009/05/21(木) 07:04:12 ID:5BoMPyL5] 【.　 CGI名 　.】　i-imageBBS v1.25 【配布先URL】　www.chama.ne.jp/index.htm 【. 置き場所 .】　www.chama.ne.jp/download/bbs/iimgbbs/index.htm 　　　　　　　　　　 【ヘルプ内容】　強制ID表示　２ちゃんねると同じトリップ利用可 まだ勉強し始めの超初心者です よろしくお願いします。 464 名前：nobodyさん mailto:sage [2009/05/21(木) 07:35:18 ID:???] いや、そこで終わられると丸投げも同然なんだがｗ どこまでやってどこでつっかえてるんだ？ 465 名前：643 mailto:sage [2009/05/21(木) 20:45:43 ID:???] 初めからさっぱりです。 参考になるようなサイトを紹介してもらえればと思ったのですが、丸投げスレの方が妥当なのでそちらに行ってみます。 466 名前：nobodyさん [2009/05/26(火) 00:43:47 ID:hNbwwEvZ] 【　 CGI名 　】　アクセスカウンター（01） 【配布先URL】　ttp://plus-code.net/cgi-flash-counter/accesscounter01/ 【ヘルプ内容】 このCGIは、flashでカウンターを表示しているのですが、 カウンターをクリックすると、配布URLのトップページに飛ぶようになっています。 flash(swf)自体にリンクが設定されているのですが、なんとかこれを無効にする 方法はないでしょうか？ リンクの無効が無理なら、リンクが同窓で開くため、最低限別窓で開くようにしたいです。 タグでa hrefのtargetを指定してもNGでした。 467 名前：nobodyさん mailto:sage [2009/05/26(火) 01:26:02 ID:???] >>466 swfに埋め込まれてる動作だから無理。 作者に要望出すしかない。っていうか本来そっちが先。 468 名前：nobodyさん mailto:sage [2009/06/05(金) 17:00:12 ID:???] 【.　 CGI名 　.】　Mail Carrier v1.0726　　　　　 【配布先URL】　現在配布先は閉鎖しているようです 【. 置き場所 .】　ttp://www.kent-web.com/pubc/book/test/uploader/uploader.cgi pass 3210 【ヘルプ内容】　このメールフォームcgiに日本語が含まれない場合の送信を防ぐ 機能を付けたいのですが、どうしても自分では無理です。 どうかよろしくお願いします。 469 名前：468 mailto:sage [2009/06/05(金) 17:12:47 ID:???] 失礼しました、置き場所のファイルNoは2087です。 470 名前：nobodyさん mailto:sage [2009/06/05(金) 17:21:31 ID:???] 一ヵ所どう見ても</form>で閉じてない糞スクリプトだなｗ 471 名前：470 mailto:sage [2009/06/05(金) 17:35:10 ID:???] 答えるにはこのＣＧＩに送信しているメールフォームの本文書く欄のtextareaのnameが判ったほうが やり易い 472 名前：468 mailto:sage [2009/06/05(金) 19:39:42 ID:???] <form action="./mcarrier.cgi" method="post" id="form"> <textarea name="message" cols="20" rows="5" ></textarea> <br> <input name="submit" type="submit" value=" 送 信 " id="sousin"/> </form> htmにはこのように記述しています >>470 自分でカスタマイズするうちにおかしくいじってしまったのかもしれません、 どこの部分を閉じていないかもわかっていないのですがご指摘ありがとうございます 473 名前：468 mailto:sage [2009/06/05(金) 19:43:34 ID:???] ttp://swanbay-web.hp.infoseek.co.jp/modify.html#JPN ここを参考にして if ($in{'comment'} !~ /(\x82[\x9F-\xF2])|(\x83[\x40-\x96])/) { &error("日本語を書いてください。"); } を付け加えようとしたのですが、日本語の文を投稿してもエラーになってしまいました。 根本的な所がわかっていないようです 474 名前：470 mailto:sage [2009/06/05(金) 20:06:16 ID:???] １５０行目に↓を加えると大丈夫だと思うけど>>473みたいに「かなカナ」以外の日本語でもエラーにしたいなら $in{'comment'}を$in{'message'}にすればいい。あと、荒らしに対してエラー文で"日本語を書いてください。"ってヒント与えるのはいただけない if ($in{'message'}!~/(?:[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]|[\xA1-\xDF]){2}/){ &error("Busy now!"); } 475 名前：nobodyさん mailto:sage [2009/06/05(金) 22:01:44 ID:???] >>474 回答ありがとうございます。 早速150行目に上記の文を書き加えると、思った通りの動作をしてくれました。 一日中考えて調べてわからなかったので本当に感謝です。 神様（∩´∀｀）∩ 476 名前：475 mailto:sage [2009/06/08(月) 19:03:02 ID:???] CGIのことをちゃんと勉強したいので初心者向けの書籍を探していますが 近所の書店には自分に合いそうなものがありません。 御薦めの本を知っている方いますか？ スレ違いすみません 477 名前：nobodyさん mailto:sage [2009/06/08(月) 21:02:02 ID:???] スレ違いってわかってんなら移動しようぜ・・・ 478 名前：476 mailto:sage [2009/06/09(火) 06:40:19 ID:???] >>477 移動します 479 名前：nobodyさん [2009/06/13(土) 16:33:54 ID:FybrAREw] 【.　 CGI名 　.】　プチ☆ボード 【配布先URL】　www.kent-web.com/ 【ヘルプ内容】　 sub add { &header; print <<"HTML"; <html> <body> <form method="post" action="./petit.cgi"> 名前：<input type="text" name="sname" size="20" maxlength="8"><br> <input type="submit" value="投稿する"> </form> </body> </html> HTML exit; } こんなサブルーチンを作る。 petit.cgi?mode=add で呼び出したフォームから、書き込みが出来るようにしたい。 投稿内容がメチャクチャ多くなる予定なので、別ページでフォームを作りたいのです。 480 名前：nobodyさん mailto:sage [2009/06/13(土) 17:07:25 ID:???] >479 プログラムにする必要すらなく、そのHTMLソースを丸ごとHTMLとして保存して設置すれば、とりあえず投稿はできるはず。 あとはCGIのほうからフォームを書き出してる箇所を削ってリンクでも置いておけばいい。 481 名前：nobodyさん mailto:sage [2009/06/13(土) 17:35:09 ID:???] ありがとうございます！目からウロコでした。 これをやって思い出したのですが、投稿項目を凄く(少なくとも30個以上)にしたいのです。 たとえば、初期状態だと ・お名前 ・Eメール ・タイトル ・コメント ・URL ですよね。 たとえば、これに新しく ・出身地 という項目を追加するとして、フォームを書きます。 name属性をsyussinとします。 これをスクリプトのどの辺にスカラー変数として追加したら出来るのか？がわからないのです。 どうやらログファイルに追加はできたようなのですが、掲示板上には表示がされていません。。。 482 名前：nobodyさん mailto:sage [2009/06/13(土) 18:11:47 ID:???] >>481 そういう用途には向かないCGIだね。 WEBフォームとかアンケートで別なもの探したほうがいい。 483 名前：nobodyさん [2009/06/13(土) 18:20:46 ID:FybrAREw] 失礼しました、これだけではわかりませんよね。 オリジナルでは364行目の ($no,$reno,$date,$name,$mail,$sub,$comment,$url,$host,$pw,$color) を、〜$color,$syussin) と追加。 397行目の print "<blockquote><font color=\"$color\">$comment</font></blockquote>\n"; を、〜$comment,$syussin</font></blockquote>\n"; と追加。 517行目の unshift(@new,"$no<><>$date<>$in{'name'}<>$in{'email'}<>$in{'sub'}<>$in{'comment'}<>$in{'url'}<>$host<>$ango<>$in{'color'}<>$in{'icon'}<>\n"); を、〜$in{'comment'}<>$in{'syussin'}<>〜 と追加しています。 私の頭以外ではどこが抜けているのでしょうか？ 484 名前：nobodyさん mailto:sage [2009/06/13(土) 18:23:37 ID:???] >>482 すみません、あくまでも例えでして。 アンケートではなくて、レスのできる掲示板で作る必要があるのです。 昔はとあるゲストブックで項目を追加したりしていたので、簡単にできるかな？と思ったのですが、難しいですね。 485 名前：nobodyさん mailto:sage [2009/06/13(土) 18:31:26 ID:???] >>483 考え方はそれで合ってるし、実際いま俺がやってみてもそれで普通に表示されてる。 本当にログファイルに追加できてる？ 「どうやら」とかじゃなくてちゃんと確かめた？ 486 名前：nobodyさん mailto:sage [2009/06/13(土) 19:02:09 ID:???] >>485 たびたびすみません。 ログファイルを覗くと、出身地に入れたはずの「地球」が残っているので、 ログへの書き込みはできていると判断しています。 しかし、コメントのすぐ右に表示されるはずの「地球」の文字はないです。 www1.axfc.net/uploader/Sc/so/8786.zip せっかくなので、うｐってみました。 どこを間違えているのでしょうか？ 487 名前：nobodyさん mailto:sage [2009/06/13(土) 19:19:11 ID:???] 君が書いた517行目の順番と364行目の項目の順番をよーく見てごらん 488 名前：nobodyさん mailto:sage [2009/06/13(土) 19:31:38 ID:???] ・・・理解しました。(恥 一回吊ってから目的のスクリプト作成にむけてがんばります！ ありがとうございました！ 489 名前：nobodyさん [2009/06/18(木) 03:54:24 ID:O7fG+jDb] 【.　 CGI名 　.】　Hello-UP　　　 【配布先URL】　idol.nm.land.to/ 【ヘルプ内容】　アップロードフォームの編集&削除パスをクッキーで記憶させたい どうぞよろしくお願いします<m(__)m> 490 名前：nobodyさん mailto:sage [2009/06/18(木) 06:43:06 ID:???] >>489 どこまでできてて、どこでつまづいてるのさ？ 491 名前：489 mailto:sage [2009/06/18(木) 14:13:06 ID:???] クッキー関係は全く分かりません 492 名前：nobodyさん mailto:sage [2009/06/18(木) 15:28:25 ID:???] じゃ基礎から学べよ 493 名前：489 mailto:sage [2009/06/18(木) 16:05:19 ID:???] 分からないのでここで質問しています。 分かる方いらっしゃいましたらどうぞよろしくお願いします<m(__)m> 494 名前：nobodyさん mailto:sage [2009/06/18(木) 16:21:56 ID:???] 丸投げなら丸投げスレでやれ 495 名前：nobodyさん mailto:sage [2009/06/18(木) 17:11:51 ID:???] とりあえず１７行目に↓を追加すれば記憶できると思うが setcookie("pass", $_POST['pass'], time()+60*60*24*30 ); setcookie("downpass", $_POST['downpass'], time()+60*60*24*30 ); 496 名前：489 mailto:sage [2009/06/19(金) 05:38:58 ID:???] >>495 できました！！ありがとう！！！ 497 名前：ぶぅ子 ◆0cRRT9dSGg [2009/08/16(日) 01:42:29 ID:M5z+7f3F] こんばんは。 【スクリプト改造依頼スレ】（丸投げ）part7再々で投稿したら、 こちらへ誘導されたので投稿します。 よろしくお願いします。 【 CGI&PHP名 】 余裕派掲示板ver2.62 【 配布先URL 】 cgipon.specters.net/ 【 ヘルプ内容 】 WAP2.0対応にしたいです。 お世話になっているお店のサイトの掲示板で運用されているのですが、 配布されている状態のままだと、auの携帯からの表示、投稿が出来ません。 実際にサイトを作成した人は消息不明で困っている店主さんから相談を受けました。 現状はgoogleなどで検索をし、 USER_AGENTの記述を変更すれば良いのかと認識していたのですが、 やっぱりこれだけでは足りないのでしょうか？ 例えば[yoyuuha.cgi]を開き、 $mob{car} = 'UP.BROWSER'; の部分を $mob{car} =~ m/^KDDI/ に変更という具合に。 本を読んだり、ネット検索などをしていますが自分の理解が追いつかない状態です。 すみませんがよろしくお願いします。 498 名前：nobodyさん mailto:sage [2009/08/16(日) 02:24:46 ID:???] で、それでダメだったの？ 流石に他人のためにパケ代使って確認する気にはなれないぜ？ 499 名前：nobodyさん mailto:sage [2009/08/16(日) 02:34:24 ID:???] >>497 というかできないならできないってちゃんと言った方が良いんじゃないのか？ 今後ことあるごとに頼まれるパターンだぞそれ。その度にここ来るのかよ。 500 名前：ぶぅ子 ◆0cRRT9dSGg [2009/08/16(日) 22:44:37 ID:M5z+7f3F] こんばんは。 >498 失礼しました。肝心の結果ですが、497に書いた内容を試した所、 auの携帯（W63K）では既に投稿されている内容の閲覧だけは 出来るようになってます。 でも、他キャリアの携帯でアクセスした時のように 投稿フォームやボタンなどの表示は無く、ただテキスト表示のみです。 >499 相談を受けた段階では、出来るor出来ないの即答はしませんでした。 本やネットで調べて出来そうなら試してみます、という返答のみです。 今回の相談内容だと有料でプロの方にお願いするような内容となるのでしょうか？ 他のスクリプトへ変更するように提案した方が良いのかなぁ。 501 名前：nobodyさん mailto:sage [2009/08/17(月) 07:01:39 ID:???] >>500 プロに依頼するレベルかどうかはともかく、あんたが出来ないんだから まずはその事を伝えるべきだろう。 他の物に変えるか、金払って対応するかどうかを決めるのはその店主とやらの仕事。 502 名前：nobodyさん mailto:sage [2009/09/18(金) 21:50:14 ID:???] どなたかご教授下されば幸いです。 get-flash-videos -Google Code code.google.com/p/get-flash-videos/ 数々の動画サイトからコマンドラインで動画を取得するツールなのですが、 ニコニコ動画にてダウンロードするファイルが恐らくswfだった場合、下記エラーメッセージが表示されダウンロードに失敗します。 -------------------------- Using method 'nicovideo' for www.nicovideo.jp/watch/nm7382869 Error: No ID found Couldn't extract Flash movie URL. This site may need specific support adding,or fixing. -------------------------- Perlが大好きで勉強しつつ、swf対応にしようと書き換えているのですが上手く行きませんorz どなたかswf対応に書き換えた後のdiff結果を頂けないでしょうか… よろしくお願い致します。 503 名前：nobodyさん mailto:sage [2009/09/18(金) 21:54:18 ID:???] >>502 板違い 504 名前：nobodyさん mailto:sage [2009/09/19(土) 00:47:27 ID:???] 大好きだったら自分で調べろよと 505 名前：nobodyさん mailto:sage [2009/09/24(木) 20:19:04 ID:???] >>504 大好きです＞＜ 506 名前：nobodyさん mailto:sage [2009/09/25(金) 12:17:24 ID:???] >>504 僕も大好きです＞＜ 507 名前：nobodyさん mailto:sage [2009/09/26(土) 14:29:57 ID:???] >>504 浮気者！絶対別れないからっ！ 508 名前：nobodyさん mailto:sage [2009/09/27(日) 13:11:10 ID:???] >>502 もう見てないかもしれんし, 板違いかもしれんけど, ソース見るついでに 弄ったら一応落ちてきたので, せっかくだから貼っておきます. indent の空白が全角になるかもしれんから, 適当に手パッチした方が無難かも. 1番目のは smXXX 以外を弾く仕様になってたので, nmXXX も許すようにしただけ. 2番目のは問答無用で suffix が flv になるのようなので, 動画形式に合わせた suffix にするようにした. なくても nmXXX は落ちてくる. 3番目のは取得したデータが動画かどうかチェックするルーチンが swf に 対応してないようなので対応させた. 先頭 3bytes が "CWS" らしいが,  いい加減に調べただけなので, なんかあっても知らんがな. 509 名前：508 mailto:sage [2009/09/27(日) 13:13:22 ID:???] --- get_flash_videos-1.15.orig　2009-09-27 11:48:37.000000000 +0900 +++ get_flash_videos-1.15　 2009-09-27 13:12:42.000000000 +0900 @@ -2010,7 +2010,7 @@ use URI::Escape;    sub find_video { 　 my ($self, $browser, $embed_url) = @_; -　my $id = ($embed_url =~ /(sm\d+)/)[0]; +　my $id = ($embed_url =~ /([sn]m\d+)/)[0]; 　 die "No ID found\n" unless $id;   　 my $base = "ext.nicovideo.jp/thumb_watch/$id"; @@ -2029,7 +2029,9 @@ sub find_video { 　 $browser->get($base . "/$playkey"); 　 my $url = uri_unescape(($browser->content =~ /url=([^&]+)/)[0]);   -　return $url, title_to_filename($title); +　$url =~ m{/smile\?(.)=} or die; +　my $type = { qw( v flv m mp4 s swf ) }->{$1} or die; +　return $url, title_to_filename($title, $type);  }    1; @@ -3318,6 +3320,9 @@ sub check_magic { 　 # Other QuickTime 　 } elsif(substr($data, 4, 4) eq 'moov' || substr($data, 4, 4) eq 'mdat') { 　　 return 1; +　# SWF +　} elsif(substr($data, 0, 3) eq 'CWS') { +　　return 1; 　 }   　 return 0; 510 名前：502 mailto:sage [2009/09/27(日) 17:37:37 ID:???] >>508>>509 ありがとうございます！ 実は毎日見てたよこのスレ… ずっと色々試してたけど上手く行かなかった… 助かりました。本当にありがとう！ 511 名前：nobodyさん mailto:sage [2009/09/30(水) 22:50:07 ID:???] 【.　 CGI名 　.】　nicky.cgi 【配布先URL】　www.din.or.jp/~raelian/ReadMeNicky.html 【 ヘルプ内容 】　 コメントに、スパム　フィルターがついているみたいなんですが、 オフにしたいのですけど、どうしたらいいでしょうか？ 一人で日記に使うので、誰か他の人が書き込むことはないので。 よろしくお願いします。 512 名前：nobodyさん mailto:sage [2009/10/07(水) 09:41:18 ID:???] >>511 スパムフィルタっつーか「日本語が入ってないとスパム扱い」の処理なら入ってるけどそれのこと？ だったら2717行目をコメントアウト。 513 名前：nobodyさん mailto:sage [2009/10/09(金) 07:07:29 ID:???] スクリプトを自動で全部作ってくれるスクリプトってある？ 514 名前：nobodyさん mailto:sage [2009/10/09(金) 11:24:14 ID:???] あるよ 515 名前：CUCYMNzIrxbzJeUL mailto:pjm4d3dkk7.@gmail.com [2009/10/22(木) 23:25:26 ID:???] And this is the only construction which is consonant with the manifest intention of the grant and with the rule of interpreting such grants as laid down by the foremost publicists and jurists. , 516 名前：dLYuGbiTKgcOt mailto:6l8b8n21.@gmail.com [2009/10/23(金) 21:29:22 ID:???] A parent w 4 kids, one special needs baby, and unwed teen w an infant should probably have her hands full with her brood. , 517 名前：nobodyさん mailto:sage [2009/10/24(土) 22:30:25 ID:???] 【.　 CGI名 　.】　Dojin-OrderDX - Version 6.91 【配布先URL】　www.gnbnet.com/cgi/?mode=dojin 【ヘルプ内容】 在庫が一定以下で販売中というアイコンを残部少のアイコンに、 また、在庫が0になったら完売のアイコンという風に自動変更できるようにしたいです。 一つ前のバージョンでは www.gnbnet.com/bbs/index.cgi?mode=view&seq=521 のようにアイコンを自動変更するようにできるみたいなんですが、 最新のVersion 6.91で試したところ、できませんでした。 どうかよろしくお願いします。 518 名前：nobodyさん mailto:sage [2009/11/03(火) 17:26:39 ID:???] それは作者へバグ報告するべきもんじゃないのか 519 名前：nobodyさん mailto:sage [2009/11/05(木) 12:38:44 ID:???] 【.　 CGI名 　.】　CSS Yomi-Search（Yomi-Search改造版） ver 2.01 　　　　　　　　　　（テンプレは配布先のサンプル版と同じ「city」です） 【配布先URL】　　　://www.w-art.org/　　　　　　 　　　　　　　 【ヘルプ内容】　　　index頁の右側に表示されるカテゴリ＞サブカテゴリ一覧部分で 　　　　　　　　　　　サブカテゴリを横２列から横３列表示にしたいです。 　　　　　　　　　　　（cssのほうは横３列表示が可能なサイズに変更済み） 　 製作者の方にメルフォから問い合わせたのですが いつになっても返事を貰えずに困り果ててます・・・・・。 よろしくお願いします。 あと。よければこれで間違ってないかチェックしていただきたいのですが。 top.htmlの右側、カテゴリの上に通常表示される 「マーク＞おすすめサイト・相互リンクサイト」がいらなかったので top.htmlのソースの６３行目を 　 local($i=0,$Gno,$gane_flag,$st_flag=0,$bf_kt_no,$gane_NOT,%gNot,$gn_list,$Ncb,$mk); 　　　　　　↓ 　 local($i=0,$Gno,$gane_flag,$st_flag=0,$bf_kt_no,$gane_NOT,%gNot,$gn_list,$Ncb);　 　 上記から下のように改変、本来６４行目から７３行目にあるソースを削除しました。 今のところ希望通り「マーク＞〜」の表示がtopから消え、不具合もないのですが スクリプト改造として、これで間違ってないですか？ 520 名前：nobodyさん mailto:sage [2009/11/06(金) 12:50:52 ID:???] >>519 そら「カスタマイズの問い合わせするな」という所に改造の問い合わせしたんだから 返事こなくて当たり前だろ。作者さんのせいにするもんじゃないよ。 521 名前：nobodyさん mailto:sage [2009/11/06(金) 14:28:03 ID:???] >>520 修正前のver２．０だと、top.htrml頁のソースの一番上に --------------------------------------------　 #↓設定↓ #カテゴリ・テーブル横のセル数 $table = '2'; #サブカテゴリを横に並べる数 $subcat = '2'; #↑ここまで↑ -------------------------------------------- と書いてあったんです。 なので値をどちらも'3'に変えたんですが、表示は相変わらず２列だったので 製作者へ問い合わせたら しばらくして、top.htrmlなどを修正したver２．０1の配布がはじまり 上記の設定項目が削られてしまってたんですけど・・・・。 あと、記憶違いでなければ 私が問いあわせたときに、あの注意書きはなかったと思うんです。 ・・・・・・・・私のせいだろうな、注意書き足されたの。 猛省してきます。 522 名前：nobodyさん mailto:sage [2009/11/06(金) 21:30:04 ID:???] >>521 どんだけ失礼なメールしたんだお前ｗ 523 名前：nobodyさん mailto:sage [2009/11/12(木) 08:59:59 ID:???] 【.　 CGI名 　.】toshinariPerlパージョン 【配布先URL】cgi.toshinari.net/wiki.cgi 【ヘルプ内容】 IEでは名前を打ち込んだ場合、ちゃんと記憶されて入力された状態なのですが firefox等では名前を入力しても記憶されません。 これをfirefoxでも入力された状態になるように改造の方をお願いします。 524 名前：nobodyさん mailto:sage [2009/11/12(木) 15:01:07 ID:???] cookie保存しない設定になってんじゃないの？ 525 名前：nobodyさん mailto:sage [2009/11/12(木) 17:17:48 ID:???] >>524 google等ではちゃんとクッキー情報が保存されてるので、それはないかと思います。 526 名前：nobodyさん mailto:sage [2009/11/12(木) 17:30:38 ID:???] サポート掲示板で聞いてみたら？ 527 名前：nobodyさん mailto:sage [2009/11/12(木) 17:34:29 ID:???] >>526 サポート掲示板は過疎なので・・・ 聞いても誰も答えてくれないかと思いここに来ました。 528 名前：nobodyさん mailto:sage [2009/11/12(木) 17:38:22 ID:???] cookies.sqliteを削除すると直るらしいよ 529 名前：nobodyさん mailto:sage [2009/11/12(木) 17:43:21 ID:???] >>528 FireFoxというのは例で上げています。 operaでも同じ現象です。 ブラウザが悪いとは思えません。 どうやらクッキーはちゃんと取得してるようですが、ちゃんと名前欄に表示されないみたいです。 530 名前：nobodyさん mailto:sage [2009/11/12(木) 18:50:30 ID:???] クッキーがちゃんと書き込まれて、取得もできてるなら、 スクリプト側の問題ではないんでない？名前を代入してHTMLを返してるだけなんだから 531 名前：nobodyさん mailto:sage [2009/11/12(木) 18:53:37 ID:???] >>530 けど名前欄には表示されないんですよね・・・ IEではちゃんと表示されるんですが・・・ 532 名前：nobodyさん mailto:sage [2009/11/12(木) 19:07:19 ID:???] じゃちょっとこっちでも試してみるよ 533 名前：nobodyさん mailto:sage [2009/11/12(木) 20:23:28 ID:???] >>532 お願いします。 534 名前：nobodyさん mailto:sage [2009/11/12(木) 20:41:41 ID:???] 分かったぞい bbs.cgiのSetCookieサブルーチン内のクッキー発行文の、path=/の後にセミコロンを付ければおｋ ちなみに2つ発行してる意味は分からん 535 名前：nobodyさん mailto:sage [2009/11/12(木) 20:50:57 ID:???] >>534 おぉ！ありがとうございます。 ちゃんと表示されるようになりました！ ですが日本語名だと文字化けしますね；； エンコードに問題があるのかな・・・ 536 名前：nobodyさん mailto:sage [2009/11/12(木) 21:51:51 ID:???] javahiyori.bake-neko.net/idea/js/encodecookie.html escapeかけるといいらしい 537 名前：nobodyさん mailto:sage [2009/11/14(土) 21:59:33 ID:???] >>536 自分なりにググったりして調べてやってみましたができませんでした；； bbs.cgiのクッキー発行の部分にescapeをかけて、makeindex.plのクッキーを読み込むところにunescapeを使うんですよね・・・ 538 名前：nobodyさん mailto:sage [2009/11/16(月) 11:35:54 ID:???] アクセスして表示されるのは makeindex.plで生成されて当該ディレクトリに置かれるindex.htmlってことはおｋ？ 539 名前：nobodyさん mailto:sage [2009/11/16(月) 17:50:42 ID:???] >>538 それは把握してます。 540 名前：わ mailto:info@merutomo55.net [2009/11/26(木) 17:55:54 ID:???] 募集掲示板 よろしくお願いします。無料です。　pokpok.org/

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef