★三 【 スクリプト改造工房 PART 9 】 ★三
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
2006/03/32(土) 04:52:20ID:WJnup8Dd# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
0102nobodyさん
2006/09/27(水) 12:38:13ID:KyNAJ/4/0103nobodyさん
2006/09/28(木) 08:31:41ID:???>カレンダーを横一列で表示させたい。
この位の書き換えが解らないなら丸投げ向き。
再配布禁止。修正物も配布禁止になっているので回答は得られにくいよ。
0104101
2006/09/28(木) 12:05:02ID:???そして間違ってカキコした旨書けなくてすんません。
カレンダーの横一列、頑張ってなんとかしてみます。
今日の日付は保留で…とにかくありがとうございました。
0105nobodyさん
2006/10/08(日) 14:26:54ID:???【配布先】 http://guron.net/
【置き場所】 http://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 に変更
恐らく間抜けなことをしているのだと思いますが、よろしければご指摘下さい。
0106nobodyさん
2006/10/08(日) 16:56:48ID:???0108105
2006/10/08(日) 21:25:50ID:???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】です。
コピペしてそのまま書き込んでしまいました。
0109nobodyさん
2006/10/08(日) 21:42:36ID:???0110105
2006/10/08(日) 21:59:29ID:???特に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"
0111nobodyさん
2006/10/09(月) 01:37:59ID:???0112aoki
2006/10/21(土) 12:31:47ID:Z1KRvl//配布場所■http://www.kent-web.com/chat/index.html
改造内容■同じくKENT WEBさんのWindyのように、YY-CHATをノーフレーム式（アイコン有）で表示したいのです。
YY-CHATの機能をそのまま使いたいので、YY-CHATを改造して、フレーム形式をノーフレーム形式に変換希望。
Windy、YY-CHATのソースを見比べてみたのですが、フレーム式からノーフレーム式への転換がやはり分かりません。
どなたかご存知の方、ご指摘いただければ幸いです。
0113nobodyさん
2006/10/21(土) 18:26:33ID:???0114aoki
2006/10/21(土) 20:15:32ID:Z1KRvl//すぐにお返事が頂け、嬉しいです。宜しければご指導お願い致します。
0115aoki
2006/10/21(土) 20:18:20ID:Z1KRvl//よく、携帯用のチャットは手動ですので大丈夫です。
0116nobodyさん
2006/10/23(月) 02:38:52ID:oT4S3DMg【配布先URL】 http://www.gnbnet.com/
【. 置き場所 .】 http://www.gnbnet.com/cgi/?mode=mail
【ヘルプ内容】
ttp://www.gnbnet.com/bbs/index.cgi?mode=view&seq=391
↑の人と同じことを思ったので質問させて下さい。
________________________________________________
拍手ボタンを押す→最初の画面が出る→後の画面はランダムに表示
という表示は可能でしょうか？
一番最初の画面だけ固定して、その後の画面をランダムにしたいのですが…
宜しくお願いします。
________________________________________________
の書き込みに、制作者は
________________________________________________
申し訳ありませんが、こういった要望に対応しているとキリがなくなりますので、
ご自分で改造などして対処してくださるようお願いします。
________________________________________________
と言っているのですが、どう改造すれば良いのかわかりません。
どうぞ宜しくお願いします。
0118nobodyさん
2006/10/24(火) 04:33:25ID:???echo "Hello World";
?>
これをWeb2.0風に改造してください。
0119nobodyさん
2006/10/24(火) 07:03:03ID:???0120nobodyさん
2006/10/24(火) 14:21:29ID:???【. CGI名 .】 Revision 1.80 （perlのBBS）
【配布先URL】 ttp://revision.s22.xrea.com/
【. 置き場所 .】 ttp://revision.s22.xrea.com/dlpage.htm
【ヘルプ内容】 一定数以上の投稿があると、古いログから削除されていくところを、
別のファイルに書き出して保存できるようにしたい。（過去ログ機能の実装）
以上、よろしくお願いします。
0121nobodyさん
2006/10/24(火) 14:56:57ID:???それも理解できない丸投げ野郎はもう死んでいいよ。スレ違いを指摘するのもかったるい。
0122aoki
2006/10/24(火) 17:44:33ID:QIrlktk5>>112の追記です。
自分なりにWindyより、見よう見まねでYY-CHATと引っ付けた、という感じとなってしまいました。このままでは無理だとは思いますが、どのように変更して良いかがわかりません。
基本設定以降が
ttp://www.geocities.jp/aokiaoki_332/yychat.html
です。
YY-CHATをWindyのように、ノーフレーム版（アイコン有り）で表示したいのです。
「Script Error」と表示されてしまいますので、宜しければご存知の方、ご指摘の程、お願いいたします。
0123nobodyさん
2006/10/24(火) 20:07:51ID:???0124aoki
2006/10/24(火) 23:35:55ID:QIrlktk5ttp://www.geocities.jp/aokiaoki_332/chat.html
この状態です。本体や入り口が表示されずに、著作権部分だけ表示されました。
0125nobodyさん
2006/10/24(火) 23:44:49ID:???つかWindyにアイコン表示つけたほうが速くないか？
yychatをノンフレームに改造するのは相当大変だぞ
0126nobodyさん
2006/10/24(火) 23:53:42ID:???それは分かったからとっととエラーメッセージの詳細を出せやコラ。
まさかろくに動きもしない駄目スクリプトをローカルでチェックもせずにアップしてるのか？
0127aoki
2006/10/25(水) 00:23:46ID:SpiYIrSU早速のお返事ありがとうございました。
メイン処理部分の部分を一部変更して転送し直したところ、エラーメッセージは出ずに著作権部分しか表示されなくなっていました。
やはりWindyの方につけた方が良いのですね。助言ありがとうございました。
自分の知識不足ですので、また出直してまいります。
レス下さった方、本当にありがとうございました。
0128118
2006/10/25(水) 00:26:03ID:???0129nobodyさん
2006/11/03(金) 18:19:09ID:???【配布先】ttp://www.cp-2icro.com/dlpage/info_coll/urlget/
【内容】
このCGIが気に入っているのでアクセス解析として使いたいのですが
リンク元に「その他・ブックマークなど」の項目を追加することはできないでしょうか？
0130nobodyさん
2006/11/03(金) 18:31:35ID:???0131nobodyさん
2006/11/03(金) 21:29:16ID:???【配布先URL】 http://cgi-lounge.eek.jp/
【ヘルプ内容】
先月未明からi-パラダイス（http://www.i-paradise.nu/）に設置してある、
サイト内コンテンツの一つであるアップローダーの記事投稿が不可能な状態です
PostModeでの記事投稿前の認証を試みますが、
パスワードを入力し認証ボタンを押した次の瞬間空白のページに（ソースを見たところ無記述）移動してしまい、
ファイルのアップロード自体が出来ず、
PostMode以外での投稿はファイルがアップロードされる直前に先述したページが表示され、
ファイルのアップロードが無効になってしまうという状態です
Check Modeでのcgiの動作確認も試しましたが、各種パーミッション設定・各種パス等には異常は見受けられませんでした
また、この事象と併発するかのように、以前は見られなかった携帯閲覧時の502エラーも見受けられます
試しに他のレンタルサーバーのアカウントを取得し、上記cgiの設置・動作確認を試みてみたところ、
特に問題なくPostModeでのログイン・ファイルのアップロード、通常のファイルアップロードが出来ました
0132131
2006/11/03(金) 21:30:51ID:???管理元にその旨問い合わせを行ったところ、
＞おそらく記事投稿前の認証時の不都合は広告挿入が邪魔をしていると
＞思われますので、その処理の部分に<!--banner-->を挿入して
＞広告の位置を変更してください。
＞<!--banner-->はHTMLの部分に記述しなければ有効になりませんので、
＞CGIの処理の流れを見て頂く必要が御座います。
＞目安として該当の認証を押した後の<BODY>が記述される直後か、
＞更にいくつか下に設定されると良いと思います。
とのことでした
＞その処理の部分に<!--banner-->を挿入 の部分の処理の手順が分からなく、今回質問を書き込んだ次第です
お願いします
0133nobodyさん
2006/11/04(土) 01:02:40ID:???0134nobodyさん
2006/11/07(火) 16:18:05ID:???【配布先URL】http://popup.tok2.com/home/skry/labo/multiq/
【ヘルプ内容】コメント欄の書き込みへの禁止ワードを設定したい。
配布先の更新がなく、公式のサポート掲示板
http://popup.tok2.com/home/skry/labo/support/nabla.cgi
が死んでしまっているようなので、よろしくお願いいたします。
0135nobodyさん
2006/11/07(火) 17:15:31ID:5wPSAWJ0【配布先URL】 ttp://www.kent-web.com/index.html
【. 置き場所 .】 ttp://www.kent-web.com/bbs/patio.html
【ヘルプ内容】 アイコン機能を付けたい。
わがままを言えば昇進機能も付けたい。
どうか宜しくお願いします<(_ _)>
0139nobodyさん
2006/11/10(金) 03:57:38ID:l5C4yy5g【配布先URL】 ttp://www2s.biglobe.ne.jp/~cru/library/lq/
【設置サーバ】 独自ドメイン
【 質問内容 】 ググったら丸投げや>>451を見つけました。
だが、書かれてるやり方ではCGIごとではなくサイト丸々全部を管理は出来るが、
自分のログを除外出来ないようです。
自分を除外するにはどこをいじればいいのでしょうか？
0140nobodyさん
2006/11/10(金) 04:11:11ID:+7tgrk2T0141nobodyさん
2006/11/13(月) 20:51:31ID:???0142nobodyさん
2006/11/14(火) 20:12:31ID:Zhg0+JNh【配布先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>');
--ここまで
今は上の行と下の行が逆に出力されている。
0143nobodyさん
2006/11/14(火) 20:16:50ID:???ように考えてみたのだが・・・ログがぐちゃぐちゃになった。
次にJSへ出力する時に順を変えてみようとしたのだが・・・
「JSファイルに書き込みを〜回まで繰り返す」という処理になっていたので
出力する段階の配列をソートってわけに行かなかった。
0145nobodyさん
2006/11/14(火) 20:40:37ID:???置き場所つーのは『お前が』置いた場所だと何度言えばもうね。
…で、あんまちゃんと見てないけど、
外部JavaScriptへの出力ってkd_diary.cgiの800行目くらいからある部分のことかな。
だとしたら852行目の
print JS "document.write(\'$w_line\');\n";
で直接書き出す代わりに適当な配列に格納して、855行目の
close(JS);
の手前でまとめて吐き出せば良いんじゃないかな。
配列に格納する時に先頭にねじ込めば順番は逆になると思うが。
0147nobodyさん
2006/11/14(火) 23:17:33ID:???0148142
2006/11/15(水) 00:31:18ID:???0149nobodyさん
2006/11/25(土) 22:53:31ID:ocCKf8uF【配布先URL】 ttp://www.rescue.ne.jp/cgi/database/
【ヘルプ内容】 検索ワードのログを保存したいです（例：log.txt）
どのようにすればよいのかアドバイスお願いします。
0150nobodyさん
2006/11/26(日) 12:42:51ID:Y4Eo2nyo【配布先URL】 http://www.cj-c.com/ （必須）
【. 置き場所 .】 http://www.cj-c.com/cgi_s/ibbs2001.htm （任意）
【ヘルプ内容】
・連続投稿規制をつけたいのですが
どのようにすればいいかわかりません。アドバイスお願いします。
・トピック表示のときにレスしたあとに飛ぶページが掲示板のトップページなので
レスしたあと飛ぶページをレスしたスレッドのページに飛ぶようにしたいのです。
アドバイスお願いします。
0152150
2006/11/26(日) 19:19:57ID:tkb0DDKs説明不足でした。>>151さんすいません。
秒数で連続投稿規制をつけたいのです。
一回投稿したら、10秒は投稿できないようなものです。
よろしくお願いします。
0153nobodyさん
2006/11/26(日) 21:17:21ID:???0154150
2006/11/26(日) 21:53:46ID:tkb0DDKsそれってなにか違反になったりしませんよね？
0155nobodyさん
2006/11/27(月) 08:02:30ID:???0156150
2006/11/27(月) 16:00:15ID:kaXmljFh0157nobodyさん
2006/11/27(月) 16:14:05ID:???大人しく自分で処理を考えるべきだと思うよ。死ぬほど簡単だし。
実際に動作するサンプルだってそこら中にあるでしょ。
0158150
2006/11/27(月) 16:19:00ID:kaXmljFhどうもありがとうございます。
0159nobodyさん
2006/11/28(火) 16:35:21ID:???01601/2
2006/11/29(水) 22:10:10ID:???メッセージを送るためのフォームです。
これによって出力される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>
01612/2
2006/11/29(水) 22:10:46ID:???<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の知識はまったくないので、このへんをどのようにすればよいのかわかりません。
あと一歩でなんとかなりそうなので、
どなたかお力を貸していただけるとうれしいです。
0162nobodyさん
2006/11/29(水) 22:23:36ID:???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>
0163nobodyさん
2006/11/29(水) 22:57:56ID:???$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>";
にしてみそ。
0164160
2006/11/29(水) 23:43:59ID:???どうもありがとうございます。
最初に謝らなければなりません。
>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"にチェックしなかったときは希望通りになりました。
せっかく考えていただいてたいへん申し訳ないのですが、
必要な情報をすべて書かなかった私の失敗です。申し訳ございません。
0165160
2006/11/29(水) 23:53:49ID:???「</dt>」が入らなければよいのですが、そのような方法はありますか？
name="com"の内容を「○○」、name="sub1"の内容を「○○」などと、
各nameごとにHTMLのタグを書ければ都合がよいのですが、
元のソースがそういう仕様ではないようなので惜しいです。
もし不可能であれば、「返信不要」のチェックを使用することはあきらめて、
>163さんが書いてくださったものをそのまま使用したいと思います。
あと、>164で『、「返信不要」のオプション（name="sub2"）』と書いてしまいましたが、
正しくは、「返信不要」がname="sub1"で、メッセージがname="sub2"でした。
CGIの仕様で、もともとはメッセージをname="com"として送信するしくみになっているので、
そのへんの順番をいじったため、まぎらわしい文章になってしまいました。
0166nobodyさん
2006/11/30(木) 00:38:52ID:???$QUERY{'com'} .= "<dt>$QUERY{'com'}<\/dt>\n";
でループの中に
$QUERY{'com'} .= "<dd>$QUERY{$wk}<\/dd>\n";
でループの後に
$msg = "<dl>\n$QUERY{'com'}\n<\/dl>";
でどうよ。
0167160
2006/11/30(木) 01:25:36ID:???現在のソースもオリジナルと行番号が同じになっているので、
オリジナル版のソースの行番号を合わせて書きます。
>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>も同様に、何度も出力されてしまいました。
0168nobodyさん
2006/11/30(木) 01:48:17ID:???ループはそこのwhileだっての。
0169160
2006/12/01(金) 13:53:05ID:???どうもありがとうございます。助かりました。
Proxomitronでグローバル変数の使い方を習っていたので、
それを応用することでとりあえず解決しました。
if($bk_ck == 0){（line65）の中に
$QUERY{'total'} .= "<dt>$QUERY{'com'}<\/dt>"; を挿入し、
その後の$QUERY{'com'}をすべて$QUERY{'total'}に書き換えることで解決しました。
これで問題なければよいのですが…。
0170150
2006/12/03(日) 14:24:33ID:MG/kBdop【配布先URL】 http://www.cj-c.com/ （必須）
【. 置き場所 .】 http://www.cj-c.com/cgi_s/ibbs2001.htm （任意）
【ヘルプ内容】 連続投稿15秒規制機能をつけたいのですが
if(現在の時間 - 最終投稿時間 < 10秒)er{エラー10秒待ってください}
if ($date - $Date{$_} < 15){&er_("<br>連続投稿は禁止です。");}
このようにしたのですが
無理のようです。
わかるかたいたらアドバイスお願いします。
0171nobodyさん
2006/12/03(日) 15:16:25ID:???あとエラー出てるならエラー文書けや
0172170
2006/12/03(日) 18:22:28ID:Ga649VF2それはぼくにいってるんですかね？
10秒規制を付けたいんですが
いつ投稿しても「連続投稿は禁止です。」とでます。
0173nobodyさん
2006/12/03(日) 18:33:18ID:???そんな部分的な変更点（しかも文法がおかしい）だけ見せられてもな
おまえ自身よくわかってなさそうだし、現時点でのソースどこかにupして晒せ
0174170
2006/12/03(日) 19:23:11ID:Ga649VF2こんな感じです。
0175nobodyさん
2006/12/03(日) 19:54:33ID:???0176170
2006/12/03(日) 20:20:18ID:Ga649VF20177nobodyさん
2006/12/03(日) 21:31:55ID:???0178nobodyさん
2006/12/09(土) 20:08:53ID:???【. 置き場所 .】 http://wws.cside.com/cgi-plant/
【ヘルプ内容】
改造するのはkd_diary.cgiです。
1ページの表示と過去ログへの移行を、設定した件数ごとではなく
月ごとにしたい。
しかし・・・私の改造では、翌月の投稿をしても動作しませんでした。
※ちょうど年も変わりますしね。
やってみたのは、このCGI内の
##########################################
# ログデータ書きこみ
##########################################
の部分。
0179178
2006/12/09(土) 20:10:20ID:???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])が削除できませんでした");
}
}
0180178
2006/12/09(土) 20:45:46ID:???($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'){
0181178
2006/12/09(土) 20:46:16ID:???$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);
}
#ここまで
0182178
2006/12/09(土) 20:49:38ID:???>>180＋>>181に変えた、ということです。
エラーなどはないのですが、
月が変わったことによる現行ページの更新ができないまま
それまでのログにそのまま追加されてる感じです。
0183nobodyさん
2006/12/24(日) 04:13:24ID:9TMcOB7X【. 置き場所 .】 http://www.big.or.jp/~talk/t-club/soft/mini_r6/index.cgi
【ヘルプ内容】 掲示板への投稿が一定数以上なければ、閲覧することが
できない制限をつけたいのですが、わかりません。
（来訪者の割りに投稿者が少なく、ＤＯＭを減らしたいため）
Perlコーディング初心者質問スレ Part 53 ⇒改造スレへ誘導されました。
0184183
2006/12/24(日) 04:14:08ID: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ルーチン）
}
0185183
2006/12/26(火) 15:44:50ID:p3+/o5740186nobodyさん
2006/12/28(木) 17:03:53ID:6RqsItPR（ただし、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;
}
0187186
2006/12/28(木) 17:05:58ID:6RqsItPRsub 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;
}
0188nobodyさん
2006/12/29(金) 13:59:16ID:???クッキーは異なるドメインは参照できない。
それに本来のアドレスを隠すといっているが、ばればれ。
とくにフレーム転送とか。
0190nobodyさん
2007/01/03(水) 10:54:46ID:O8K3holw0191nobodyさん
2007/01/05(金) 12:33:37ID:???【配布先URL】 http://www.non-policy.com/customize-box/ansq/#question
元々の配布先 http://www7.big.or.jp/~jawa/
【ヘルプ内容】 Ans.Qの1.40をつかっていたのですが、
書き込みの時間を入れたくて、上記改造版を設置してみたのですが、
コメントがついてもその記事が一番上に移動しません。
どこをどうすればわからなくてこちらに来てしまいました。
元のサイトで配布されていたいた1.4バージョンは自動で移動していました。
よろしくお願いします。
0192nobodyさん
2007/01/06(土) 02:34:41ID:5JmlMvQ+【配布先URL】 http://cgi-lounge.eek.jp/msuboard.php
【ヘルプ内容】 このスクリプト自体がauだけにしか対応していないので、3キャリア
もしくはDoCoMoだけには対応してほしいです。よろしくお願いします。
0193nobodyさん
2007/01/06(土) 03:38:24ID:WO53R+Nq【配布先URL】 http://script.s16.xrea.com/index2.php
【ヘルプ内容】 画像掲示板なのですが、名前とコメントだけでも投稿できるため、
海外からの定期的なスパム投稿で困ってます。
新規投稿には画像添付が必須になるようにお願いします。
0194nobodyさん
2007/01/06(土) 22:49:45ID:lBOtCkKI【配布先URL】 http://www.kent-web.com/
【. 置き場所 .】 http://www.kent-web.com/
【ヘルプ内容】
・投稿する本文に半角カタカナがあったらエラーメッセージを出したい。
・しかし「･」など、カタカナ以外はエラーにならないようにしたい。
本文を一旦EUCにして半角カタカナの有無を判定させるのはググればコードがあったので
以下のように書いてOKでした。
が、「・」が半角の場合までエラーになってしまいます。
カタカナ以外を半角カタカナと認識させないというのは、できないものでしょうか？
&jcode'convert(*message, "euc");
if ($message =~ /\x8E/) {&error("ERROR<br>半角カタカナが含まれています");}
&jcode'convert(*message, "sjis");
0196nobodyさん
2007/01/08(月) 19:16:50ID:RAFN8Ic4【配布先URL】http://apps.cside.com/cgi/counter/txtcntdx/
【. 置き場所 .】http://apps.cside.com/cgi/counter/txtcntdx/
【ヘルプ内容】設定画面で直前のIPアドレスのカウント拒否はできるんですが、
直前ですので、リーロードがあるとまたカウントされたりしてしまいます。
できれば２４時間以内に同一ＩＰはカウントをしないなど改造できないでしょうか。
自分では非力でできませんした。
どうかよろしくお願いします。
0197nobodyさん
2007/01/09(火) 21:22:59ID:kjLanKuNここでスパム対策版を配布してる。
ttp://swanbay-web.hp.infoseek.co.jp/index.html
0198nobodyさん
2007/01/10(水) 05:55:31ID:???【配布先URL】http://www.chitta.com/nobu/download/
【. 置き場所 .】http://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」としています。
0199nobodyさん
2007/01/10(水) 06:40:46ID:ALgB1HLh0200196
2007/01/12(金) 15:49:54ID:Sg/zwaZY0201nobodyさん
2007/01/15(月) 00:23:08ID:ho2dYuVd【配布先URL】http://www.schwebdesigns.com/serverstatus/
【. 置き場所 .】http://cowboy.jf.land.to/test.html
【ヘルプ内容】
サーバーの状態確認PHPなのですが、現在サイトのトップページに使用しています。
このスクリプトを最終訪問者から10分後に来た訪問者が実行するようにしたいのです。
最終訪問者の時間記録＞次の訪問者＞時間確認＞10分以内ならサーバーに問い合わせず、画像そのまま。
という形に出来ませんでしょうか？
いざ改造しようにも手も足も出ず書き込んだ次第です。宜しくお願いいたします。
■ このスレッドは過去ログ倉庫に格納されています