スクリプト改造工房 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を用意すればなお良し)
を必ず明記しよう。
0612611
02/05/04 01:06ID:???sourceファイルには残ってる
0613nobodyさん
02/05/04 01:49ID:???http://isweb42.infoseek.co.jp/art/world32/subupload.txt
パーミション等はhttp://isweb41.infoseek.co.jp/computer/ari-sin2/index2.htmlと
同じでsubは755にしてます。
あぷろだはhttp://isweb42.infoseek.co.jp/art/world32/cgi-bin/upload.cgiです。
時間経つと板からファイルが消えます
0614nobodyさん
02/05/04 07:53ID:???改造版作者より
ちょっとファイルの排他処理が甘かった模様です。スイマセン。
今から強化します。Ver0.2を使って見てください。
0615nobodyさん
02/05/04 08:52ID:???>>610->>613
とりあえず申し訳無いのですがsubupload.cgi Ver0.2を作成しましたので私のHP(>>601)からDLして
置き換えてもらえないでしょうか?それとパーミッションは755よりも777が望ましいです。(フォルダとスクリプト)
スクリプトを安定させるコツ
・出来ればパスワード、カウンター、FTP転送などのおまけ的な機能を使わない。
>>608
ずるぼんさん本人に聞いてみてください。
>>610
暇があったら改造してみます。ただ今現在はデバッグで手一杯なので。。
0618613
02/05/05 00:22ID:???それとわざわざHPへのご報告ありがとうございます。
0619613
02/05/05 03:37ID:???0620nobodyさん
02/05/06 03:03ID:???10??????.tempみたいな感じのがsourceフォルダの中に
たまにできます。あと出来たらHPに板置いてくれませんか?
0621nobodyさん
02/05/08 05:59ID:Nv6MjGlgこれをクッキー対応にさせて、いちいち選択し直さないようにするようには
出来ないでしょうか。よろしくお願いします。
http://www.2apes.com/products/index.html
0622nobodyさん
02/05/08 18:02ID:???0624nobodyさん
02/05/10 06:02ID:???06254415
02/05/10 17:42ID:???誰か改造できる?
例:http://ion.adam.ne.jp/(リンク張ってスマソ)
ココの掲示板みたいな感じで・・・・。
0626(・A・)
02/05/10 21:07ID:???どうすれば良いですか?
0627nobodyさん
02/05/10 21:17ID:???えーと、例に出してるサイトが使ってる掲示板をそのまま使えばいいのではありませんか?
そこの掲示板の著作権表示をたどるとここにたどり着きましたよ。
http://tackysroom.com/cgi_nmaruchan.htm
ソース配布してなければ無理
したいのですが、どうもうまくいきません。
1.画像はサーバーにはアップされているのに表示できない
2.親記事で画像無しだと、子記事に画像を付けて投稿しても反映されない
といったようなややこしい状態になります。
該当されると思われるスクリプトを置いておきますので
諸先輩方どうか宜しくお願いします。
ttp://spamkill.hoops.ne.jp/bbs.txt
ttp://spamkill.hoops.ne.jp/bbs_eng.txt
0632nobodyさん
02/05/11 01:07ID:???4415って名前欄に入った厨房がWEB製作板でもなんだか的外れな
アホな発言してたな。こりゃ放置で>ALL
ちなみにこの場合改造するのは普通YYBBSじゃない方。
って言えばむちゃくちゃ簡単なのはわかるだろうがなw
0635nobodyさん
02/05/12 08:18ID:k99BTwztelse { print "/秘密\n"; }
print <<"HERE";
/$max]
<BR>[$risou] 希望/$hoop
<BR>[メッセージ]
<BR><FONT color="$word_color">$comment</FONT>
――――――――――――――――――
この場合HTMLでソースを見ると
[○○県
○○歳
**通
]
<BR>[メッセージ]
<BR><FONT color="$word_color">****************</FONT>
と、なりますが上の4段 "[" から "]" までスマートに一段でソースを吐くことは
出来ないでしょうか?表示上は問題ないのですがちょっと気になるもので…
0636nobodyさん
02/05/12 08:20ID:k99BTwzt下の場合ですが
print "<BR>[$street\n";
unless ($noage) { print "/$age歳\n"; }
else { print "/秘密\n"; }
print <<"HERE";
/$max]
<BR>[$risou] 希望/$hoop
<BR>[メッセージ]
<BR><FONT color="$word_color">$comment</FONT>
――――――――――――――――――
この場合HTMLでソースを見ると
[○○県
○○歳
**通
]
<BR>[メッセージ]
<BR><FONT color="$word_color">****************</FONT>
と、なりますが上の4段 "[" から "]" までスマートに一段でソースを吐くことは
出来ないでしょうか?表示上は問題ないのですがちょっと気になるもので…
荒らしが3人で入ってきて普通にチャットしてる人を次々と落とすという
新たな荒らし方法が出てくると予想してみる
0640nobodyさん
02/05/13 20:10ID:0X8BIqsGhttp://www.kent-web.com/bbs/aska.html
現在KENTWEBさんの「ASKA BBS」を使用しています。
これを、指定した時間以外は掲示板を表示しないようにしたいです。
例えば8:00〜17:00は「この時間は利用できません」とか
エラーメッセージが出るようになればいいなと思ってます。
お忙しいとは思いますがよろしくお願いします。
0642631
02/05/13 22:12ID:???0643nobodyさん
02/05/13 22:35ID:???実際にその掲示板のややこしい動きとやらを見せてくれたらわかるかもしれんが。
まさかリンクミスとかじゃないよな。
あと、4000行を超えるスクリプトを追うのは激しく面倒。暇な人を待て。
0645nobodyさん
02/05/14 06:46ID:???0646nobodyさん
02/05/14 07:30ID:vNEin2BEでっ・・また 皆さんの力を貸してください。
掲示板なのですが、投稿した時に投稿者のブラウザー機種を表示させたいのですが
HTTP_USER_AGENTだけだと「Mozilla/4.0 (compatible; MSIE 5.5; Windows 98)」
と、表示されます。これを簡単に「MSIE 5.5」携帯だと「N 503」みたいにしたいの
ですが、どのように付け加えたら良いのか教えて頂けませんか。
それともう1つですが
投稿者の一覧で次のページに進む場合プルタウンメニューで選んで進むようなのですが
これを「次ページ=リンク」に簡単に変更する方法があるのでしょうか?
これがそのCGIです(txt)↓
http://kirazoo.tripod.co.jp/b/deai.txt
ちょっと手を加えていただきたいイメージです↓
http://kirazoo.tripod.co.jp/b/index.html
ぜひ、よろしくお願いします。
PCのUAは吐き出されたものを処理すればいいだけ。
携帯のは http://dream.lib.net/room/ の ma_lib.pl を
参考にすればわかりやすいかも。
0648nobodyさん
02/05/14 21:46ID:7mUBcsurやっぱ、単純なものもわからなければここに来る資格なしですか?
もう少しがんばって見ます。アドバイスありがとうございました。
0651nobodyさん
02/05/15 01:00ID:???if ($ENV{'HTTP_USER_AGENT'} =~ /MSIE 5\.5/) { $ENV{'HTTP_USER_AGENT'} = "MSIE 5.5" ; }
0652nobodyさん
02/05/15 03:52ID:1tDJvwWSのEveryAuction
http://www.everysoft.com/cgi-bin/auction.pl
の日本語化したのってないのかな?
0654nobodyさん
02/05/15 07:40ID:???あとは応用してくれってことでそ
0656nobodyさん
02/05/15 09:46ID:???0658nobodyさん
02/05/15 16:58ID:???0659nobodyさん
02/05/16 01:15ID:???0660nobodyさん
02/05/16 13:37ID:???ならi-mode対応にした改造版を使え
0662nobodyさん
02/05/17 04:26ID:hDQ9yjaZあっ!いいですか。では、これなんですが
�@###---投稿処理-----###
<input type="checkbox" name="sendtime" value="1">夜間メール拒否(22-7時)<BR>
�A###---メールのエラー処理------###
if($sendtime){
if ( 22 < $hour || $hour < 7 ){ &error("夜中メールお断り"); }
}
�B###---観覧処理------###
if($sendtime){print "夜間メール拒否中\n";}
/////////////////////////////////////////
この場合。�@でチェックを入れ�Aで該当するものは、�Bでプリントされますがこれを�Aで指定した時間だけプリントするにはどーすればいい?
簡単に言えば、ローカルの時間が
22〜7時メール拒否中を表示
8〜21時何も表示しない
優しく、わかりやすく教えて下さいませ。
0665nobodyさん
02/05/18 09:49ID:???($sec,$min,$hour,$mday,$mon,$year,$wday,$dmy,$dmy) = localtime(time);
0667nobodyさん
02/05/20 23:46ID:O0KKTX9E(配布元ttp://www.axs.to/~mkomu/keitai/)
ここのアンケートCGIなんですが、
check boxでの、複数項目の取り込みとデータベースの書き出しに対応させるには
どのように書き換えれば良いのでしょうか・・・
本家へ質問しましたが、ゲストブックの書き込み状況を見る限りサポートは期待できなさそう...
0668nobodyさん
02/05/21 23:41ID:Yhiz/uIlどこをなおせばいいでしょう?
0669ファイルの更新日時cgi
02/05/22 01:27ID:???更新日当日しか「更新しました」と表示されません。
なので23時59分に更新すると1分で「更新しました」というのが消えてしまいます。
これを12時間とか24時間表示し続けれるようにしたいのですが
素人ということもあり時間の数式がさっぱりわかりません。
どなたか手直ししていただけませんでしょうか。
http://www.geocities.co.jp/HeartLand-Momiji/6161/new.txt
0670nobodyさん
02/05/22 04:38ID:???頻繁にファイル更新しないなら、cgiなんぞ使わない方が環境に優しい。
どうしても24時間でやるなら、
$today = "$month月$mday日";
⇒$today=sprintf("%02d%02d",$month,$mday);
if($today ne "$month月$mday日")
⇒$filedates=sprintf("%02d%02d",$month,$mday);
if($today == $filedates || $today -1 == $filedates)
で逝けそう(ぉ
0671nobodyさん
02/05/22 09:43ID:nSs6layRありがとうございます。
用途はトップページに掲示板や本人登録型リンク集などcgiの
最終更新時間を表示したいと考えていたのです。
0672669
02/05/22 09:52ID:???すいません。
さっそく設置してみたのですが更新日時に関係なく
ランダム(のように基準がわからないのです)で
「更新されました」と出てしまいます。
0673nobodyさん
02/05/22 20:19ID:???0674ken
02/05/23 01:29ID:TLsld2EnにあるKENTの夢のカウンターで、カウントを非表示にして
カウンターを別ページに表示したいのですが、どうすれば、よろしいでしょうか?
お手数ですが、なにとぞお願い致します。m(__)m
どなたかお教えくださいませ。m(__)m
よろしくお願い致します。
0675nobodyさん
02/05/23 01:49ID:Ygb2ii6bこのヴァカ男を晒しあげにしてください
http://ex.2ch.net/test/read.cgi/diet/1022072704/
0676しろうと
02/05/23 01:50ID:???こんなのはどう?
-------
#!/usr/bin/perl -w
use strict;
my $dirname = './';
my $interval = 24 * 60 * 60;
my $now = time;
print "Content-type: text/html\n\n";
print <<HTML;
<html><body>
HTML
opendir(DIR, $dirname) or die;
while (defined(my $file = readdir(DIR))) {
next if $file !~ /\.(htm|html)$/;
my $mtime = (stat $file)[9];
my $updated = '更新しますた' if ($now - $mtime < $interval);
my $date = localtime($mtime);
print <<HTML;
$file $date $updated<br>
HTML
}
print <<HTML;
</table>
</body></html>
HTML
0677nobodyさん
02/05/23 01:53ID:???0679nobodyさん
02/05/24 18:59ID:???入室後の文字色指定をプルダウンメニューではなくラジオボタンで選択するようにしたいんです。
あ、関係ありませんがKENTさんの改造スクリプトを扱っていた「さとの部屋」と「another place」ってどこに行ったんでしょう。知っている方が居たら教えてくれませんか?
できません。「$limit--」ではだめですか?自分でいじったとこを水色でマーク
してる部分です。
http://www.h2.dion.ne.jp/~i-deai/cgi.htm
0681df
02/05/24 20:18ID:9eTMj/b7-------風俗の総合商社・MTTどこでも-------
〇デリバリーヘルス〇デートクラブ〇女性専用ホストクラブ〇
〇ハードSM奴隷クラブ〇レズビアン倶楽部〇ホモ・オカマ倶楽部
〇変態痴女と遊ぶ会〇痴漢・覗き趣味の会〇変態同好会・各種!
●楽しく遊べます! 090-8002-8356番
-----------美男・美女会員など多数在籍中-----------
http://www.mttdocomo.jp/
-----女性アルバイト随時募集・高収入(日払い)月100万円可能-----
-----レズビアン・スタッフ●ホモスタッフ●女性専用ホストスタッフ同募-----
http://www.mttdocomo.jp/
------------------------------------------------
0682nobodyさん
02/05/24 22:07ID:PSoFhpNbキーワードを持たせてGoogleに放り込み、出てきたアドレスのページの中の
imgタグの中からアドレス取ってダウンロードしようとしてるんだけど、
なんか、一個見つかると他のアドレスで探索したときも
同じパスでダウンロードしてしまうのですが原因わかるかたいますか?
(要するにAページで/image/a.gifと見つかるとBのページでも存在しないのに/image/a.gifで処理しようとする。)
0683nobodyさん
02/05/24 22:36ID:???if(/<a href=(http:\/\/[^directory].*?)>/){
(*´∀`)プププ
use strict使って初期化されてない変数探せばぁ?(゚Д゚)
0684nobodyさん
02/05/25 15:11ID:kHc1b+7M↑ここの携帯用アクセス解析cgiを改造して、PCのホスト情報も読み取れるようにしたいんですが、
↓これをどのように書き換えれば出来るでしょうか?
http://dream.lib.net/room/cgi/works/ma_lib_pl.txt
0685nobodyさん
02/05/25 17:29ID:???return ($user_agent,$terminal,$t_sy,$t_name,$t_color,$t_mime);
↓
return ($user_agent,$terminal,$t_sy,$t_name,$t_color,$t_mime,$ENV{'REMOTE_HOST'});
0686684
02/05/25 20:52ID:BoqWmaHNすいません。だめでした。
0688うじゃぱぁ〜
02/05/26 00:16ID:owhpWvq3Perl勉強中の今日この頃です。
ttp://www23.tok2.com/home/tanaka/develop/threadbbs.html
↑このスレッド型掲示板に、二重投稿禁止機能を追加したいと考えております。
改造のアドバイスをいただけたらと思います。
よろしくお願いいたします。
0689nobodyさん
02/05/26 00:20ID:???0690nobodyさん
02/05/26 11:12ID:f4yr64/R$ENV{'REMOTE_ADDR'}取得して禁止すれば?
0693nobodyさん
02/05/28 07:18ID:???それじゃあ2重投稿じゃないじゃん
0694nobodyさん
02/05/28 09:44ID:???このスレで書きなさいと言われたので、こちらで質問します。
激しく初心者なのですが、掲示板の入力する項目に
「名前・メルアド・URL・本文」以外に年齢とか趣味とかの
項目を追加したいと思います。どうすればいいのでしょうか?
テスト用のサンプルとしてKENTさんのASKA BBSを使ってます。
http://www.kent-web.com/bbs/sample/aska.cgi
0695nobodyさん
02/05/28 10:02ID:???禿しく初心者と自分で言うくらいだったら、CGIの改造は止めた方が良いと思われ。
「初心者」という言葉を免罪符のように使われると鬱陶しく感じる人が多い。
とりあえず、テキストエディタでCGIを開いて、最初から最後まで読んでください。
ttp://tohoho.wakusei.ne.jp/wwwperl.htm が参考になると思われ。
//asuka.cgi
◎238行目くらいに
<tr>
<td><b>趣味</b></td>
<td><input type=text name=hobby size="$f_name" value=""></td>
</tr>
と追加。
◎335行目くらいからの「書きこみ処理」の中。特にunshift
この辺りを重点的に読んでみなさい。
上に書いたURLを参考にしながらasuka.cgiを読んでも分からない様だったら
質問スレで聞いてみる。くれぐれも「初心者だから・・・」という言い回しは禁物。
と、答えになって無さそうなのでsage
0696695
02/05/28 10:09ID:???KENTのasuka.cgiを読んだら、名前と内容(本文)で重複投稿をチェックしている。
if ($in{'name'} eq $name && $in{'comment'} eq $com) {
&error("二重投稿は禁止です");
}
0697補足
02/05/28 10:10ID:???($no,$date2,$name,$mail,$sub,$com,$url,$host2,$pw2,$time2)
= split(/<>/, $lines[0]);
0700nobodyさん
02/05/28 14:59ID:???今だ!700番ゲットォォォォ!!
 ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ̄ ̄ ̄
∧∧ ∧∧ ドドドドドド・・・・
(゚Д゚ ,,) (゚Д゚ ,,) ∧∧ (´´
⊂_⊂V⊂ ⊂ )⊂(゚Д゚ ,,)_/(´´
Y /⊃ | .L⊃∧∧∪ _⊃(´⌒(´
ドカ ∪∧∧J⊂(x _x⊂ノ(´⌒(´ (´´
ドカ ⊂(゚Д゚⊂⌒`つ≡≡≡(´⌒;;;≡≡≡
ズザ・・・
0701nobodyさん
02/05/29 20:11ID:xJVqUtLchttp://www.hoge.com/yybbs.cgi?bbs=0
と、すると「0」というディレクトリの中のset.cgiを読み込むようにしたいです。
0704703
02/05/31 00:09ID:bVzYO4Pwとか使えば?
0705nobodyさん
02/05/31 04:12ID:tYW7BBALこれこれ・この部分を付け加えれば画像アップ出来るよ!
というのを教えてください!
変数名くらいなら自分でも書きかえれますので、
そこらへんはお気を使ってもらわなくってもいいですYO!
よろしくおねがいします。
0707nobodyさん
02/05/31 04:27ID:???<form method="post" action="お気に入りのスクリプト" enctype="multipart/form-data">
0708nobodyさん
02/06/01 13:47ID:???<input type=file>
</form>
cgi側の処理についてはアップ機能付きのCGIソースを解析しれ。
0709由芽
02/06/01 21:03ID:???これってどういういみ?
0710由芽
02/06/01 21:05ID:???■ このスレッドは過去ログ倉庫に格納されています