トップページ⇒php
1001コメント363KB

スクリプト改造工房 Part4

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。02/02/05 01:20ID:CZVDHHph
「こういうふうにスクリプトを改造したいけどやりかたわかんないよー」
という人がいましたらここで聞いてください。
ひょっとしたらアドバイス出来るかもしれません。

前スレ
Part2 http://pc.2ch.net/test/read.cgi/perl/986986227
Part3 http://pc.2ch.net/test/read.cgi/php/988808396

なお、質問するときは
1)そのスクリプトのある場所(URL必須、拡張子".txt"でアップすればなお良し)
2)どんな風に改造して欲しいのか? (完成イメージHTMLを用意すればなお良し)
を必ず明記しよう。
076875902/06/23 02:08ID:Bn+v9pGh
昨日はとてもありがとうございました。
もう一つ教えて頂きたいことがあるのですが...

http://homepage2.nifty.com/f-mld/count.pl.txt

このカウンターで、50の倍数を踏んだ人にランダムでメッセージを表示させる
ようにしたいのですが、どのように書けばよろしいでしょうか?
どうか、どうかよろしくおながい致します。
0769nobodyさん02/06/23 02:22ID:???
>>768 君は学習するという事をしらんのかね?
0770xx02/06/23 02:24ID:???
>768
こんな感じでしょうか?

unless ($count % 50){
    @data= <DATA>;
    print $data[int(rand(@data))];
}

__END__
メッセージ1
メッセージ2
メッセージ3
   :
077175902/06/23 03:06ID:Bn+v9pGh
>>769
すみません...ご迷惑をおかけします。
Pealを勉強したいのですが、どのようにすれば良いかわからなくて...
オススメのサイトや書籍などがありましたら教えて頂けないでしょうか?


>>770
教えて頂きありがとうございます。とても嬉しいです。
でも、どこに記述すれば良いのかがサッパリ解りません...

print "訪問者:$total<br>T:$count Y:$ycount\n";

この下でよろしいのでしょうか?
0772nobodyさん02/06/23 08:53ID:???
>>771
Pealか・・・Pealは難しいよな。やっぱりケミカルかな。
0773nobodyさん02/06/23 10:42ID:???
>>759 過去ログぐらい読めや。クズ!
07743PIO ◆3pIoOHKo 02/06/23 13:21ID:x3pCNKFh
>>759
漏れはここで勉強した
http://tohoho.wakusei.ne.jp/wwwperl.htm
07753PIO ◆3pIoOHKo 02/06/26 15:11ID:DwF94vyq
保全age
0776nobodyさん02/06/26 19:58ID:???
ツリー型BBSでレスが付いた時上にあげたいのですが何処を改造したら良いでしょうか。
よろしくおねがいします。下がスクリプトです。
http://kirazoo.tripod.co.jp/tree.txt
07773PIO ◆3pIoOHKo 02/06/26 22:14ID:yU8VbQZu
>>776
とてつもない改造が必要かと思われる。



あと、本当に改造してほしいならばsageずにageろ
0778nobodyさん02/06/26 22:39ID:???
>>776
そのスクリプトじゃないとダメっていう理由がないなら
レスがついたらTreeが上昇する機能がついてる別のスクリプト使ったら?
http://www.kent-web.com/bbs/wforum.html
0779nobodyさん02/06/27 00:07ID:???
kent厨…
07803PIO ◆3pIoOHKo 02/06/27 16:41ID:???
>>779
KENTの何が悪い?
078177602/06/27 18:50ID:lD8zMgyZ
>>777-778
レスありがとうございます。
かなりの改造が必要なんですね...
デザイン的に結構気に入ってたもんで出来ないものかと思って質問してみました。
別にKENTを使いたくないという訳ではないのですが今乗り換えるとログの問題もあり
旧と新二つ設置しなければいけなくなる為少々抵抗を感じます。
もう少しこのままレスが付くのを待ってみます。

もう一つ質問したらきっと叱られる思いますが>>776の場合、改ページ処理で<option value>ダグで選ぶのではなく「戻る」「次」見たいに変更するにはどのようにしたら良いものでしょうか。ヒントだけでもお願いします。
0782nobodyさん02/06/27 23:05ID:???
http://yokohama.cool.ne.jp/icefall/download.html

上記のうなぎスクリプトなんですが、書きこみ欄に4桁程度の
削除キーを書いて、ユーザがカキコの後から編集、削除ができ
るようにしたいんですが、やはり大規模な書き換えになってしまう
んでしょうか。よろしくお願いします。
0783nobodyさん02/06/27 23:56ID:???
>>782
そう言う事をやろうとすると…

・ログに削除キーを記録するように変更(項目の追加)
・削除キーが何らかの手段で与えられた場合の編集、削除ロジック追加

最低でもこれらが必要になるね
07843PIO ◆3pIoOHKo 02/06/28 16:27ID:???
>>781
やれば出来るだろうが漏れのスキルでは丸1日かかってしまう。
誰か他所あたってくれや。

>>782
DESでパスワードを暗号化する必要もあると思われ
http://tohoho.wakusei.ne.jp/wwwperl2.htm#crypt
0785名無しさん02/06/29 00:13ID:9XF42yOc
保全age
0786TTK02/06/29 00:29ID:???
http://www.01nni.com/free-b.html#07
このCGIでフォームページを作って
「○○マガジンを購読しますか?」
という質問を作る。でチェックをつけた人は送信する
時に同時に購読させられる。でもってマガジンを複数設定したい。

できますか?
0787nobodyさん02/06/29 01:04ID:???
先日も同じような質問を目にした気が……。
0788 02/06/29 01:05ID:???
>>786
それ、普通のフォームメールだろ。
アンケートなどをつけられるのは他にいくらでもあるが
単にメールを送るだけ。
受信してどうこうってのは別問題。
0789 02/06/29 01:15ID:???
こうやってもうまくいかないってんならまだしも、少しもコードを
読めも書けもしないやつに限ってああしたいこうしたいと言うよなぁ。
0790nobodyさん02/06/29 09:24ID:???
>>789
そうそう、改造の仕方を知らないヤシは改造の手間とか解ってないからね。
0791_.exe02/06/29 09:29ID:???
>>771
print "訪問者:$total<br>今日:$count 昨日:$ycount\n";
if(($count % 50)==0){
print "てめぇ50番台じゃねぇか。";
}
0792名無しさん02/06/30 06:36ID:???
>>790

そうそう、質問に何も答えられない奴が初心者相手に偉そうにしてるスレだよね。
0793nobodyさん02/06/30 14:40ID:???
保守age
0794TTK02/06/30 17:29ID:???
保守age
07953PIO ◆3pIoOHKo 02/06/30 22:01ID:8ch/aqv5
保守age
0796 02/07/01 13:15ID:???
答えられないこともあるだろうけど、答える気がしないってのが
ほとんどだな。
「このサイトのこれなんですが」なんて書かれても、ダウソしてきて
ソース見て・・・なんてことをする気にはならん。
少なくともオリジナルのソースをtxtでどこかにあpしてすぐ見られるようにして、
どこをどうしたいのか明確にするぐらいはしてもらわないと。
できれば笑われる覚悟でわからないなりに自分でいじってみたソースも見せてくれれば。
おかしければ突っ込むが、そこまでやるのなら手を貸してやろうかという。気にもなる。
0797nobodyさん02/07/01 14:23ID:???
>>796
禿同。





以後、>>796 に沿わないものは放置で
0798nobodyさん02/07/01 16:33ID:1mNAxNOZ
KENT降臨キボンage
07993PIO ◆3pIoOHKo 02/07/01 17:29ID:Cd4UgU1r
>>797
そうしましょう
080075902/07/01 17:40ID:???
つ、ついに出来たYO!

あれから色々なサイトのスクリプトを参考にPerlを学んで
ようやく「@」の意味が解りました。
みなさんにはとてもお世話になりました。

また、何かわからないことがあったらよろしくおねがいします。
もう来るなと言われそうですが...
08013PIO ◆3pIoOHKo 02/07/01 18:20ID:???
>>800
ようやった
0802nobodyさん02/07/02 19:45ID:SyZG/7SI
http://www.arifan.com/deiyu/cgi/member/member.html
このギルド用スクリプトを改造したいのです。
JPEGとGIFしかアップロードできない作りになっているのですが、
それ以外(htmlやエクセル、PDF)なども使えるようにしたいのです。
さらに、画像以外のファイルは「詳細情報」というテキストリンクにしたいのです。
自分でもいろいろやってみたのですが、どうにも上手くいきません。
(エラー表示もされないまま、ファイルはアップロードされていないと言う状態になりました)
ヒントだけでもよいですので、どうか知恵を貸してください。
0803nobodyさん02/07/02 22:46ID:???
>>802
だからtxtでアップしろって。
回答者に落とさせて、、、と手間をかけさせるつもりかい?
0804nobodyさん02/07/02 22:48ID:???
もうひとつ。怪しいと思うところを探せ。
そしてここに書いてね。

怪しいところは見つかってんだろ?
0805nobodyさん02/07/03 00:54ID:???
はじめまして。
http://zurubon.strange-x.com/upload.txt(ずるぼんあぷろだ)
のあbユされた各ファャCルの日付の横bフ少しの空白の緒齒鰍ノ
bぷファイル個封ハのレス欄を付bッたいのですが緒o来ますでしょb、か?
bィ願いします。
0806nobodyさん02/07/05 17:27ID:???
もうしわけございません。
CgicafeさんのKerokerochatを改造したいのですが
http://saya.kiy.jp/cgi/chat.html(大元です)

このチャットをROM禁止にしたいのです。
別途入室フォームを置いて、それに入力後チャットに入れるように
したいのですが・・・。
http://www.roomyroo.com/~myroom/cgi-bin/uploader/source/55.txt
これがソースです。
08073PIO ◆3pIoOHKo 02/07/05 19:43ID:???
>>806
トップページのリンクに「ROM禁止」と書く
これ最強。
0808nobodyさん02/07/06 22:36ID:???
このスレさーやっぱかなーり面倒な改造とかフツーに頼みに来るヤシ多いからさ
自分である程度改造して、こんな感じに改造したんですけどうまくいかない
見たいな感じでもうperlコーディングスレと統合しちゃえば?

0809nobodyさん02/07/07 00:05ID:???
すくりぷとはperlだけとは限らない以下略
0810nobodyさん02/07/07 00:07ID:???
VBScript,JavaScript,JScript,ECMAScriptでもいいのか?
0811nobodyさん02/07/07 00:25ID:???
>>806

>>796 に沿わないので、放置
0812nobodyさん02/07/07 00:33ID:???
>>806
つか、それぐらいも分からないで以下略
0813nobodyさん02/07/07 01:56ID:???
長い すくりぷとはperlだけとは限らない以下略
短い すくりぷとはperlだけとは限らない罠

0814nobodyさん02/07/07 13:45ID:PB57yOoL
ちょっとスレ違いなのですが識者の方々に教授願いたいのですが、、

http://cgi.linkclub.or.jp/~kimkim/index2.shtml
の「K-db」で、新規入力する時にコメント欄に特定文字(今の所不明です)を入力
すると、2行目以降が表示されなくなってしまいます。

例えば、コメント欄に

音楽がほんわかしてて気持ちいいです。
希望としてももう少し難しくして欲しい。
ゴルフゲー好きなら落とそう。

と入力すると、ログには
音楽がほんわかしてて気持ちいいです。
しか投稿されないのです。

出来れば修正方法をご教授願えれば、と思うのですが、、
よろしくお願いします。
0815nobodyさん02/07/07 13:54ID:???
>>814
「特定文字を入れると表示されなくなる」と判断した根拠は?
0816nobodyさん02/07/07 14:13ID:PB57yOoL
>>815さん
すみません、そこのサポートBBSに投稿している人の発言をそのまま書いて
しまいました。
投稿出来る場合と出来ない場合がありますので、、
自分もそうなのかな?と鵜呑みにしてしまっていました。
ですので、根拠は無いです、、すみません。
思い込みでした。
0817nobodyさん02/07/07 14:15ID:???
>>814
その発言だけ見ると、改行があるとおかしくなるとか?
0818nobodyさん02/07/07 14:21ID:PB57yOoL
>>817さん
そうです、ある発言は<BR>タグ以降もログに記録されるのに、
ある発言は1行目の<BR>タグも含めてきれいさっぱり2行目が消えています。
あ、改行を<br>にCGIが変更してログに書き込んでいると思います。
0819nobodyさん02/07/07 14:21ID:???
すみません、ageてました、、、、
0820見習い02/07/07 20:33ID:???
>>818
s/\r\n/\n/g;
とかは?
0821nobodyさん02/07/07 21:05ID:???
>>820さん
一応
$commentmain =~ s/\r\n/<br>/g;
$commentmain =~ s/\r/<br>/g;
$commentmain =~ s/\n/<br>/g;
と記述されています。
改行を<BR>タグに変換するんですよね?
この行に追加するのですか??
もうこんなレベルで済みません、、、
0822nobodyさん02/07/07 22:40ID:???
$commentmain =~ s/\r\n|\r|\n/<br>/g;
一気にやれよ。
0823nobodyさん02/07/08 07:06ID:???
全て記述を
$commentmain =~ s/\r\n|\r|\n/<br>/g;
に変更したのですが、やはり無理でした。

ちょっと簡単には出来そうもないですよね、、
ありがとうございました。
0824nobodyさん02/07/08 07:06ID:???
無理と言うのは、症状は変わらないという事です。
0825トウモロコシ02/07/08 18:07ID:???
http://wind.gi-ga.net/xrea/ebs.cgi
このCGIに同盟とMAP移動というプログラムを付けてみたいです
txtは
http://wind.gi-ga.net/ebs-txt/config.txt
http://wind.gi-ga.net/ebs-txt/ebs.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub1.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub2.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub3.txt ←お手数ですがソースを見てもらえますか?
http://wind.gi-ga.net/ebs-txt/ebs_sub4.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub5.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub6.txt
http://wind.gi-ga.net/ebs-txt/ebs_sub7.txt
ちなみに副管理人募集中です(関係ない)
0826名無し02/07/08 19:46ID:KuVKR3XX
新感覚のポータルコミュニティサイトが遂に出来ました!!
今までの出会い系サイトとは一味もニ味も違うサイトです。バーチャルタウンを実際に体験できます!!!
詳しくは下記UELをクリックして、確かめて!!
http://www.e-mansion.co.jp/co/ac.html
0827nobodyさん02/07/08 19:59ID:???
>>825

そんなにたくさん誰が見るかヴォケ
大規模な改造は自分でガクシューしてやれよ
0828nobodyさん02/07/08 20:25ID:???
>>825
ebsの改造を扱ってるところへ行って頼め。
ここではそんなものは受け付けない。
0829nobodyさん02/07/08 21:10ID:???
>>825
自分で怪しいところくらい探し解けや。
ebsの改造サイトなんていっぱいあるんだからさぁ・・・
08303PIO ◆3pIoOHKo 02/07/08 22:00ID:???
なんか最近のこのスレって一体・・・・・・
0831nobodyさん02/07/09 00:43ID:b0rFJDUg
ナレーションBBS−R
http://www.alsialab.com/
に過去ログ機能をつけたいんですがやりかたわかんないよー
0832 02/07/09 01:51ID:???
(´-`).。oO(BBSで過去ログってどんな機能なんだ?・・・)
083383102/07/09 02:21ID:nS3zIeby
>>832
どういうことでしょうか?
もしかして私は何か大きな勘違いをしているのでしょうか?
0834 02/07/09 04:07ID:???
>>833
過去ログって古い書き込みをどこまで遡って見られるかだろ?
そのBBSは古いほうから消えていくタイプなのか?
0835nobodyさん02/07/09 04:29ID:???
>>831 は新しい方から消える斬新な機能を要求しているのか?
08363PIO ◆3pIoOHKo 02/07/09 10:41ID:aNf12ita
>>831
ワラタ
08373PIO ◆3pIoOHKo 02/07/09 10:42ID:aNf12ita
スマソ
>>831ジャナクテ>>835
0838 02/07/09 16:49ID:???
ちょっと早いかもしれないけど、次スレ立ちそうなら
今のうちにテンプレ考えておかない?
083983102/07/09 20:53ID:nU6vpFNH
古いほうから消えていくです。
新しい方から消えては意味がないので要求しないです。
0840nobodyさん02/07/09 22:38ID:???
>>839
で、その消えた分を「過去ログ」として保存したい訳?

なんで、こう逆質問しないと、はっきりとした意図が解らないような質問する訳?
0841 02/07/09 23:00ID:???
>>839
古いほうから消えるって言っても、親記事の数に制限があって
古いものが消えるのか、あるいはレス数に(同上)。
だとしたらそれを過去ログ(別ログ)で残したいのか、制限そのものを
なくしたいのか。
オリジナルがどういう機能で、それをどうしたいか書かなきゃ。

そのCGIを落として動作を確かめて君のやりたいことを
推測するなんてことは誰もやらないと思うよ。
084283102/07/09 23:56ID:k5xDVD5V
質問が悪かったです、すいません。

消える分を保存したいんです。
親記事の数に制限があって、新しく親記事を作ると一番下にあるものが消えるので、
それを残しておけるようにしたいと思っています。
制限をなくすことはできますが、制限したままでいこうと思います。
0843nobodyさん02/07/10 00:04ID:???
>>842
だったら、

$res = pop(@bbs_data);

で、$resを追記で過去ログ酔うファイルにでも書き込んでいけばいいんじゃ内の?
0844nobodyさん02/07/10 02:25ID:???
ほんと威張ってばかりで頼れねえくずどものスレだな。
0845nobodyさん02/07/10 03:02ID:???
>>844
オマエはせめて頼らないぐずになれ。
0846nobodyさん02/07/10 03:35ID:???
open(FILE, ">>kako_log.txt");
print pop(@bbs_data);
close(FILE);
0847nobodyさん02/07/10 07:02ID:???
>>844

禿同。厨房同士でじゃれてるだけ。
0848これ、最強02/07/10 07:43ID:???
>>844 >>847 ←厨房同士でじゃれてる奴等
0849nobodyさん02/07/10 09:29ID:???
>>848

いちいちかまう君も(略
0850nobodyさん02/07/10 16:56ID:???
>>849

いちいちかまう君も(略

>>847=>>849
085183102/07/10 19:45ID:???
>>850

いちいちかまう君も(略
0852nobodyさん02/07/10 20:35ID:???
>>851=831

( ´,_ゝ`)マルミエ、プッ

誰も答えてくれなかったので暴れる厨房発見!
0853nobodyさん02/07/10 22:55ID:???
>>851 (≧∇≦)
0854nobodyさん02/07/11 14:57ID:???
>>851
お前がこのスレの中でレスを出来るのは厨房が書いたレスのみだな(w
0855nobodyさん02/07/11 17:16ID:???

悲惨な831がいるスレはここですか?
085683102/07/11 18:13ID:6V/lnArc
831ですが私は悲惨ですか?
>>851は私ではありませぬが
0857コギャル&中高生02/07/11 18:17ID:geOvSY9Z
http://book-i.net/tyutyu/

ヌキヌキ部屋へ直行
0858nobodyさん02/07/12 02:37ID:???
>>856

( ´,_ゝ`)プッ
0859nobodyさん02/07/12 03:06ID:mQ+sLvjc
CGIの改造のことでCGI総合スレッド@Web制作板から
誘導されてきました。改造はこちらでしたね…(;´д`) ジブン イッテヨシ

どなたかご教授くださいませ。
こちらの日記CGIはタグを使いたい場合、CGIの設定の中に
使いたいタグを(font a b u s i)という形式で書くことに
なっているのですが、どうも入れ子状態のタグだと
一番内側にあるタグ以外は無視されてしまうようなのです。
( <a><img></a> の場合、画像は表示されるが
 アンカータグのカッコは&lt;に変換されてしまう)

タグを入れ子にできるようにするためには、
どのように書き換えればいいのでしょうか?
ヒントだけでも構いませんのでお願い致します・゚・(ノД`)・゚・

CGIをテキストに変換したものです。
http://blue.ribbon.to/~brm/d-board.txt
0860つられて向こうに書いちゃったヨ02/07/12 03:38ID:???
>>859
d-board.libの

foreach $tag (@$okTagClose){
while($text_data =~ /&lt;($tag)([^&]*)&gt;([^&]+)&lt;\/$tag&gt;/i){
$text_data =~ s/&lt;($tag)([^&]*)&gt;([^&]+)&lt;\/$tag&gt;/<$tag$2>$3<\/$tag>/i;
$text_data = &ok_tag($text_data);
}
}

foreach $tag (@$okTagOpen){
while($text_data =~ /&lt;$tag([^&]*)([^\.cgi]*)([^&]*)&gt;/i){
$text_data =~ s/&lt;$tag([^&]*)([^\.cgi]*)([^&]*)&gt;/<$tag$1$2$3>/i;
}
}

を

foreach $tag (@$okTagClose){
$text_data =~ s|&lt;(${tag}.*?)&gt;(.*?)&lt;/${tag}&gt;|<$1>$2</$tag>|ig;
}
foreach $tag (@$okTagOpen){$text_data =~ s/&lt;(${tag}.*?)&gt;/<$1>/ig;
}
と入れ替えていけないかな。
086186002/07/12 03:43ID:???
訂正
下から3行目の&lt;(${tag}.*?)>は
&lt;(${tag}.*?)&gt;
で。
0862nobodyさん02/07/12 03:55ID:???
>>860-861
おおお、で、できました!!・゚・(ノД`)・゚・
自分なりに、先程UPしたファイルと睨めっこして
『「&lt;」がないけどなぜ…(;´д`)???』と首を傾げていて、
それがlibファイルにあることに気付き、>>860の部分と
またもや睨めっこして頭を沸騰させていたところでございました。

こんな時間に、本当にどうもありがとうございました!!
入れ替えたところをなんとか理解できるように精進したいと思います。
(あちらにもお礼を書かせていただきます。)
0863nobodyさん02/07/12 06:27ID:fSxvbH1N
http://www.sound.jp/idm/a-column.txt
なんですが、これの一覧表示の際に
通常はコラムの「題名 日付」の順に並ぶのを「ジャンル 題名 著者名 日付」
という形にするために書き込み欄に新たにselectかtextareaを作って
設定できるようにしたいのですが、どのように書き換えたらいいのでしょうか?
よろしくお願いします(;´Д`)
086486002/07/12 07:54ID:H5YGeUXY
>>862
ごめん、>>860のやり方だと例えば<a>を許可した場合に
<applet>とかも許可されちゃうわ。
回避するには以下のように変更して。

foreach $tag (@$okTagClose){
$text_data =~ s|&lt;(${tag}(\s.*?)?)&gt;(.*?)&lt;/${tag}&gt;|<$1>$3</$tag>|ig;
}
foreach $tag (@$okTagOpen){$text_data =~ s/&lt;(${tag}(\s.*?)?)&gt;/<$1>/ig;
}


って、もう来ないかな…


>>863
見た目だけで良いなら題名の欄にジャンルと著者名も一緒に
書くようにしてみては?
別々に記録して読み込んだりソートしたり出来るように改造するとなると
人に聞かないで出来る人でも数時間かかるような作業になるかと。
0865nobodyさん02/07/12 08:41ID:???
>>864
> 見た目だけで良いなら題名の欄にジャンルと著者名も一緒に書くようにしてみては?
> 別々に記録して読み込んだりソートしたり出来るように改造するとなると
>人に聞かないで出来る人でも数時間かかるような作業になるかと


今はとりあえずそうしてるんですが、やっぱり別途記録するとなると大掛かりに
なりますよね。。どうもありがとうございます(;´Д`)。
0866nobodyさん02/07/12 17:23ID:ia5y4ZlD
perlの掲示板CGIを設置しているのですが、半角カナを使うと文字化けしてしまいます。
文字化けしないようにするにはどこをどういじればよいでしょうか?
0867nobodyさん02/07/12 17:25ID:???
半角カナは文字化けするのが普通。
jcode.pl なり Jcode.pm なりつかって全角に変換する。
■ このスレッドは過去ログ倉庫に格納されています