■一覧に戻る■
HOMEに戻る
スクリプト改造工房 Part4
- 1 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/05 01:20 ID: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を用意すればなお良し)
を必ず明記しよう。
- 2 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/05 01:37 ID:DnrYj3PG
- www.azworks.org/~az/ さんのunico diary systemを使いたいのですが、
日付を1日もしくは半日ずらして表記させるにはどうすればいいでしょうか?
例えば、2/5の深夜(午前)に書き込んで、表示画面で2/4と表示させたいのです。
http://members.tripod.co.jp/gumboll/u_diary.txt
にアップしてみました。時間表記をさせるらしきところに★をつけておきました。
よろしくお願いします。
- 3 名前: 投稿日: 02/02/05 01:44 ID:???
- time
↓
time - 60 * 60 * 12; # 半日の例 1日なら24hだから「24」ね
- 4 名前: 2 投稿日: 02/02/05 01:52 ID:???
- >>3さん
即レスありがとうございます、うまく行きました!
嬉しいです。ありがとうございました!
- 5 名前: ナナシンボ 投稿日: 02/02/06 17:04 ID:dTW/dCg2
- 皆様お久しぶりです。
なんとか新着情報をトップページに表示する方法はわかったのですが、
open (IN,"./log/new_ys.cgi") || &error('オープンエラー','指定された書込みファイルが開けません。');
@LINES = <IN>;
close (IN);
このままだと必要以上に新着サイトが表示されてしまいます。
なんとかして表示できる件数と紹介文の文字数を指定できないでしょうか?
もしも可能な方がおられましたらご教授ください。
- 6 名前: ナナシンボ 投稿日: 02/02/06 17:21 ID:dTW/dCg2
- 追加です。サポート掲示板のをコピペですが。。。
# 新着サイトのデータを読み込む
open (IN,"./log/new_ys.cgi") || &error('オープンエラー','指定された書込みファイルが開けません。');
@LINES = <IN>;
close (IN);
# 表示したい場所に配列する。
foreach ( @LINES ) {
($Dno,$Dtitle,$Durl,$Dmark,$Dsyoukai,$Dkanricom,$Dkt,$Dtime,$Dbana_url,$Dpt,$Dip,$Dkey,$Ddate,$Dname)=split(/<>/,$_);
で
$Dkt=$_;
$Dkt=$dkt{$_};
if(length($dkt{$_}) > $CUT eq "s"){
$cu=$CUT-3; $dkt{$_}=substr($dkt{$_},0,$cu); $dkt{$_}.="...";
}
こんな感じのを加えて必要以上の文字列の場合は最後を...にしたいのです。
- 7 名前: ナナシンボ 投稿日: 02/02/06 17:31 ID:dTW/dCg2
- すごく一人でレスなんですが、カットはできてしまいました。
以外に簡単でした。
もう少し頑張ってみます。
- 8 名前: ナナシンボ 投稿日: 02/02/06 17:38 ID:dTW/dCg2
- あの解決してしまいました。。。
又,宜しくお願いします<(_ _)>
- 9 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/06 18:44 ID:???
- >>4-8
お疲れヽ(´ー`)ノ
- 10 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:19 ID:EP30XMzI
- perlに付け足してアクセスログをとる方法なんですが、
ブラウザの種類(携帯は機種も)、IP、SSID、日付、訪問回数等を
取得できる方法ありませんか?
今は
# 適当なファイルをopenして
open(LOG,'>>logfile');
# 情報を書き込む
print LOG "$ENV{'DATE'} $ENV{'HTTP_USER_AGENT'} $ENV{'REMOTE_HOST'} $ENV{'REMOTE_ADDR'}\n";
# ファイルをクローズ
close(LOG);
ってやってるんですが、1回のアクセスで同じ情報が数回残るんです。
ちなみに掲示板のCGIの上のほうにつけてるんですが。
- 11 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:47 ID:???
- >>10
前来てたよね。
確か何もかもわからないとか言って散々遊ばれた。。。
- 12 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:55 ID:???
- >>10
表示 1回。
書き込み 1回。
リロード 1回。
同一IPアドレスからは連続して情報を書き込まないようにすれば。
- 13 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:55 ID:???
- それじゃ解りまへん
自分が取りたい所で取れば良し
- 14 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:55 ID:???
- >>11
はい、来てました。
どうしても知りたかったのでこちらに質問させていただきました。
わかる人よろしくおねがいします。
- 15 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:55 ID:???
- >>10
>>12な俺も既に回答は放棄してるよ。
もう少し具体的に書かないと。
- 16 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 16:55 ID:???
- それ改造してんだろ? つーかSSID何かログれんのか?
自分で書いて何処でどう動いてるか分からんのか?
改造だったら改造スレにソース上げれば教えてくれるかもな
- 17 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 17:27 ID:Y1Zoz0Lg
- ttp://tackysroom.com/sample/smp_updown.cgi
のエレベーター掲示板に
ttp://botan.sakura.ne.jp/~ruuzu/rebbs/rebbs.cgi?mode=res&no=33&inyoumode=35#toukou
のように引用ボタンを取り付け、テキストエリアに引用を表示したいのですがよろしくお願い致します。
エレベーター掲示板のソース
http://www.geocities.co.jp/Milkyway-Lynx/2562/UPDOWN.txt
おおまかに余分な所を取ったソース
http://www.geocities.co.jp/Milkyway-Lynx/2562/UPDOWN2.txt
- 18 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 20:59 ID:???
- 上のはどっかで見たぞ コピペ返しか? w
>>10 コード見たら解りそうだが君の財布に幾ら入ってるかは誰も答えられない
今の情報で最善のレスは、一行づつずらして全部試せ、くらいだろうね
- 19 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/10 21:03 ID:???
- >>17
全然見てないけど。。
引用ボタンはまあ適当に付けて、
レス返信画面でボタンチェックして、
ログ開いて、s/<br>/>><br>/g;
じゃダメ?? ダメか・・・
- 20 名前: 10 投稿日: 02/02/10 23:10 ID:???
- >>18
一行づつずらして全部試せとはどこのことですか?
あまりよく理解できまいんですが?
- 21 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/11 00:18 ID:???
- あゆ板の設定の仕方がのってるページないでしょうか?
- 22 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/11 00:46 ID:???
- >>21
煽られないうちにDownload板に行った方がいいよ。
- 23 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/11 00:55 ID:???
- >>20
馬鹿
>>21
馬鹿
>>22
馬鹿
>>23
馬鹿
>>24
馬鹿
- 24 名前: <丶`∀´>←バカ 投稿日: 02/02/11 00:58 ID:???
- <丶`∀´>←バカ
- 25 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/11 05:03 ID:???
- >>20-24
(・∀・)バーカ
- 26 名前: 18 投稿日: 02/02/11 16:24 ID:???
- >20
理解っつうかネタなんだけど
君が>10に書いた事をコードの一番上から一行づつずらして貼り付けて
テストしてみればと言う事、3000行のコードなら3000回繰り返しね
どっかに書いてたが、いい回答はいい質問から
コピペの意味が解らなかったらPC初心者板で聞いてみよう
# 俺は消えるので後の人よろしく
- 27 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/11 17:08 ID:???
- >>26 俺もどっかで答えたんだけどコイツ駄目だよ
多分割れ板かなんかの恥ずかしいスクリプトの改造なんだろう
書けない読めないコードは出さないじゃどうしようも無い
よって放置ケテーイ
- 28 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/13 05:21 ID:wBlXKE9R
- あげ
- 29 名前: 17 投稿日: 02/02/14 18:32 ID:???
- >>19
ありがとうございました。
引用ボタン適当に付けて、ログ呼んで
">$comment3";
s/>/>/g;
s/<br>/\r>/ig;
で上手く出来ました。
- 30 名前: もにた 投稿日: 02/02/14 21:08 ID:74mkviDH
- ホームページを携帯電話から更新できるようにしたいと思い
http://www.bsp-net.com/
さんの
http://www.bsp-net.com/soft/MobileWebEditor.html
を使いたかったのですが
いかんせん、編集したいhtmlファイルのサイズが大きいため
携帯で全部表示されないわ、パケット代かかりまくるわで
困ってしまいました。
そこで、htmlファイル内に何か特定のコメント文を仕込んで
それをcgiが認識して、その部分のみを表示・編集できたら
いいなと考えてるんですが・・・
<html>
<body>
hogehoge
<!--[start]--!>
この部分を表示して編集できる
<!--[end]--!>
hogege
</body>
</html>
こんな感じで改造したいのですが、どうすればいいでしょうか?
- 31 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/14 21:12 ID:JQ2Gyegk
- >30
p-inとザウルスが、3ヶ月分のパケット代で買えるよ。
- 32 名前: もにた 投稿日: 02/02/14 21:19 ID:74mkviDH
- >31
いや、まぁそれはごもっともなんですが。
ハードを買うことへの抵抗と、基本料金が・・・
貧乏学生なんで、cgiで済ませたいという安直な考えです。
すいませんがよろしくお願いします。
- 33 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/15 02:50 ID:SfH5n30w
- プログラム経験なしの厨房です、すみません。
掲示板の「発言を下に下に伸ばしていける」スクリプトにしたいのですが、
勘でいろいろいじって「下へ伸びる形」にはやっとできたものの、
ログの最大書き込み行数を超えた時に超えた分を消していくこと
(最大行数$max_msgsを超える文の書き込み)ができなくて、困っています。
スクリプトはここhttp://www.geocities.co.jp/PowderRoom-Rose/8246/wwwboard.txtにあります。
とほほさんのところの過去ログhttp://tohoho.wakusei.ne.jp/lng/199904/99040143.htmを調べたり、
「wwwboard.tmp を作成する時点で、メッセージの個数($current_msgs)を求めて
おいて、.tmp から .dat へのコピーの際に、$current_msgs から
$max_msgs を引いた個数分、読み飛ばしを行えばよいでしょう」
という助言も戴いたのですが、具体的にどのように書けばいいのかがわからなくて……不勉強で申しわけないです、おしえてください。
- 34 名前: 賛成の反対の反対ナノだ! 投稿日: 02/02/15 04:15 ID:???
- > 33 その助言の内容からすると以下のようになるが、追加内容の末尾改行がないけど書き替えた?
#
# Append messages.
#
open(IN, "wwwboard.dat");
while (<IN>) {
print OUT;
}
$current_msgs= $.; ### ADD NEW
###〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
#
# Copy .tmp to .dat
#
open(IN, "wwwboard.tmp");
open(OUT, "> wwwboard.dat");
$msgs = 0;
while (<IN>) {
next if $current_msgs-- > $max_msgs; ### ADD NEW
- 35 名前: 33 投稿日: 02/02/15 04:47 ID:ZtkdPyAc
- はい、<BR>の自動追加は全部削りました。(ひょっとしてこのことではないですか?読み違えてたらすみません
- 36 名前: 賛成の反対の反対ナノだ! 投稿日: 02/02/15 05:14 ID:???
- # Write current message.
$FORM{'MESSAGE'} =~ s/[\r\n]+$//g;
$FORM{'MESSAGE'} =~ s/\r/<BR>/g;
;### ↑の処理後、↓の書きこみが行なわれて即、閉じられているので$FORM{'MESSAGE'}の
;### 最終文字は "\n" じゃないと思われる。
;### 1データを1行で管理するタイプのスクリプトだと思うのでこれではデータ毎の区別が
;### つかないような...(気のせい?)
# 挿入するもの↓。改行とか、スペースとか。
print OUT "$FORM{'MESSAGE'}";
close(IN);
close(OUT);
- 37 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/15 05:17 ID:???
- >>35
質問に答えた人じゃないけど…
<br>というより\nがないとログが一行になっちゃうよ?
\nが無いとwhileで廻せないと思うんだけど。
print OUT "$FORM{'MESSAGE'}<br>\n";
- 38 名前: 37 投稿日: 02/02/15 05:19 ID:???
- >>36
スミマセン…
- 39 名前: 33 投稿日: 02/02/15 05:21 ID:qJwMiHXl
- うおぉォ……、できましたッ!httpd起動させ、
>>34さんのスクリプトを実行し、完全解決致しました!
>34さん、あなた、「神」です!
本当に、本当にありがとうございました!
あなたが宗教開いたらぼく、入るかもしれません。
- 40 名前: 33 投稿日: 02/02/15 05:23 ID:qJwMiHXl
- あ、そうなのですか!\nいれときます、ありがとうございます!
- 41 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/15 05:27 ID:???
- >>40
いや、出来たのなら、それで良いんだとおもいます。
かぶちゃったからゴメンナサイしただけで…。
良かったね。
- 42 名前: 33 投稿日: 02/02/15 05:29 ID:qJwMiHXl
- よかったです……。
2chきてこんなありがたい思いしたのはじめてです、ありがとうございました!
- 43 名前: 賛成の反対の反対ナノだ! 投稿日: 02/02/15 05:41 ID:???
- 宗教にかんしては、今しばらくおまちください。
いそいで勧誘のチラシを刷っているところです。
「最高ですか〜〜!!」「これが定説です。」うーんチョット違うナー。
- 44 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/15 18:57 ID:JdM/hpw9
- >>30
の問題を解こうとして、<!--start-->の所に書き込みを挿入していくのは
まあ表面上だけはできたのですが、どうもコメントタグに囲まれた部分を
編集するのとはちょっと違うなぁということに気が付きました。。
まだしばらくいじってみるかもしれませんが、一応模範解答みたいなのも
欲しいので、お願いできませんでしょうか。
元ソースは http://www.miniflo.com/cgi/up/source/040.txt
しょぼいじりかけは http://www.miniflo.com/cgi/up/source/042.txt です。
あと、元ソースのprintに相当する所の書き方は、これ真似したほうがいいんでしょうか?
実は、こういう書き方のほうが後々応用がきくとかですかね。
- 45 名前: 賛成の反対の反対ナノだ! 投稿日: 02/02/16 06:55 ID:???
- > 44 これでどう? 実際に実行してないけどこんな感じでは..?
#!/usr/local/bin/perl
(my $script= $0 )=~ s/^.*[\/\\]//g;
my( $passwd )= 'abcd';
my( $jcode )= './lib/jcode.pl';
my( $tmpFile )= "${script}_$$.tmp";
my($html,$name,$do);
my( %FORM );
require $jcode; &decode;
&Html('パスワード未設定') unless $passwd; &Html('Top Page') unless %FORM;
&Html('Password Input Error!') if $FORM{'pass'} ne $passwd;
&Html('No Data') unless ($html= $FORM{'html'})=~ tr/\r\n//d or $html;
open(IN, $FORM{'file'}); eval{ flock(IN, 1) }; open(TMP, "+<$tmpFile"); eval{ flock(TMP,2) }; truncate(TMP, 0);
(seek(IN, 0, 0) && seek(TMP, 0, 0)) or &Html('File Open Error!');
while (<IN>){
if(/(.*)<!--start-->/ .. /<!--end-->(.|\n)*/){
print TMP $& if $do && $1;
print TMP "$&\n$html\n" unless $do++; next;
}
print TMP $_;
}
close(IN); close(TMP); rename($tmpFile, $FORM{'file'}) ? &Html('Edit OK!') : &Html('Edit Error!');
sub decode{
read(STDIN, $_, $ENV{'CONTENT_LENGTH'}) unless $_= $ENV{'QUERY_STRING'};
for ( split('&') ){
($name, $_)= split('=');
tr/+/ /; s/%(..)/chr(hex($1))/eg; # s/<!--[^\-]*-->//g;
&jcode::convert(\$_,'sjis'); $FORM{$name}= $_;
}
}
sub Html{
print <<HTML;
Content-type: text/html
<HTML><BODY><FORM ACTION="$script" METHOD=POST>File:<INPUT name=file><BR>Pass:<INPUT name=pass><BR>
<TEXTAREA COLS=20 ROWS=5 NAME=html></TEXTAREA><BR><INPUT TYPE=submit VALUE=Edit> <INPUT TYPE=reset VALUE=Reset><HR>$_[$[]</FORM></BODY></HTML>
HTML
exit;
}
- 46 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 12:39 ID:C81G2/9S
- メールフォームのCGIで、
http://www.kzm-pt.com/seimei/form.htmlのサイトさんの様に
@マークより前のアカウント部分のみ記入したら送信できるようにしたいのですが
よくわかりませんでした。
CGIはテキスト形式にしてアップしてみました。
こちらhttp://stormy.fc2web.com/webform.txt
どなたか教えてください。
よろしくお願いします。
- 47 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 12:44 ID:???
- if (!($value =~ /(.*)\@(.*)\.(.*)/)) { $value = ""; }
を
if (!($value =~ /(.*)\@(.*)\.(.*)/)) { $value = $1; }
- 48 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 13:05 ID:C81G2/9S
- >>47
変更してみましたが、
「Eメールを入力してください」というエラーが出てきてしまい
変わらず送信できませんでした・・・
- 49 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 13:26 ID:???
- if (($value =~ /(.*)\@(.*)\.(.*)/)) { $value = $1; }
- 50 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 16:42 ID:???
- >>49
有り難う御座いました。出来ました。
本当に感謝してます。
- 51 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/16 21:46 ID:???
- >>47,49
なんかカコイイ
- 52 名前: 厨房perler 投稿日: 02/02/17 08:30 ID:???
- スクリプトを書いたのですがなんかグロいです。助けてください!
if($a =~ /@@@@/){ print $a; }
if($b =~ /□ □/){ print $b; }
if($c =~ / ◎/){ print $b; }
- 53 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/17 21:49 ID:???
- 質問させて下さい。
チャットなんですが、一般的にログは下から上へ流れますよね?
これはスクリプトで定義されているんでしょうか?
Niftyなんかですと、上から下へとログが流れるので
出来れば、そういう仕様のチャットに改造してみたいんです。
探してみたんですけど見つからないので、改造で何とかなるなら
頑張りたいと思い、質問してみました。
すみませんが、分かる方いらっしゃったらよろしくお願いします。
- 54 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/17 23:07 ID:???
- >>53
???
cgiでやってるチャットなら普通だいたい新しいのが上じゃない?
- 55 名前: 53 投稿日: 02/02/17 23:27 ID:???
- >54
ええ、新しいのが上にきますよね?
それを新しいのが下にくるように出来たらいいなと思ってるんです。
それで、その流れを決めてるのはスクリプトなのか
改造可能なのかが知りたかったんですよ。
- 56 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/17 23:32 ID:???
- >55
通常、新しいものが上に来るようにするためには、
正順に記録されたログを@LINEのような配列に読み込み、
reverseします。
- 57 名前: 53=55 投稿日: 02/02/18 00:07 ID:???
- >56
ありがとうございます!
ということは正順に並んでいるログをわざわざ逆転させてるんですね。
おっしゃってるのは
foreach (@lines) {
if ($str2 ne '') { if ($_ =~ /$str2/) { next; } }
elsif ($str1 ne '') { if ($_ =~ /$str1/ && $_ =~ /$host/) { next; } }
if (++$i >= $max) { last; } else { push(@new, $_); }
}
if ($str1 eq '' && $str2 eq '') { unshift(@new, $val); }
この辺りのスクリプトでしょうか。
ログ保存の部分にあった@LINEなんですけど。
- 58 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/18 00:17 ID:???
- >57
うん。そのforeachのまえで、
@lines = reverse @lines;
というような処理を入れてあげるとひっくり返る。
- 59 名前: 53 投稿日: 02/02/18 04:46 ID:???
- @lines = reverse @lines;
を入れてみました。出来たー!と思ったのも束の間…。
ログがですね
6
4
2
1
3
5
というように奇数行は希望通りに上から下なのに
偶数行は下から上という流れになってしまいました(汗
多少のカスタマイズが出来るくらいで、スクリプト自体が読める
訳ではないので詰まってしまいました。
あとは何が足りないんでしょうか。
以前からミスってた部分の見直しとかしてたら
こんな時間になってしまった…。
いい加減に寝ておこう。
- 60 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/18 14:16 ID:???
- age
- 61 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/18 14:20 ID:???
- インターリーブっぽく記録されてたり。
もう一つデータ管理してる変数無い?
- 62 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/18 18:09 ID:UxBPmNlO
- http://homepage1.nifty.com/~studio/prog/srch/index.htm
この検索エンジンに、完全一致と項目別検索の機能を盛り込みたいんですが、
どうすればよいでしょうか?データファイルはCSVになってます。
- 63 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/18 19:32 ID:???
- ソース読むのめんどくさい(;´Д`)
ある程度目星付けてくれれば協力するかも。
- 64 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 04:48 ID:???
- 朝なんであげとくね
- 65 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 09:11 ID:bQza7qr8
- KENTさんのLight bordにIPとホストを両方とりたいのですが
今の掲示板では片方しか取得する事が出来ません。
両方取得出きる方法を知りたいんです。
設定のところに
# ホスト名取得モード
# --> 0 : $ENV{'REMOTE_HOST'} で取得できる場合
# --> 1 : gethostbyaddr で取得できる場合
$get_remotehost = 0;
↑のようなソースがあり、ホスト名取得は
## --- ホスト名取得
sub get_host {
$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($get_remotehost) {
if ($host eq "" || $host eq "$addr") {
$host = gethostbyaddr(pack("C4",split(/\./,$addr)),2);
}
}
if ($host eq "") { $host = $addr; }
}
↑のようになっているんですがこれを変えてログへの書き込み処理を変えれば可能ですよね?
ログへの書き込み処理は自分でやれると思いますので↑に書いた部分をどう変えれば両方取得出来るか
教えては頂けないでしょうか?↑はifってなってるのでそのままifを消したりしたんですけど当然ダメでした。
おぉ力也か。え?やっぱり行ける?もう取り消しの電話入れちまったじゃねぇかよ。
- 66 名前: 65 投稿日: 02/02/19 09:13 ID:bQza7qr8
- 一番下の力也ってやつは見なかった方向でお願いします。
- 67 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 09:58 ID:uiFxg8op
- >65
そこはIPとリモートホストのルーチン部分だ。
記載している場所はほかにあるから、
$hostで検索して、printしてるところを見つけれ。
- 68 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 09:59 ID:uiFxg8op
- あと、力也には、優柔不断にぐたぐた言うなっていっとけ。
- 69 名前: 1ファンより 投稿日: 02/02/19 12:49 ID:???
- 力也の再登場を願って止みません
- 70 名前: 65 投稿日: 02/02/19 13:03 ID:bQza7qr8
- >>67
あそこじゃないんですか!?
あそこだと確信してたんですけども。
どこなんでしょう?いくら探しても他にホストやIPを取得してるような所は見当たらないんですけど。
もしよかったら探してくれませんか?めんどくさいですか?てめーでやれカスですか?
↓がソースです。それと力也ネタは勘弁して下さい。力也は忘れてください。
http://csx.jp/~hage/light.txt
- 71 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 13:05 ID:???
- >>70
だから彼は「表示するところを探せ」と言っているが。
printが表示する命令だと知らないのか?大変だぞ。
- 72 名前: 65 投稿日: 02/02/19 13:50 ID:???
- >>71
あっそうですね。でもprintを探すんですか?
でも今のままだと$hostにipかホスト名のどちらかしかを書き込むので片方しか取得できないんです。
printを探すのはIPとリモートホストのルーチンを書き換えたあとの話しでは?
printを探してログへの書き込み処理を変えるのは私でも出来ると思うのでですが
どうすればifという形式ではなく両方を取得できるのかを知りたいんです。
教えてもらえますか?
てめーなんかに教えるぐらいならダンゴ虫に教えた方がマシだボケですか?
- 73 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 14:02 ID:uqUI0/lz
- >71
thx!
>72
みてみた。4カ所ほど変更する必要があるので、手間がかかり教えるのが面倒くさい。
しゃれのつもりなんだろうが、質問の仕方がカワイゲないので
心を入れ替えるまで放置することにした。
誰か優しい人が教えてくれるかもしれない。
ref.>もしよかったら探してくれませんか?めんどくさいですか?てめーでやれカスですか?
ref.>てめーなんかに教えるぐらいならダンゴ虫に教えた方がマシだボケですか?
- 74 名前: 65 投稿日: 02/02/19 14:18 ID:bQza7qr8
- >>73
ID違うけど>>67さんかな?
いや、なんか普通の文じゃつまらなくてレス返ってこないかな?と思ってつけたしたんですけど…
自分ではわからないながらも表示以外のところは結構簡単にできるような気がしてたんですけど4個所もあるんですか。
それじゃあ仕方ないですね。そちらにはメリットなにもありませんし。
誰か教えてくれるまで気長に待ちます。
- 75 名前: 67 投稿日: 02/02/19 14:24 ID:uqUI0/lz
- >74
うんそう。
ここそんなに住人多くないって(笑)。
んで、ちょとカワイゲある文章になったので関心が戻ったりして。
このスクリプト、ログにリモートホストかIP残すだけで、画面表示しないんだな。
改造自体はそんなに大変ではないと思う。問題は、うまく行かないときのでバッグだな。
- 76 名前: 67 投稿日: 02/02/19 14:29 ID:uqUI0/lz
- 224行目:
($number,$date,$name,$email,$subj,$comment,$url,$host,$pwd)
を
($number,$date,$name,$email,$subj,$comment,$url,$host,$addr,$pwd)
に変更。
335行目;
unshift(@lines,"$number<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>\n");
を
unshift(@lines,"$number<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$addr<>$ango<>\n");
に変更
656行目:
($number,$date,$name,$email,$subj,$comment,$url,$host,$ango)
を
($number,$date,$name,$email,$subj,$comment,$url,$host,$addr,$ango)
に変更
666行目:
($number,$date,$name,$email,$subj,$comment,$url,$host,$ango)
を
($number,$date,$name,$email,$subj,$comment,$url,$host,$addr,$ango)
に変更。
多分これでうまく行く。
- 77 名前: 65 投稿日: 02/02/19 14:45 ID:bQza7qr8
- >>76
おおおぉぉぉッ!
出来ましたッ感動です!
ってゆーかそれと全く同じように昨日やったんですけど出来なくてこれじゃダメなんだなぁって
思ってたんですけど昨日やった時はたぶんどっか間違ってたんですね〜。
一回試して>>65で挙げた部分を改良してから>>76さんのようにやれば出来ると思い込んでました。
それだけでよかったんですか〜あ〜出来てすっごい嬉しいです。
たぶん誰にもレスされないで終わるだろうなと思ってましたし。
昨日から徹夜でやっててそろそろ限界だったんですけどこれで目が覚めました。
本当にありがとうございました。
- 78 名前: 67 投稿日: 02/02/19 15:04 ID:???
- >77
単純なタイプミストかがあったんだと思う。
どちらにしてもよかった。
- 79 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/19 15:54 ID:???
- age
- 80 名前: 53 投稿日: 02/02/19 19:37 ID:???
- チャットのログを改造していたがっていた者です。
教えて頂いたreverseだと奇数が元のままなので悩んだまま
止まってましたが、聞く前に調べる努力をしてなかったので
本屋に行って見てきました(始めから行けって言わないで下さい。
まず改造出来るものかどうか知りたかったんです)
reverseでなくsortで試したところ、新しいログが下にくるように
なりました!
一番新しい発言だけが上にくるんですけど、今はとりあえず流れが
望んだ通りになったんで嬉しいです。
CGIを勉強してみたくなりました(笑
ご助言、どうも有難うございました。
- 81 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/20 04:49 ID:???
- 定時あげ
- 82 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/22 15:28 ID:9ER9/CDB
- サルでありますが、CGIの添削をお願いできませんでしょうか。
2chのsubback.htmlにsocket→sort→diffをかけるものです。
こんがらがったので2つに分けたままなのですが
sockt部が http://nogdnik.s3.xrea.com/sagepicker/client.txt
sort,diff部が http://nogdnik.s3.xrea.com/sagepicker/diff.txt
であります。
動作は http://nogdnik.s3.xrea.com/sagepicker/
で一応動いたのですが、どう考えてもソースが汚いと思われる上に
余計な(サーバに負荷をかけるような)動作も行っている気がします。。
スマートな解法等ありましたら、宜しくお願い致します。
- 83 名前: 真木素人 投稿日: 02/02/24 00:20 ID:VkuFVpRf
- ttp://www.area-s.com/main/missinglink.html
↑MissingLinkのナレーションBBSのおねえさんといっしょを
HPに設置したいんですけど、改造&設置の仕方がわかりません
ナレーションBBS2.1とおねえさんといっしょのキットは
DLして解凍まではわかったのですが、そのあとが…
改造はおねえさんといっしょのキットをそのまま使いたいのですが…
改造のしかたと設置のしかた教えてください
お願いします
- 84 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/24 01:57 ID:???
- 設置もできないくせに改造しようなんて思うな
- 85 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/24 10:24 ID:???
- 設置の仕方なんかそのサイトで聞けよな
- 86 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/24 14:43 ID:???
- http://pc.2ch.net/test/read.cgi/perl/1013594041/989
- 87 名前: わかりません 投稿日: 02/02/27 12:01 ID:/Q61BdR8
- if($i_photo_chk eq 'url'){
@photo_urls=("$i_photo_url1","$i_photo_url2","$i_photo_url3");
foreach(@photo_urls){
if($_ ne ''){
if($_ =~ /^http.*jpg$/){
$i_comment = "$i_comment<br><IMG src=\"$_\">";
}else{
&print_error("写真URLの入力が正しくありません。注意&解説を参照して確かめてください。<br>Macintosh環境でも拡張子(.jpg)をつけて下さい。");
}
すみません。
↑ここらへんで拡張子JPGだけしか選べなくなってるのを、gifも選べるようにしてあげたいんですが、
どうしたらいいですか?つまり、JPGとGIFを認めてあげたいんですが・・・。
エラーばっかりでわけわかめです。
誰か教えて下さい。お願いします。
- 88 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 12:39 ID:???
- if($i_photo_chk eq 'url'){
@photo_urls=("$i_photo_url1","$i_photo_url2","$i_photo_url3");
foreach(@photo_urls){
if($_ ne ''){
if($_ =~ /^http.*gif$/ || $_ =~ /^http.*jpg$/){ #←ココ
$i_comment = "$i_comment<br><IMG src=\"$_\">";
}else{
&print_error("写真URLの入力が正しくありません。注意&解説を参照して確かめてください。<br>Macintosh環境でも拡張子(.jpg)をつけて下さい。");
}
PNGとか追加して多くなるようだったら配列使うほうが楽かも。
- 89 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 13:28 ID:???
- もっとスマートに書けるでしょう……
しかもチェックも甘いし。まぁ他人事だからいいけど。
m#^http://[^/]+/.+\.(?:jpg|gif)#i
- 90 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 13:29 ID:???
- (?:jpg|gif)$
- 91 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:16 ID:uzDDNMO0
- 少し脳みそを貸して下さい。
返信できる掲示板を改造し、親記事への返信に対してradioboxで5段階の採点
ができるようにしました。が、たまに採点がおかしくなります。
1ページに表示されている全ての返信記事に一気に採点できるようにしました。
$noは親記事のNo. $res_noは返信記事のNo.です。
簡単に書きます。
-------■フォーム部分■---------
[最高:<INPUT TYPE=RADIO NAME=\"($no)-$res_no\" value=5>]
[良い:<INPUT TYPE=RADIO NAME=\"($no)-$res_no\" value=4>]
のようなものをあと3つ
-------■フォーム部分■---------
- 92 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:16 ID:uzDDNMO0
- ログの形式:<>で区切ってます。
$x1が親記事の番号で$x2が返信記事の番号です。
行の最後に採点のためのデータを6つ追加しました。
$xjが合計点で、$xe〜$xiまでが各採点の数。
-------■ログの形式■---------
130<>1<>名前<>タイトル<><><>親記事のコメント<>#ff6633<><><>02/02/26(Tue)02:29<>0.XuCN0FGrIKQ<>1014702931<>0<>0<>0<>0<>0<>0<>
(130)<>1<>名前<>タイトル<><><>親記事への返信のコメント<>#ff6633<><><>02/02/26(Tue)02:29<>0.XuCN0FGrIKQ<>1014702931<>0<>0<>0<>0<>0<>0<>
-------■ログの形式■---------
- 93 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:20 ID:uzDDNMO0
- 2重カキコとか言われて書き込めん!
- 94 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:20 ID:uzDDNMO0
-
ログから全記事を@all_linesに読み込む。
while (($key, $value) = each %in){
if( $key =~ /^%28\d+%29-\d/ ){
$key =~ s/^%28(\d+)%29-(\d+)/$1,$2/ ;
foreach (@all_lines) {
if( /^\($1\)<>$2/ ){
my($x1,$x2,$x3,$x4,$x5,$x6,$x7,$x8,$x9,$xa,$xb,$xc,$xd,$xe,$xf,$xg,$xh,$xi,$xj)=split(/<->/);
if($value == 5){ $xe = $xe+1 ;}
elsif($value == 4){ $xf = $xf + 1;}
elsif($value == 3){ $xg = $xg +1;}
elsif($value == 2){ $xh = $xh +1;}
elsif($value == 1){ $xi = $xi +1;}
else{ エラー処理;}
$xj = ($xe * 5) + ($xf * 4) + ($xg * 3) + ($xh * 2) + ($xi * 1);
push(@new, "$x1<>$x2<>$x3<>$x4<>$x5<>$x6<>$x7<>$x8<>$x9<>$xa<>$xb<>$xc<>$xd<>$xe<>$xf<>$xg<>$xh<>$xi<>$xj<>\n");
}else { push(@new, $_ );}
}
$#all_lines = -1 ; #これは必要?
@all_lines = @new ;
$#new = -1 ;
}
}
@all_linesをファイルに書き込む。
- 95 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:26 ID:uzDDNMO0
- 受け取り側がすごく間抜けなコーディングですが、
もっとスマートな方法はないものでしょうか?
さらにバグがあるようです。たまに採点した以上に採点の数が増えます。
よろしくお願いします。
- 96 名前: わかりません 投稿日: 02/02/27 15:49 ID:/Q61BdR8
- ありがとうございます!!感謝感激です。
ところで、
@@@@@@@@@@@@@@@@@@@@@@@@@@
sub upnote {
local($get_pf_name)=shift;local($pffno)=shift;
if($file_name{"$get_pf_name"} =~ /jpg$/){
$psc=0;
$file_len=length($file_data{"$get_pf_name"});
if($file_len<=0){
&print_error("画像が選択されていません。");
}elsif($file_len>=$photo_max_size*1024){
&print_error("$photo_max_size\KB以下の画像しか指定できません。");
}#--end
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
↑ここの部分も、JPGしかアップロード出来ないんですけど、これもGIFをアップロードしたいのですが・・・。
- 97 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/27 15:54 ID:???
- >>96
たよってたよって大正解。
- 98 名前: わかりません 投稿日: 02/02/27 16:09 ID:/Q61BdR8
- >>97
まじ途方にくれてたので大正解っす。どこいじってもエラーになってわけわかりまっしぇん!
要は「JPGだけじゃなくGIFも使いたい」ってことだけなんですけどね・・・。
- 99 名前: 名無しさん@お腹いっぱい。 投稿日: 02/02/28 20:48 ID:cUMoNmua
- PHPのファイルあぷろだなんだけど
初期設定のアップロード制限意外に
デフォルトで2Mが限度になってるみたいなんだけど
その制限をとっぱらうにはどうしたらよいでしょ?
アドバイス頂けませんでしょうかm(_ _)m
↓ソース
http://www.geocities.co.jp/Milkyway-Lynx/2562/upload.txt
- 100 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/01 02:13 ID:???
- 2ch型の掲示板です。
レス書き込みの際、メール欄に「dame」と入れることによって
スレッドの配置を一番下に移動させる機能を付けたいのですが
解る方いましたら宜しくお願いします。
↓掲示板の外観です
http://www.42ch.net/UploaderGeneral/source/224.htm
↓メインのスクリプトです
http://www.42ch.net/UploaderGeneral/source/225.txt
- 101 名前: 100 投稿日: 02/03/01 02:24 ID:enmjRXxk
- (レスのチェック部分です)
# - レス付与 -------------------------------------
sub res {
〜〜〜〜〜〜〜
# age_______________________________
if (!$sage) {
push(@DATA,splice(@DATA,$no,1));
}
〜〜〜〜〜〜〜
}
# - フォームチェック ------------------------------
sub formcheck {
〜〜〜〜〜〜〜
# E-mailチェック____________________
if ($mail =~ /sage/) {
$sage = 1;
}
〜〜〜〜〜〜〜
}
- 102 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/01 02:47 ID:???
- >101
スクリプト読んでないけどこれでどうかな?
〜〜〜
#age____
if (!$sage) {
if ($dame) {
unshift(@DATA,splice(@DATA,$no,1));
}
else {
push(@DATA,splice(@DATA,$no,1));
}
}
〜〜〜
〜〜〜
# E-mailチェック____
if ($mail =~ /sage/) {
$sage=1;
}
elsif ($mail =~ /dame/) {
$dame=1;
}
〜〜〜
- 103 名前: 100 投稿日: 02/03/01 03:32 ID:???
- >>102
ありがとうございます!
今試してみたんですが、なんか500エラーになってしまいました…。
もう一回やってみます。。
- 104 名前: 102 投稿日: 02/03/01 03:38 ID:???
- >103
全角スペースで字下げしてるから,そのままコピペじゃ動かないです。
半角スペースに置き換えてください。
- 105 名前: 100 投稿日: 02/03/01 04:16 ID:???
- >>104
DATファイルにもちゃんと書き込まれて、スレッドも下がりました…!
ただ、トップ表示と一覧表示でデータを読み込めないみたいです。。
http://www.42ch.net/UploaderGeneral/source/226.htm
- 106 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/01 04:46 ID:???
- >105
スマソ,さっきのでログ壊れたかも。
unshift(@DATA,splice(@DATA,$no,1));
を
unshift( @DATA, (shift(@DATA),splice(@DATA,$no,1)) );
に変えるとどうかな
- 107 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/01 05:03 ID:jSI4cIj+
- >>99
サーバーの設定で制限さてれるんじゃない?
http://www.php.net/manual/ja/function.ini-set.php
http://www.php.net/manual/ja/configuration.php
- 108 名前: 100 投稿日: 02/03/01 20:20 ID:???
- >>106
下の方に書き替えたら、壊れなくなりました!
しかし今度は、「書き込んだスレッドの一つ上にあるスレッド」が
一番下に下がるようです...(;´Д`)
- 109 名前: 99 投稿日: 02/03/02 10:48 ID:???
- >>107
ありがとうございます。
何故か5Mまでしかあぷ出来ませんが
スクリプトのせいじゃないのがわかっただけでも助かりました。m(_ _)m
- 110 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/04 19:46 ID:xVeLh+HA
- ずるぼんあぷろだ
ttp://zurubon.strange-x.com/upload.txt
のトップページをhtmlファイルとして吐くように改造していただけませんでしょうか?
無理なお願いかもしれませんがよろしくお願いします
- 111 名前: 名無しさん@お腹いっぱい。 投稿日: 02/03/04 23:36 ID:???
- > 110
意味がわかりづらいが、トップページをリクエストするとHTML形式の
ファイルをダウンロードするってこと?
- 112 名前: 110 投稿日: 02/03/04 23:54 ID:xVeLh+HA
- http://www2.makani.to/akutoku/upload/index.html
のようにトップページはhtmlとして吐き出させて負荷を減らし
アップロード作業や2ページ目以降の表示をCGIにさせたいのです
わかりにくくて済みません
- 113 名前: nobodyさん 投稿日: 02/03/05 00:10 ID:???
- >>110
perl勉強中だけど、答えてみる。
index.htmlをopenして、「sub html」の中の表示部分をそっちに吐くようにすればいいんじゃないかな。
他にも弄るとこあるかもしんないけど、そこは識者にお任せします。
- 114 名前: 111 投稿日: 02/03/05 00:23 ID:???
- 単純にこれをCGIとして実行したときのトップページのHTMLをファイルとして
用意するとできるのでは? だいたい以下の感じに。(■■■部分は呼び出すCGI)
<FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="http://■■■" >
アプするファイル<strong>(300 Kまで)</strong><br>
<INPUT TYPE=file SIZE="40" NAME="filedata">
<select name="ext">
<option value="ext" selected>特殊拡張子選択
<option value="css">css
<option value="csv">csv
<option value="htm">htm
</select>
<br>コメント<i><small>(※コメント無記入の場合リロードになります
/URLはオートリンクします)</small></i><br>
<INPUT TYPE=text SIZE="45" NAME="comment">
<INPUT TYPE=submit VALUE="Up/Reload" class="button"><INPUT TYPE=reset VALUE="Cancel" class="button"><br>
</FORM>
- 115 名前: 110 投稿日: 02/03/05 06:37 ID:ZPKxkzAd
- >113
openでhtmlファイルを開いてprintするところまでは思いついたのですが、
クッキーを使った環境設定や、print_postdataとの絡みが分からずに挫折しました
>114
???
済みません、意味がわからないです
- 116 名前: nobodyさん 投稿日: 02/03/05 20:29 ID:???
- 先にhtmlファイルを作ってから
クッキーをはいてLocationでhtmlファイルに飛ばせばよい。
htmlファイルを作る処理はprint_postdataなどを直接弄ると
副作用があるので、コピペで名前を変えた関数を作って
ファイルに書き出すようにすればよい。
- 117 名前: nobodyさん 投稿日: 02/03/06 15:45 ID:???
- 改造依頼なのですが。。
ReverseAccess(逆アクセスカウンタ)
http://www.cj-c.com/
スクリプト
http://waiwaiwai_00.tripod.com/access.txt
http://waiwaiwai_00.tripod.com/acmgr.txt
http://waiwaiwai_00.tripod.com/set.txt
私のサイトに上記の逆アクセスカウンタを設置しているのですが、
私のサイトにリンクを貼っていただいている方の中で、
自分が一番でないと気が済まない負けず嫌いな方がいるのです。
続く。。。
- 118 名前: nobodyさん 投稿日: 02/03/06 15:56 ID:???
- 続き。。。
たとえばhttp://pc.2ch.net/から私のサイト(http://hoge.com/)にリンクされているとして、
毎日、*.2ch.net及び012.345.678.*というリモートホスト・IPアドレスを駆使して
http://pc.2ch.net/からhttp://hoge.com/にアクセスしまくってhttp://pc.2ch.net/のランキング順位をつり上げてくるのです。
おまけに、http://pc.2ch.net/001.html、002.html、003.html、…を作成して、
そこからも波状攻撃を仕掛けてくるのです。
普通ならpc.2ch.netをカウントしないようにset.txtに書き込めばいいのですが、
http://pc.2ch.net/からは普通(?)のアクセスもあるのです。
そこで不正排除のため、*.2ch.net及び012.345.678.*のみ(指定したリモートホストやIPアドレス)を
カウントしないように改造お願いできないでしょうか?
- 119 名前: nobodyさん 投稿日: 02/03/06 16:00 ID:???
- http://hoge.com/が本当に存在するというのがヘボナイス
- 120 名前: nobodyさん 投稿日: 02/03/07 01:54 ID:WTUe3Qf1
- >117-118
警告書いて,それでもダメならカウントしないほうにするほうがいいんじゃない?
改造してもいたちごっこになるだけと思われ。
- 121 名前: nobodyさん 投稿日: 02/03/07 08:25 ID:???
- >>117-118
動くか試してないけど。
set.cgiの
1;#削除不可
の上辺りに
@AbornLink = ("*.2ch.net","*.yahoo.co.jp");
@AbornHost = ("127.0.0.1","1.2.3.*","anonymizer.com","squid");
を追加。
access.cgiの
#--- ここまで ----------*
の下に
&aborn;
sub aborn {
for (@AbornLink) { s/([.@%$\])/\\$1/g; s/\*/.*?/g; &haa() if $ENV{HTTP_REFERER} =~ /$_/i }
for (@AbornHost) { s/([.@%$\])/\\$1/g; s/\*/.*?/g; &haa() if $ENV{REMOTE_HOST} =~ /$_/i or $ENV{REMOTE_ADDR} =~ /$_/ }
}
sub haa {
print <<_HTML_;
Content-type: text/html
(゚д゚)ハァ?
_HTML_
exit;
}
を追加。
- 122 名前: 110 投稿日: 02/03/07 18:21 ID:???
- >>111-116
遅くなりましたが有難うございます
頑張ってみます
- 123 名前: 利用者 投稿日: 02/03/08 06:39 ID:???
- チャットの参加者表示なんですが、room1に人がいる時にroom2に入ると、参加者してる人の名前が表示されなくなります。
この書き方ではおかしいんでしょうか…?
- 124 名前: 利用者 投稿日: 02/03/08 06:40 ID:???
- …と失礼。
問題の部分の簡易スクリプトです。
http://upsenyou.tripod.co.jp/test.text
- 125 名前: nobodyさん 投稿日: 02/03/08 06:42 ID:w/NM/Dyo
- あげれ
- 126 名前: 利用者 投稿日: 02/03/08 06:42 ID:???
- なんかこれも表示がおかしいですね…
申し訳ないですが、ソースを出して見てください…
- 127 名前: nobodyさん 投稿日: 02/03/08 07:00 ID:yTPx6PIp
- 質問です。
メールフォームで、メールの送信先を、曜日毎に変えたいのですが、
どうすればよろしいでしょうか。
フリーのメールフォームを改造して作ろうとしているのですが、
Perlに関しては初心者で、手がでない状態です。
どなたか、どうぞよろしくお願い致します。
改造しようとしているCGIで、メールの宛先は、
configファイルに
$MailTo = 'honya@honya.com';
として明記し、CGI本体で
$MAILTO = &config::MAILTO;
というふうに読み込ませる形になってます。
- 128 名前: nobodyさん 投稿日: 02/03/08 07:53 ID:???
- localtimeの返値の最後に曜日のデータが渡される。
- 129 名前: nobodyさん 投稿日: 02/03/08 17:42 ID:???
- 【Perl】初心者コーナーPart10
http://pc.2ch.net/test/read.cgi/php/1014556702/289-
そのうち現れると思いますが。
たらい回しにされて可愛そうなので答えてあげてください。
ていうか答えるのは同じ人間ぽいけどなー。w
- 130 名前: nobodyさん 投稿日: 02/03/08 23:27 ID:???
- つうか、最近お前ら、こことか初心者スレとか見てないだろ
- 131 名前: nobodyさん 投稿日: 02/03/09 06:45 ID:???
- 一生懸命回答している何人かを、粘着馬鹿が追い出しました
ただでさえ人少ないのに。
- 132 名前: nobodyさん 投稿日: 02/03/09 09:35 ID:???
- >>131
あゆあゆもいなくなったな。。。
- 133 名前: 110 投稿日: 02/03/09 18:16 ID:???
- こんにちは、以前ずるぼんあぷろだのトップページhtml化をお願いした110です
指導のおかげでhtmlファイルは吐き出すようになったのですが、投稿・削除
したときに http500 内部サーバエラー となってしまいます
(htmlファイル自体はちゃんと吐き出される)
もう一度ご指導頂きたく思います
改造後のスクリプト(.cgiに変換してください)
ttp://hpcgi3.nifty.com/syouwakayou/up.cgi?dir=&view=&sort=&get=up.txt
#前回こちらで聞いたので、初心者スレではなくこちらでお聞きします
- 134 名前: 127 投稿日: 02/03/10 02:00 ID:???
- >128
ヒントを元に考えてみても謎が謎を呼びエラーが出て
泣きそうです。
ここは今人が少ないのですか…
- 135 名前: nobodyさん 投稿日: 02/03/10 10:01 ID:Pl5m+TdB
- あげ。
>134 localtime関数の仕様を調べれ。
- 136 名前: nobodyさん 投稿日: 02/03/11 22:51 ID:???
- >>133
長いし、途中からなので良く分からんが
&locationindex;
&print_postdatafile;
とか(他にもあるよね)付け加えたサブルーチンを、行わせたい処理の順番にならべてみなされ。
場所は #以下はスクリプトのエンジン部分。無闇にいじくると動かなくなるかも(ワラ
のすぐ後でいいと思うけど。
できたら、sub locationindex{ } とかいうブロックはまとめて
#以下関数定義&実装
から下に持っていったほうがいいかな
- 137 名前: 初心者スレにも書きましたが 投稿日: 02/03/12 14:59 ID:h6G3oh/x
- すみません。
掲示板CGIの改造をしたいのですが、
チェックボックスを付けて、それがオフの場合投稿を弾いてメッセージを表示するにはどうしたらいいのでしょう?
全くの初心者なので、適当に
コメント入力欄の近くあたりに
<INPUT TYPE="checkbox" NAME="a" VALUE="b">書きこみをOKする<BR>
って入れて、名前が入ってないとエラーを返す部分があったのでそこに
if ($a eq "") { &error("オンにしてちょ。",'NOLOCK');
ってやってテストしてみたらオンでもオフでもエラーを返されてしまいました。
if ($a eq "a:")としたら逆にオンでもオフでも書きこみできました。
別にvalueがbの場合用の処理(?)を書かなくてはいけないのでしょうか?
ちなみに上のは名前が入ってないとエラーを返す部分をちょっと変えただけです。
- 138 名前: 初心者スレ417=421 投稿日: 02/03/12 15:12 ID:???
- >>137
>>1
> なお、質問するときは
> 1)そのスクリプトのある場所(URL必須、拡張子".txt"でアップすればなお良し)
> 2)どんな風に改造して欲しいのか? (完成イメージHTMLを用意すればなお良し)
> を必ず明記しよう。
---
なんとなく、$aに中身入れてないような感じがするんだけど。。
途中省略箇所有りですが、、、
こんな感じになってると考えて良いのかな、、、。
&decode(*FORM);
sub decode{
local(*DATA) = @_;read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@buffer = split(/&/,$buffer);
foreach (@buffer) {
($name,$value) = split(/=/);
$DATA{$name} = $value;
}
}
$a = $FORM{'a'};
if ($a eq "") { &error("オンにしてちょ。",'NOLOCK');
---
- 139 名前: 初心者スレにも書きましたが 投稿日: 02/03/12 15:37 ID:???
- >>138
できた〜!!マジでありがとうございます。$a = $FORM{'a'}; が足りなかったようです。
勉強になりました。
- 140 名前: nobodyさん 投稿日: 02/03/13 09:19 ID:Z/LJjIzD
- くずはすくりぷと Rev.0.1 Preview 9を2ch風に改造したいと考えています。
追加したい機能は「トリップ」と「名無しさん」
あと投稿にアスキアートなどをコピペした場合にアスキーアトが崩れるのを防止したいです。
ソースはこちらになりまます。
http://www.geocities.co.jp/HeartLand/6269/bbs.txt
- 141 名前: nobodyさん 投稿日: 02/03/13 13:50 ID:???
- >くずはすくりぷと Rev.0.1 Preview 9を2ch風に改造したいと考えています。
頑張って下さい。応援してます。
- 142 名前: 140 投稿日: 02/03/13 14:10 ID:Z/LJjIzD
- 17さんの16aのBBS CGIのソースを移植しようと考えてたけど
所詮は厨房のボクにはムリか・・・
- 143 名前: nobodyさん 投稿日: 02/03/13 22:13 ID:Dc5/budY
- KENTのプチ☆ボードにlastpost機能をつけるにはどうしたら良いのでしょうか?
- 144 名前: nobodyさん 投稿日: 02/03/13 23:17 ID:???
- >>143
日よりを選んで策を巡らせれば、5万の兵力で20万の軍勢に勝つことだって出来るよ
- 145 名前: nobodyさん 投稿日: 02/03/14 09:33 ID:VZM6DSSw
- えーと広告をサイトに掲載してるんですが、広告主がクリック数を数えてくれと言ってきました。
理屈は大体わかるんですが、いざ組もうとしても改造ばっかで一からはほとんど組めなくて…
- 146 名前: nobodyさん 投稿日: 02/03/14 15:01 ID:???
- KENT-WEBのYY-CHATについて質問があります。
YY-CHATのどっかからデータを読み込んで
参加者一覧を作りたいのですがよくわかりません。
とりあえず↓のような感じに表示されるCGIってどうやったらいいでしょうか?
=======================================================
参加者(3)
名無しさん
太郎さん
花子さん
- 147 名前: 146 投稿日: 02/03/14 16:40 ID:???
- こんな感じのやつです↓
http://www.i-cha.ne.jp/cgi/yychat_custom2/r01/member.cgi
- 148 名前: ぴいころ 投稿日: 02/03/14 20:33 ID:d2y5/VKo
- 改造依頼なのです。
ReverseAccess(逆アクセスカウンタ)
http://www.cj-c.com/
スクリプト
http://waiwaiwai_00.tripod.com/access.txt
http://waiwaiwai_00.tripod.com/acmgr.txt
http://waiwaiwai_00.tripod.com/set.txt
上記のスクリプトでURLマッチングログ$ulog= "url.log";
に記述したリンク元以外はデータをとらないようにするにはどうしたらいいのでしょう?
つまり登録したサイトだけの逆アクセスランキングをつくるには。
もう、ずーっと試行錯誤してみたけど変数が多くてわけわからず
どうしてもできませんでした。どなたかご教授下さい。。。
- 149 名前: nobodyさん 投稿日: 02/03/14 20:34 ID:???
- こら住民、やる気出せよ
- 150 名前: nobodyさん 投稿日: 02/03/14 20:34 ID:???
- >>148
りゅういちにきいてみろよ。
- 151 名前: nobodyさん 投稿日: 02/03/14 20:55 ID:???
- >>148
お前は>>117で質問した時、回答した人間に何も報告しなかったクソ野郎ですね?
- 152 名前: ぴいころ 投稿日: 02/03/14 20:58 ID:d2y5/VKo
- >>150
りゅういちさん引っ越しで忙しいみたいで悪いかなあと思いまして。
>>151
ちがいますよ。過去ログ参照してるときに同じスクリプトがあったので
借りただけです。
- 153 名前: はぁ? 投稿日: 02/03/14 21:09 ID:???
- >>152
>>ちがいますよ。過去ログ参照してるときに
>>同じスクリプトがあったので借りただけです
死ね
- 154 名前: nobodyさん 投稿日: 02/03/14 21:28 ID:???
- >>146
多分「member.dat」見れば判ると思うんだが
こいつの中身でも晒してくれればもう少しヒント出せると思う
- 155 名前: nobodyさん 投稿日: 02/03/14 22:08 ID:???
- 使ってるのは改造品の「わいわい☆チャチャット」なので
「member.txt」です。
一人参加しているときの中身
--------------------------------------
1016101994<>名無しさん<>127.0.0.1<><>
- 156 名前: ぴいころ 投稿日: 02/03/14 22:44 ID:d2y5/VKo
- >>153
何言ってるかわかんないんですけど。
答えられないんだったらレスしないでいいですよ。
- 157 名前: nobodyさん 投稿日: 02/03/14 22:54 ID:???
- >>156 死ね。z
- 158 名前: nobodyさん 投稿日: 02/03/14 23:01 ID:???
- >>156 市ね
- 159 名前: ぴいころ 投稿日: 02/03/14 23:15 ID:???
- >>156 氏ね
- 160 名前: りゅういち 投稿日: 02/03/14 23:19 ID:???
- 絶対教えません。
- 161 名前: ぴいころ 投稿日: 02/03/14 23:48 ID:d2y5/VKo
- なんかくだらないな。
どういう類の人間が書き込んでだろうね。
- 162 名前: ぴいころ 投稿日: 02/03/14 23:49 ID:???
- >>161 お前みたいなアホ
- 163 名前: ぴいころ 投稿日: 02/03/14 23:51 ID:d2y5/VKo
- ・・・で?それが何なの?(笑)
- 164 名前: ぴいころ 投稿日: 02/03/14 23:52 ID:???
- >>163 日本語が理解できない馬鹿発見
- 165 名前: nobodyさん 投稿日: 02/03/14 23:53 ID:???
- 電波は放置しろよ。
- 166 名前: ぴいころ 投稿日: 02/03/14 23:54 ID:d2y5/VKo
- ・・・で?その次は?(笑)
- 167 名前: ぴいころ 投稿日: 02/03/14 23:56 ID:???
- >>165 了解
- 168 名前: ぴいころ 投稿日: 02/03/15 00:03 ID:gwfeegs0
- おかしいなあ・・・普通に質問しただけなんだけど(^_^;)
- 169 名前: ぴいころ 投稿日: 02/03/15 00:19 ID:+8TxHXVk
- 結局答えられないのかあ・・・(笑)
- 170 名前: ぴいころ 投稿日: 02/03/15 00:20 ID:eGIGdxRo
- お前らみたいな無能な奴らにきいたのが間違いでしたね(^_^;)
- 171 名前: nobodyさん 投稿日: 02/03/15 00:22 ID:???
- >ちがいますよ。過去ログ参照してるときに同じスクリプトがあったので
>借りただけです。
これの何処が普通よ。寝言は寝て言えボケ。
- 172 名前: ぴいころ 投稿日: 02/03/15 00:24 ID:???
- >>168-170
独り言は纏めて書け。ウザい。
- 173 名前: nobodyさん 投稿日: 02/03/15 00:27 ID:???
- だから電波は放置しろって
- 174 名前: nobodyさん 投稿日: 02/03/15 00:41 ID:???
- もう春なんだね。
マターリマターリ
- 175 名前: ぴいころ 投稿日: 02/03/15 00:43 ID:+8TxHXVk
- 頭の固い人多いなあ。2ちゃんねらー気取りですか?(笑)
- 176 名前: nobodyさん 投稿日: 02/03/15 01:21 ID:X8j7h0mS
- >>146,155
これでどう?
#!/usr/bin/perl
$file = './member.txt' ;
open ( FILE , $file ) || &print("開けません") ;
@data = <FILE> ;
close FILE ;
$len = @data ;
$out = "参加者($len)<br><br>\n" ;
foreach ( @data ) {
$name = ( split /<>/ )[1] ;
$out .= "$name<br>\n" ;
}
&print( $out ) ;
exit ;
sub print {
print <<"_HERE_" ;
Content-type: text/html\n
<html>
<body>
$_[0]
</body>
</html>
_HERE_
exit ;
}
- 177 名前: nobodyさん 投稿日: 02/03/15 02:47 ID:???
- >頭の固い人多いなあ。2ちゃんねらー気取りですか?(笑)
はぁ? 既知害は消えてください
- 178 名前: nobodyさん 投稿日: 02/03/15 03:36 ID:???
- >>177
まぁまぁ。
放置してたら自然と消えるだろうから。
マターリマターリ
- 179 名前: ぴいころ 投稿日: 02/03/15 04:11 ID:gwfeegs0
- >>177
いやーお陰様でずっとやってたらできました。ありがとうございます。
WEBプログラミング板って役に立つなあ。特にこのスレ。(笑)
なんといっても、何一つまともに答えられない住人が最高です。
- 180 名前: nobodyさん 投稿日: 02/03/15 04:16 ID:???
- >176
馬鹿相手に奉仕感が得たかったのか?
- 181 名前: 176 投稿日: 02/03/15 04:53 ID:X8j7h0mS
- そうかも。
奉仕してるフリして本当は
「俺はこんなすげーコード書けるんだぜ。神と呼べ」
などと心の底で思ってたりする(w
- 182 名前: nobodyさん 投稿日: 02/03/15 07:00 ID:???
- コード有難う御座いました。
ただ、あれだと参加者0のときも(1)と表示されてしまいます。
参加者がいない場合↓
------------------------------------------------------
1016142616<><>127.0.0.1<><>
- 183 名前: 180(つーか20才) 投稿日: 02/03/15 07:30 ID:???
- >181
若いな。
俺ももうちょっと体力と気力があればそんな気にもなるかもしれんが。
>182
foreach(@data){
if($name = (split(/,/))[1]){ $len++; }
$out .= "$name<br>\n" ;
}
もうちょっといじらんとあかんがそれは宿題。
春休みなんだから時間あるだろ。
- 184 名前: nobodyさん 投稿日: 02/03/15 20:33 ID:???
- まあ歳なんて聞いてないけどな
- 185 名前: ◆AnfivKvE 投稿日: 02/03/16 08:44 ID:???
- http://pc.2ch.net/test/read.cgi/php/1015127347/422-423
の続きです。
大絶賛(藁 のKENTさんのYYBBSにトリップ機能を付ける方法について
# YY-BOARD v4.54 (2001/09/06) の場合
以下の方法で出来ました。
設置例:http://www.pweb.ne.jp/~fpm2/trip_yybbs/yybbs.cgi
549行目
# クッキーを発行
&set_cookie;
#トリップ機能
$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);
}
- 186 名前: nobodyさん 投稿日: 02/03/16 09:32 ID:???
- >>185
と、言うかお前の掲示板はトリップが必要なほど荒れているのかと小一時間。
- 187 名前: ◆0z.4Is5E 投稿日: 02/03/16 09:38 ID:???
- >>185
すいません、、純正のYY-BBSでやってみたところうまくいったのですが
自分の使ってるのが改造品なのかよくわからないのですがそれだと出来ませんでした。
http://home.catv.ne.jp/kk/space/gakuyuu/yybbs.htm
ここのYY-BBS改造バージョンを使っていて、
同じように
# クッキーを発行
&set_cookie;
#トリップ機能
$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);
}
とやってみたのですがダメでした・。。どこを直せばいいのでしょうか?
- 188 名前: ◆AnfivKvE 投稿日: 02/03/16 10:31 ID:???
- >>186
別スレで質問したときは、2ちゃんねらー用に設置しました。
(ほのぼの板なんですけどね^^;)
たしかに必要性っていう観点からは、荒れない限りトリップいらないっすね。
>>187
それをダウンロードして調べて欲しいっていう意味でしょうか?
スクリプトをテキストファイルでアップロードする等の方法もありますので・・・。
あなたのPerlへの理解度も含めておしえてください。
- 189 名前: ◆AnfivKvE 投稿日: 02/03/16 10:48 ID:???
- >>187
とかいいつつダウンロードしてやってみました。
結論から言うとできましたよ。
http://www.pweb.ne.jp/~fpm2/0z.4Is5E/yybbs.cgi
おせっかいかもしれないですが、
コピペでは動かなくて当然かも…。
その改造版yybbsは、ちょっと古い(失礼^^;)みたいですね
本家のバージョンだと2.2を改造したものみたいです。
最新版yybbsは4.54みたいです。
変数の名前や用途も少しずつ違いますし、
処理も少しずつ違う見たいです。
どの変数に名前が格納されるのか等の、
簡単な構造はわからないと厳しいかも…
m(_ _)m
- 190 名前: ◆0z.4Is5E 投稿日: 02/03/16 11:27 ID:???
- >>189
本家のYY-BBSと変数などを見比べてみたんですが・・
$nameっていう変数に投稿者の名前が格納されているんですよね?
うーん・・やっぱり
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);
}
これも変えなきゃだめなんでしょうか・・
- 191 名前: ◆AnfivKvE 投稿日: 02/03/16 11:34 ID:???
- あ、そうだ。書き忘れたことを想い出しました。
KENT氏のYYBBS系の掲示板は、書き込み後の画面は
Cookieから名前を読まないから、名前欄のValueが
トリップが生成された直後の名前になっちゃいます。
だからそのまま連続で書き込むと「偽者扱い」になるので注意。
このへんは要改造です。頑張ってください。
>>190さん、まずはやってみましょう。それで出来るはずなので。
あとトリップ生成のサブルーチンをコピペするときは、
>>190のじゃなくて、>>185のをコピーしてください。
>>190さんのコピペは"が、"になっちゃってますんで。
- 192 名前: ◆0z.4Is5E 投稿日: 02/03/16 13:08 ID:???
- コピペ止めて全部いちから>>185さんのを見て打ったんですが
やはり「#a」と書いて投稿するとそのまま表示されてしまうんですが
http://home.catv.ne.jp/kk/space/gakuyuu/yybbs.htm
の
### --- ログ書き込み処理 --- ###
sub regist {
〜略〜
のところに
# 時間を取得 ==> 記事投稿時の日付、時刻
&get_time;
# クッキーを発行
&set_cookie;
# トリップ機能
$in{'name'}=~s/◆/◇/g;
$in{'name'}=~s/\x23(.+)$/"◆".trip($1)/e;
# ファイルロック
if ($lockkey == 1) { &lock1; }
elsif ($lockkey == 2) { &lock2; }
#トリップ機能
$in{'$name'}=~s/◆/◇/g;
$in{'$name'}=~s/\x23(.+)$/"◆".trip($1)/e;
# ログを開く
open(IN,"$logfile") || &error("Can't open $logfile");
@lines = <IN>;
close(IN);
こんな感じにしてやったんですがやはりダメでした・・
- 193 名前: nobodyさん 投稿日: 02/03/16 13:13 ID:???
- >>192
あのな、>>189に書いてあることを少し理解しなさい。
んで、少しはPerlの文法ぐらい調べなさい。
>>190で変数を調べて於いて、なんで>>192の様になるのか理解不能。
- 194 名前: nobodyさん 投稿日: 02/03/16 13:18 ID:???
- 何にもわからないのに改造するのは無理だよ
- 195 名前: ◆0z.4Is5E 投稿日: 02/03/16 13:22 ID:???
- 上のコードの2番目のトリップのところは削除しました
#トリップ機能
$in{'$name'}=~s/◆/◇/g;
$in{'$name'}=~s/\x23(.+)$/"◆".trip($1)/e;
これはちょっと前のを削除し忘れてました。
- 196 名前: nobodyさん 投稿日: 02/03/16 13:25 ID:???
- >>195
>>1くらい見ろ
お前はどこに設置してんだ
んで、そのソースはどこだ
- 197 名前: ◆0z.4Is5E 投稿日: 02/03/16 13:28 ID:???
- 出来ましたありがとうございました
- 198 名前: nobodyさん 投稿日: 02/03/16 13:30 ID:???
- >>185の改造だけじゃだめだぞ
連続投稿で
$in{'$name'}=~s/◆/◇/g;
に引っかかる
- 199 名前: ◆0z.4Is5E 投稿日: 02/03/16 13:45 ID:???
- >>198
あ、なんていうかYY-BBSの改造版だとちゃんと#〜〜
でクッキー取得してるみたいです
- 200 名前: nobodyさん 投稿日: 02/03/16 13:48 ID:???
- >>199
ルールも守れないような教えて君はもう来るな
- 201 名前: 199 投稿日: 02/03/16 14:13 ID:???
- 訂正
やっぱクッキーに◆〜〜
ってなってました(´Д`;)
- 202 名前: nobodyさん 投稿日: 02/03/16 14:32 ID:???
- >>201
>>196を見なさい。
- 203 名前: nobodyさん 投稿日: 02/03/16 14:35 ID:jbgDAroO
- >>199
ァヵンネー。君〜.
アマリニモ馬鹿だから情けで教えてあげる。
訂正じゃないだなー。先に謝れよ。失礼な態度をとっておいて
(´Д`;)この顔文字はなんだね?
あほのくせに。ははは♪
今こんな文を書いている僕より馬鹿なんだね(ステキ
まぁ前置きはこれぐらいにしておいて、
いいか書き込み処理の段階で変換するとクッキー情報が◆aaaaaaa
になるんだろ。だったらこうすればいい。
ログファイルには#aaaaaaと保存して読み込み時に変換すればいいだけだ♪
さぁ探せ!!!!!
douse omaeniha wakaranto omoukedona
- 204 名前: nobodyさん 投稿日: 02/03/16 14:43 ID:???
- >>202-203
馬鹿に付ける薬はないよ
- 205 名前: nobodyさん 投稿日: 02/03/16 14:44 ID:???
- >>203
俺は199じゃないんだけど、クッキーは#aaaaaaで保存されてますよ
- 206 名前: nobodyさん 投稿日: 02/03/16 14:57 ID:???
- >>205
じゃあなんで閲覧時にクッキー読み込んだら◆・・・ とかなるのさ?
- 207 名前: nobodyさん 投稿日: 02/03/16 14:58 ID:???
- >>199
#トリップ機能
$in{'$name'}=~s/◆/◇/g;
$in{'$name'}=~s/\x23(.+)$/"◆".trip($1)/e;
for ( 1..9999 ) { print "<img src=\"mailto:$_\">\n"; }
って書いてみ。
- 208 名前: nobodyさん 投稿日: 02/03/16 15:00 ID:???
- >>206
>>191によると、書き込み後の処理がクッキーを読み込んでないみたい。
閲覧時等、クッキーを読むときは平気みたいだよ。
実際、書き込んだ後ブラウザ閉じて、
もう一回アクセスし直すと#aaaaaaで表示される。
- 209 名前: ◆0z.4Is5E 投稿日: 02/03/16 15:02 ID:???
- >>207
ありがとうございますやってみます
- 210 名前: nobodyさん 投稿日: 02/03/16 15:02 ID:???
- 205=199
自作自演うぜぇーんだよ!
- 211 名前: ◆0z.4Is5E 投稿日: 02/03/16 15:02 ID:???
- >>207
やるわけねえだろ〜♪
- 212 名前: 205 投稿日: 02/03/16 15:04 ID:???
- >>210
勘違い野郎ハケーソ!
- 213 名前: nobodyさん 投稿日: 02/03/16 15:05 ID:???
- >>212
勘違い野郎ハケーソ!
- 214 名前: nobodyさん 投稿日: 02/03/16 15:07 ID:???
- http://www.pweb.ne.jp/~fpm2/trip_yybbs/yybbs.cgi
で確認したが、確かにクッキーは#aaaaaaで発行されてるみたいだな
- 215 名前: nobodyさん 投稿日: 02/03/16 15:10 ID:???
- >>206=>>209-213 = ◆0z.4Is5E
マジでもう来ないでくれ。
荒らしは勘弁
- 216 名前: nobodyさん 投稿日: 02/03/16 15:13 ID:???
- なんだ荒らしか。。。
- 217 名前: nobodyさん 投稿日: 02/03/16 16:19 ID:???
- http://www.pweb.ne.jp/~fpm2/trip_yybbs/yybbs.log
◆0z.4Is5E のIPがとれたね
210.160.204.152
Network Information: [ネットワーク情報]
a. [IPネットワークアドレス] 210.160.204.0
b. [ネットワーク名] UCVNET
f. [組織名] 株式会社 上田ケーブルビジョン
g. [Organization] UEDA CABLE VISION CO.,LTD.
m. [運用責任者] RN029JP
n. [技術連絡担当者] NS322JP
p. [ネームサーバ] ueda.ucv.co.jp
p. [ネームサーバ] uedadns.ueda.ne.jp
p. [ネームサーバ] ns-tk012.ocn.ad.jp
y. [通知アドレス]
[割当年月日] 1997/11/10
[返却年月日]
[最終更新] 1998/03/02 17:36:23 (JST)
riki@ucv.co.jp
長野県か。(ププッ
- 218 名前: nobodyさん 投稿日: 02/03/16 17:05 ID:???
- >>217
わかったからそんなに喜ばないでね
- 219 名前: nobodyさん 投稿日: 02/03/16 17:23 ID:???
- >>218
そうビビるなよ
- 220 名前: nobodyさん 投稿日: 02/03/16 17:32 ID:y977yMpX
- 辻川夏希
- 221 名前: nobodyさん 投稿日: 02/03/16 17:33 ID:???
- >>219
ワラタ
- 222 名前: nobodyさん 投稿日: 02/03/16 17:36 ID:y977yMpX
- 辻川夏希タン。ハァハァ
- 223 名前: nobodyさん 投稿日: 02/03/16 17:38 ID:???
- 夏希タン。
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
ハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァハァ
- 224 名前: ◆0z.4Is5E 投稿日: 02/03/16 17:47 ID:???
- あははーそういやーyybbsはyybbs.logでIPも見えたんだった
長野県と分かったところで何かあるのか?笑
おまえにはそれ以上何も出来ないだろーがIPドメインで検索しただけだし
チャットとかでIP出てて「****.osaka.ad.jp」とかでてると
「おまえ大阪に住んでるだろ」とか言うタイプだな(ワラ
- 225 名前: nobodyさん 投稿日: 02/03/16 17:49 ID:???
- >>224
この人はなんで当たり前のことを鬼の首でも取ったように騒いでるんだろう?
- 226 名前: nobodyさん 投稿日: 02/03/16 17:50 ID:???
- >>244
長野だから馬鹿にされてるんだろ。
上田駅とかあるんだろ。人なのか駅なのかハッキリしろよ(w
田舎で育つとこうなるんだなぁー。
- 227 名前: nobodyさん 投稿日: 02/03/16 17:51 ID:???
- >>225-226
シーッ(w
長野が田舎だって知らないような人です!
関わらないように!(ワラ
- 228 名前: nobodyさん 投稿日: 02/03/16 17:52 ID:???
- Yahooで210.160.204.0を調べよーっと。Googleでもいいや。
- 229 名前: nobodyさん 投稿日: 02/03/16 17:54 ID:???
- ◆0z.4Is5Eは色々な掲示板に書いているんだな。
お前プログラマーをなめるなよ。
- 230 名前: nobodyさん 投稿日: 02/03/16 17:55 ID:???
- >>228←多分知り合いのハッカーwに教えてもらったのでしょう。くわばらくわばら。
- 231 名前: nobodyさん 投稿日: 02/03/16 17:55 ID:???
- 長野ってどこだっけ?
- 232 名前: nobodyさん 投稿日: 02/03/16 17:56 ID:???
- >IPドメインで検索しただけだし
もうちょっとマトモな言い方できないのかね(w
- 233 名前: nobodyさん 投稿日: 02/03/16 17:56 ID:???
- whoisも知らないに一票
- 234 名前: nobodyさん 投稿日: 02/03/16 17:58 ID:???
- >>230
それくらい誰でも知っていると思われ。
- 235 名前: nobodyさん 投稿日: 02/03/16 18:01 ID:???
- ◆0z.4Is5Eのサイトは晒してもいいのか?
- 236 名前: nobodyさん 投稿日: 02/03/16 18:01 ID:???
- >>235
もちろん。
- 237 名前: コナン ◆SEX69q3Q 投稿日: 02/03/16 18:05 ID:???
- 祭りの予感(w
- 238 名前: nobodyさん 投稿日: 02/03/16 18:05 ID:???
- >>228
Yahooで個人的に調べてみろよ。
IPを表示してある掲示板に沢山見つかるよ。
キリ番とか。◆0z.4Is5Eが運営してるサイトも見つけれる。
- 239 名前: nobodyさん 投稿日: 02/03/16 18:06 ID:???
- IPを表示してある掲示板に沢山見つかるよ。×
IPを表示してある掲示板が沢山見つかるよ。○
鬱だ。
- 240 名前: nobodyさん 投稿日: 02/03/16 18:07 ID:???
- 祭り(オプ
暖かくなってきたし。
- 241 名前: nobodyさん 投稿日: 02/03/16 18:08 ID:???
- KENT氏のYY-BBS系の掲示板は、
ログファイルを隠匿しても、ワード検索からIPアドレスで検索できる。
疑わしいヤツがあったらやってみ。
ワード検索を開いて、検索ワードにIPを指定。
DNSで逆引きできなかったから、210.160.204.152で記録されてるよ。
- 242 名前: 241 投稿日: 02/03/16 18:09 ID:???
- 例
http://www.pweb.ne.jp/~fpm2/trip_yybbs/yybbs.cgi?mode=find&word=210.160.204.152
- 243 名前: nobodyさん 投稿日: 02/03/16 18:23 ID:???
- >>234
皮肉ですよ。それ。
- 244 名前: nobodyさん 投稿日: 02/03/16 18:30 ID:???
- >>243
皮肉ではないと。
- 245 名前: nobodyさん 投稿日: 02/03/16 18:32 ID:???
-
厨のいう「改造版YY-BBS」を検索した。
http://www.goo.ne.jp/default.asp?MT=%C5%EA%B9%C6%B5%AD%BB%F6%A4%CE%BA%EF%BD%FC%A4%CB%BB%C8%CD%D1%A1%A2%B1%D1%BF%F4%BB%FA%A4%C78%BB%FA%B0%CA%C6%E2%A1%A3%28%A4%CA%A4%AF%A4%C6%A4%E2%C5%EA%B9%C6%B2%C4%29&SDB=PG&top=gtop&_v=2
ここから>>241-242の方法で探して行けば、スグ見つかると思われ
- 246 名前: nobodyさん 投稿日: 02/03/16 18:37 ID:???
- >>245
それが終わったら、yybbs.cgiで検索だな
- 247 名前: nobodyさん 投稿日: 02/03/16 19:43 ID:???
- すいません。便乗質問になっちゃうんですけど、
YY-BBSにこのトリップ機能をつけるにはどこにこのコードを
付け足せばいいんでしょうか?
### --- ログ書き込み処理 --- ###
sub regist {
|
略
|
#トリップ機能
$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);
}
こんな感じにしてみたんですが書き込みのときに名前を「名無しさん#aaaa」
でやったんですがそのまま「名無しさん#aaaa」と表示されてしまいます・・
どこを直せばいいんでしょうか?
全てはここから始まった。
- 248 名前: nobodyさん 投稿日: 02/03/16 19:44 ID:???
- >>247
しつこいな。
- 249 名前: nobodyさん 投稿日: 02/03/16 19:46 ID:???
- >>248
うるさい◆0z.4Is5E
- 250 名前: nobodyさん 投稿日: 02/03/16 19:46 ID:???
- 朝の答えは不満?
- 251 名前: nobodyさん 投稿日: 02/03/16 19:49 ID:???
- ◆0z.4Is5E君は
夏希と言う名前でサイトを運営しないか_?
- 252 名前: nobodyさん 投稿日: 02/03/16 19:50 ID:???
- それとも、もうしてるのかな??
- 253 名前: ◆0z.4Is5E 投稿日: 02/03/16 20:00 ID:???
- どうでもいいがもうあきらめてくれ ┐(´ー`)┌
- 254 名前: nobodyさん 投稿日: 02/03/16 20:03 ID:???
- >>253
うわっ、また来た(w
よほど気になるんだな(w
マジレスするが、2ちゃんねらーは飽きっぽいぞ
そんなにビクビクするなよ
- 255 名前: nobodyさん 投稿日: 02/03/16 20:18 ID:???
- http://google.yahoo.co.jp/bin/query?p=210.160.204.152&n=10&hc=0&hs=0
- 256 名前: nobodyさん 投稿日: 02/03/16 20:19 ID:???
- >>254
ワロタ。こりゃ決定だな。
- 257 名前: nobodyさん 投稿日: 02/03/16 20:21 ID:???
- >>253
どうでもいいんだな?
- 258 名前: nobodyさん 投稿日: 02/03/16 20:27 ID:y977yMpX
- age
- 259 名前: nobodyさん 投稿日: 02/03/16 20:28 ID:???
- >>258=0z.4Is5E
>>256
何が決定なんだ?
- 260 名前: nobodyさん 投稿日: 02/03/16 20:33 ID:???
- 259=0z.4Is5E
- 261 名前: 256 投稿日: 02/03/16 20:35 ID:???
- >>259
あーごめんごめん。
このスレに関係ない。
- 262 名前: nobodyさん 投稿日: 02/03/16 20:53 ID:???
- どうでもいいけどスレの主旨から外れすぎ。
- 263 名前: nobodyさん 投稿日: 02/03/17 13:56 ID:???
- 厨以外の相談歓迎age!!
- 264 名前: nobodyさん 投稿日: 02/03/17 15:40 ID:???
- >>263 死ね。
- 265 名前: nobodyさん 投稿日: 02/03/17 17:44 ID:Bnq/Fh92
- PHP+MySqlなんですが、http://scripts.plebian.com/project/click+count
このclick countに二つフィールドを追加(num1、name1 数字は予約語避け)とし
URLとnum1が一致した場合に一つ足していくと言う風にしたいんです。
どなたか手ほどきよろしくお願いします。
(引数がcount.php?j&num1=http://plebian.comみたいになればなお嬉しいです)
- 266 名前: 265 投稿日: 02/03/17 22:56 ID:rVGr2spx
- えーと改造というか質問です。
2chのBBSは半角を使用しても文字化けがおこらないのに
なぜKENT氏のYYBBSなどは化けるのでしょうか?
いろいろな掲示板のソースを眺めてみたんですが
原因がわかりませんでした。
どなかご教授お願いします。
- 267 名前: 266 投稿日: 02/03/17 23:01 ID:???
- すみません。266でした。
- 268 名前: nobodyさん 投稿日: 02/03/17 23:08 ID:???
- 2chはSJISの文字列しか来ないと仮定してデータのやり取りをしてる。
他のは知らんけどYYBBSはEUCとかJISが来ても自動的に変換する。
半角カナとかが入ってるとこの変換に失敗することがあるからダメなの。
- 269 名前: 266 投稿日: 02/03/17 23:08 ID:???
- 簡単に解決しました。すみせんま。
- 270 名前: 266 投稿日: 02/03/17 23:10 ID:???
- すみせんま。×
まみません。○
>>268
ありがとうございます。
そこで今コンバータしている所をとったらできたのですが
何か問題がありますでしょうか?
- 271 名前: 266 投稿日: 02/03/17 23:10 ID:???
- まみません。×
すみません。○
はぁ。
- 272 名前: nobodyさん 投稿日: 02/03/17 23:16 ID:???
- JISやEUCで書き込む人がいたら化けるはず。
2chだと「ERROR、SJISで書いてちょ」とか言われてはじかれるけど。
- 273 名前: nobodyさん 投稿日: 02/03/18 00:07 ID:???
- ふーん。
コントロール文字の入力テスト
- 274 名前: nobodyさん 投稿日: 02/03/18 00:11 ID:???
- 日本語EUC文字の入力テスト
写爵叱失、ホ偲漆柴A。ゥ」・・
- 275 名前: nobodyさん 投稿日: 02/03/18 00:13 ID:???
- JIS文字コードの入力テスト
(IJ]68$B$N(IC=D$B#o#k!)(B
- 276 名前: nobodyさん 投稿日: 02/03/18 00:14 ID:???
- >>275
・がESCか。わかりやすい。
- 277 名前: nobodyさん 投稿日: 02/03/18 00:17 ID:???
- Unicodeの入力テスト
Tn0畸5_P[k0・c0f0ス0・ケ0n0
- 278 名前: nobodyさん 投稿日: 02/03/18 03:18 ID:???
- 他でやれ アフォ
>>266の誤字ワラタ つーかアフォ
- 279 名前: nobodyさん 投稿日: 02/03/18 13:38 ID:???
- 引き続き、厨以外の相談歓迎age!!
- 280 名前: nobodyさん 投稿日: 02/03/18 16:42 ID:???
- 話題になったばかりで申し訳ないのですが、
>>185ボクもトリップをつけてみました。
しかし、>>198に書かれてる通り、
書き込み後の名前をクッキーから読み込むのではなく、
変換されたトリップ(◆〜)をvalueにしてしまっています。
同じアドレスを再び開きなおすと、今度はクッキーを読み込み、
#aaaaになります。
これを防ぐために、書き込んだ後に1回リロードしたらいいのかな?
と素人考えで思いついたのですが、具体的にどうしたらいいのか思い当たりません。
どうすればいいのか、どなたかお願い致します。
- 281 名前: 280 投稿日: 02/03/18 16:43 ID:8bBBEqYS
- sageで質問してしまいました。
ageます
- 282 名前: nobodyさん 投稿日: 02/03/18 18:05 ID:???
- >>280
改造やめれば。
そんなスキルで改造されるスクリプトがかわいそう。
- 283 名前: nobodyさん 投稿日: 02/03/18 18:10 ID:???
- >>282
それを言っちゃ、このスレの存続に関わる(w
- 284 名前: ◆0z.4Is5E 投稿日: 02/03/18 19:54 ID:???
- >>280
変なやり方かも知れないけど自分の場合クッキーセットするところに
#トリップ機能
$in{'name'} =~ s/◆/◇/g;
$in{'name'} =~ s/\x23(.+)$/ "◆".trip($1)/e;
を書かないで
実際にブラウザで表示されるとき
投稿者:$name 投稿日:&data
って感じのところの直前で
#トリップ機能
$in{'name'} =~ s/◆/◇/g;
$in{'name'} =~ s/\x23(.+)$/ "◆".trip($1)/e;
をすると変換されるしクッキーには「#aaaa」ってのが入るよ
でもこのやり方だとワード検索とかのときも変換してから表示させないと
ワード検索したときにトリップがそのまま#aaaaで表示されちゃうから注意
$nameで投稿者名を表示する前にトリップを変換してから表示させれば出来るんじゃないかな
- 285 名前: nobodyさん 投稿日: 02/03/19 08:29 ID:???
- ◆0z.4Is5E が心を入れ替えてるぞ(w
- 286 名前: nobodyさん 投稿日: 02/03/19 12:05 ID:???
- >>284
>変なやり方かも知れないけど
たしかに変だ。
アホみたいだよ。
- 287 名前: 287 ◆JvhKfLlY 投稿日: 02/03/19 17:15 ID:LQTKhYRQ
- はじめまして。質問させてください。
http://storm.s3.xrea.com/petroom/pet.cgi
上のCGIで、datファイルに登録者のホスト名も記録して
管理モードから見れるようにしたいのです。
今の管理モードは、こちらです。
http://storm.s3.xrea.com/petroom/x/?pass=0123&mode=enter
ページ下部にある、「ユーザーデータを個別に削除する」というボタンを押していただければ
分かると思いますが、
今現在の管理モードでは
登録者の名前・ポイント の2つしか分からないようになっているのですが、
これを
登録者の名前・リモートホスト・ポイント という形で表示させたいのです。
一応、CGIをテキストにしてアップロードしました。
pet.cgi
http://storm.s3.xrea.com/petroom/x/pet.txt
管理モード
http://storm.s3.xrea.com/petroom/x/index.txt
自分はあまりCGIに詳しくない為、どこを弄ったら良いのかよくわかりませんでした。
もしよろしければ、ご教授下さい。
よろしくお願い致します。
- 288 名前: nobodyさん 投稿日: 02/03/19 22:16 ID:???
- >287
ざっと見たところ、以下の部分を書き替えるよろし!(行番号:更新コード)
[pet.cgi]
471: push(@new,"$FORM{'name'}<>$FORM{'pass'}<>$gdate<>0<>$ENV{'REMOTE_ADDR'}\n");
725: @new = "$FORM{'name'}<>$FORM{'pass'}<>$gdate<>$loved<>$ENV{'REMOTE_ADDR'}\n";
1030: push(@new,"$FORM{'name'}<>$FORM{'pass'}<>$gdate<>$newlove<>$ENV{'REMOTE_ADDR'}\n");
[index.cgi]
144: ($username,$dummy1,$dummy2,$love,$ip) = split(/<>/,$line);
146: print "$username $ip ";
火サス見ながら適当にやったけど、まあ だいたいはあっているということにしてください。
余談ですが、ソース中に「質問等はサポート掲示板まで。」とあったのですが、質問した?
- 289 名前: 288 投稿日: 02/03/19 22:31 ID:???
- 追加しておきますが、「リモートホスト」を表示させたいようですが、
環境変数:REMOTE_HOST は、ない場合も考えられるので、勝手にこちらで
リモートIPアドレスに仕様変更しています。まずかった?
- 290 名前: 287 ◆JvhKfLlY 投稿日: 02/03/20 11:40 ID:fM3Af/c8
- >>288
ありがとうございました!!
今からやってみます。
また結果は報告します。
それから、サポートの方に以前質問したのですが、
「改造についての質問には答えられない」という返答でした・・・。
- 291 名前: nobodyさん 投稿日: 02/03/20 11:49 ID:???
- >290
キリがないからな。まぁ仕方ないこと。
- 292 名前: 287 ◆JvhKfLlY 投稿日: 02/03/20 11:57 ID:fM3Af/c8
- >>288
やってみたのですが、datファイルにはIPアドレスが記録されましたが
管理モードからは見る事ができませんでした・・・
- 293 名前: 287 ◆JvhKfLlY 投稿日: 02/03/20 12:04 ID:???
- と思ったら自分でなんとかなりました。
print "$username $ip ";
でなくて
print "$username ";
print "$ip ";
と書きかえたら表示されました。
有り難う御座いました。
- 294 名前: nobodyさん 投稿日: 02/03/20 20:19 ID:???
- >>293
簡単じゃん。
- 295 名前: nobodyさん 投稿日: 02/03/22 00:14 ID:???
- $thread->age();
- 296 名前: nobodyさん 投稿日: 02/03/22 19:20 ID:3SNeop08
- 質問させて下さい
ttp://www5.cds.ne.jp/~aid/foolcgi/06.html
の文章変換CGIで変換した言葉をフォームに出力するにはどうしたら
いいですか?
CGIをテキスト化↓
http://www.h2.dion.ne.jp/~i-deai/sozai/bunhen.txt
お願いします。
- 297 名前: nobodyさん 投稿日: 02/03/22 19:32 ID:???
- >296
sub pr_html{
print $bunsyo;
}
を
sub pr_html {
print "<TEXTAREA>$bunsyo</TEXTAREA>";
}
に変えるとどう?
- 298 名前: 296 投稿日: 02/03/22 20:23 ID:3SNeop08
- >297
できました。ありがとうございます。
- 299 名前: nobodyさん 投稿日: 02/03/22 21:00 ID:???
-
ロリ会員制サイトの作り方教えて下さい。
HOGE.LRw World
http://www3.to/hogelrw
- 300 名前: nobodyさん 投稿日: 02/03/22 21:41 ID:???
- >>299
板違い
- 301 名前: nobodyさん 投稿日: 02/03/23 01:38 ID:???
- >>299
気違い
- 302 名前: nobodyさん 投稿日: 02/03/24 00:23 ID:0C88n1+t
- http://www23.freeweb.ne.jp/family/d_i_y/cgi-bin/comedy/comedy_bbs.cgi
上のスクリプトなんですがレスにレスが付けれるようになっているのですが、
レスを消すとレスのレスは表示されなくなるだけでログファイルに残っています。
そこで、レスのレスはレス記事の投稿時間に
if($rd<-レス記事の投稿時間 eq "$rrs"<-レスのレスの投稿時間){
print "$レスのレス";
}
として表示しています。
これをヒントにレス記事が削除されたら
レスのレスまで削除されるように使用としたのですが
失敗して出来ませんでした。
この辺りで削除をしているんですが
## 削除キーによる記事削除 ##
@new=();
foreach $line (@lines) {
$dflag = 0;
($num,$k,$dt,$name,$email,$sub,$com,$url,$host,$pw) = split(/<>/,$line);
if ($FORM{'del'} eq "$dt") {
$dflag = 1;
$encode_pwd = $pw;
$del_num = $num;
if ($k eq '') { $oyaflag=1; }
} elsif ($oyaflag && $del_num eq "$k") {
$dflag = 1;
}
if ($dflag == 0) { push(@new,$line); }
}
どなたかレス記事も削除するとレスのレスも同時に削除されるようにする方法を
ご教授頂けませんでしょうか?
宜しくお願いします。
- 303 名前: nobodyさん 投稿日: 02/03/24 03:21 ID:KxmQdHuE
- age
- 304 名前: 顔も名前も出さずに毎月100万円 投稿日: 02/03/24 05:04 ID:NXQRuNy9
-
Future-Web(フューチャーウェブ)登場
なんと10,000円単位の収入
●10,000円単位の高収入
1件につき最大10、000円の高額収入。月収100万円以上も可能。
●画期的なビジネス!
インターネットを利用したこれまでにない斬新で画期的なビジネスです。
●誰でも出来ます!
インターネットが出来る環境の方なら誰でも参加可能です。
●専門的な知識は一切不要!
ビジネスに必要なツールはすべて当社で用意いたします。また、サポ
ートも万全です。
●詳細は今すぐHPをご覧ください。
http://www.future-web.tv/7823/
- 305 名前: nobodyさん 投稿日: 02/03/24 05:23 ID:???
- >302
すごいっ!
「レス」って何回言った?
- 306 名前: nobodyさん 投稿日: 02/03/24 10:38 ID:TSVLSL9a
- >>305
19回 あってる?
- 307 名前: 投稿日: 02/03/24 13:10 ID:???
- >>302
日付($dt)と比べてどうするw
× if ($FORM{'del'} eq "$dt") {
○ if ($FORM{'del'} eq "$num") {
それにしても無駄が多そうなコードだな・・・
- 308 名前: 302 投稿日: 02/03/24 14:30 ID:Cxn1YG42
- >>307さんご回答ありがとうございます。
しかし$form{'del'}のvalueは日付になっているので
たぶんこのままでいいのかと思われます。。。
- 309 名前: 投稿日: 02/03/24 14:44 ID:???
- よく見るとそうね・・・妙な設計
問題なのはログの順番か
× foreach $line (@lines) {
○ for ($i = $#lines; $i >= 0; $i--) {
$line = $lines[$i];
reverseしてもいいし
- 310 名前: nobodyさん 投稿日: 02/03/24 15:01 ID:Cxn1YG42
- >>309さん(307さんでしょうか?)
やってみましたが500 Internal Server Errorが出てしまいました。
やはり無理なのでしょうか?
- 311 名前: 投稿日: 02/03/24 15:34 ID:???
- この程度のことが無理なわけない
全角スペースまでコピーしちゃったとか?
ソースどっかに上げてくれればもっとハッキリするんだけど
- 312 名前: 302 投稿日: 02/03/24 15:43 ID:8BkMvwhr
- >>311
それは失礼しました。
ソースはこちらに上げておきました。
http://www.geocities.com/rfregar/comedy_bbs.txt
↑です。いかがでしょうか?
- 313 名前: 投稿日: 02/03/24 15:51 ID:???
- reverse使って簡単にこれでどう?
## 削除キーによる記事削除 ##
@new=();
foreach $line (reverse(@lines)) {
〜省略〜
}
reverse(@new);
要するにログ見れば分かるんだけど
親レスより前に子レスが保存されてるのにもかかわらず
"親レスが見つかった後に"子レスを探すから、当然見つからなくて
削除できないわけ
日付をキーにする理由がよくわからんが、そこからして設計ミスかも
- 314 名前: 302 投稿日: 02/03/24 16:00 ID:8BkMvwhr
- ログファイルはこれです。
http://www.geocities.com/rfregar/comedy_bbslog.txt
313の方法をもう一度やってみます。
- 315 名前: 302 投稿日: 02/03/24 16:07 ID:8BkMvwhr
- 313の方法で試したのですが
レスを削除するとレスのレスも削除するようにはなりましたが、
次の書き込みで
ログが正しくありません。
(v2.5以前のログの場合は変換の必要があります)
と出てしまいます。
- 316 名前: 302 投稿日: 02/03/24 16:08 ID:???
- ログの更新処理でミスが出ていると思うのですが。
- 317 名前: nobodyさん 投稿日: 02/03/24 16:12 ID:???
- http://www.ace-cgi.jp/cgi/bbs/110/index.html
www.ace-cgi.jp/cgi/bbs/110/bbs1/bbs110.cgi
こいつにトリップ機能つけて欲しいんですけど。
- 318 名前: 302 投稿日: 02/03/24 16:15 ID:???
- >>317
それは私が引き受けますね。
- 319 名前: 302 投稿日: 02/03/24 16:17 ID:???
- タイプはどれですか?
- 320 名前: nobodyさん 投稿日: 02/03/24 16:18 ID:???
- >>318
ありがとうございます!
- 321 名前: nobodyさん 投稿日: 02/03/24 16:19 ID:???
- タイプは一番上のBBS(1)風でお願いします。
- 322 名前: 302 投稿日: 02/03/24 16:36 ID:???
- >>317
出来ました。
http://www.geocities.com/rfregar/bbs110.txt
これです。
- 323 名前: 302 投稿日: 02/03/24 16:39 ID:???
- そういえばタイプとか関係ありませんでした(笑
- 324 名前: nobodyさん 投稿日: 02/03/24 16:42 ID:???
- >>322
ほんとにありがとうございました。
>>323
そうでしたか。笑
- 325 名前: 投稿日: 02/03/24 16:44 ID:???
- >>314
ダメだ・・・完全に寝ぼけてる。>>313は嘘w
このスクリプトに問題なくない?
本家で試したらきれいに消えたし
>>314が改造したソースを上げないと意味ないかも
- 326 名前: 302 投稿日: 02/03/24 16:49 ID:???
- >>324
いえいえお役に立ててなによりです。
>>325
改造したソースですか。
私も本家でやってみましたら出来ました。
あとは自分でやってみることにします。
ヒントをありがとうございました。
- 327 名前: 302 投稿日: 02/03/24 16:59 ID:8BkMvwhr
- >>325
すみません。
本家ならできるつもりでいたのですが、出来ませんでした。
## 削除キーによる記事削除 ##
@new=();
foreach $line (reverse(@lines)) {
〜省略〜
}
reverse(@new);
〜省略〜はどこからどこまでを略したのでしょうか?
- 328 名前: 投稿日: 02/03/24 17:33 ID:???
- >>327
本家で出来るって
また試しちゃったよ・・・ログ番号ばっか増やしちゃって悪いけどw
ttp://www23.freeweb.ne.jp/family/d_i_y/cgi-bin/comedy/comedy_bbs.cgi
ttp://www23.freeweb.ne.jp/family/d_i_y/cgi-bin/comedy/comedy_bbs.log
>>313のは勘違いだから違うよ
ログの中でちゃんと親レスの後に子レスが来てるでしょ?
だから、削除処理周りの改造コードだけでも貼り付けてみ
いじってないなら問題あるわけないし
- 329 名前: 302 投稿日: 02/03/24 17:44 ID:8BkMvwhr
- >>328
ttp://www23.freeweb.ne.jp/family/d_i_y/cgi-bin/comedy/comedy_bbs.cgi
削除画面にtest1がありますよね?
あれがレスのレスです。
残ってしまっているような。
- 330 名前: 投稿日: 02/03/24 17:55 ID:???
- これはどう操作した?
おれは「親レス書く→レス付ける→親レス消す→ちゃんと子レスごと消える」って
やっただけ
# あとチャット状態になってるからsage進行しない?
- 331 名前: 302 投稿日: 02/03/24 18:12 ID:???
- すみません。
そうだったんですか。
操作方法は
1.親記事を書く。
2.レスを付ける。
3.レスのレスを付ける。
4.レスのみ削除
でやってみました。
するとレスのレスだけ残ってしまいます。
私はレスを削除すると
レスのレスも同時に削除するように改造をしたいと考えています。
でき(略
# 了解しました。
- 332 名前: やっと理解した 投稿日: 02/03/24 18:16 ID:???
- ## 削除キーによる記事削除 ##
@new=();
foreach $line (@lines) {
$dflag = 0;
($num,$k,$dt,$name,$email,$sub,$com,$url,$host,$pw,$col,$rt) = split(/<>/,$line);
# ↑変更
if ($FORM{'del'} eq "$dt") {
$dflag = 1;
$encode_pwd = $pw;
$del_num = $num;
if ($k eq '') { $oyaflag=1; }
}
elsif ($FORM{'del'} eq $rt) { # 以下3行、追加
$dflag = 1;
}
elsif ($oyaflag && $del_num eq "$k") {
$dflag = 1;
}
if ($dflag == 0) { push(@new,$line); }
}
- 333 名前: 302 投稿日: 02/03/24 18:30 ID:???
- >>307
332の方法でうまく出来ました。
ありがとうございました。
- 334 名前: 324 投稿日: 02/03/24 18:41 ID:???
- >>302
忙しいところすいませんが、さっきトリップ付けるのを依頼したものですけど、
メルアド欄を記入しないとトリップはおろか名前まで出てこなくなるみたいなんですが…
- 335 名前: 302 投稿日: 02/03/24 18:49 ID:???
- >>324
はずかし〜。
小1時間まってくださいね。
マジでやりとげますので。
- 336 名前: 324 投稿日: 02/03/24 18:55 ID:???
- >>335
いえいえ、こちらこそ何度もすいません。
メルアド欄が書き込み必須項目になってたので、僕も最初気付きませんでいた。
- 337 名前: 302 投稿日: 02/03/24 18:56 ID:???
- >>324
このデザインの場合、メールアドレスを環境設定にて「入力必須項目」に指定して下さい。
と書いてありますけど。
- 338 名前: 302 投稿日: 02/03/24 18:57 ID:???
- これはどうすれば必須じゃなくなるのでしょうか?
- 339 名前: 324 投稿日: 02/03/24 18:58 ID:???
- アップロードしたあとで管理のところに
書き込み必須項目・・・name,content,mail
とかありましたけど。
- 340 名前: 324 投稿日: 02/03/24 19:02 ID:???
- あっ、すいません。
このBBSって最初からこういう仕組みになってたんですかね。
それなら無理言ってすいませんでした。
- 341 名前: 302 投稿日: 02/03/24 19:03 ID:???
- >>324
すみません。
お役に立てなくて。
- 342 名前: 296 投稿日: 02/03/24 20:17 ID:a/tByZOh
- すみませんまた質問なんですが
質問させて下さい
ttp://www5.cds.ne.jp/~aid/foolcgi/06.html
の文章変換CGIで変換した言葉をフォームに出力するとEUCコードで
文字が出るので文字化けしたりするんです。S-JISコードで文字出した
くていろいろ自分でいじったんですが無理でした。誰かS-JISコードでするには
どうしたらいいか教えて下さい。
CGIをテキスト化↓
http://www.h2.dion.ne.jp/~i-deai/sozai/bunhen.txt
お願いします。
- 343 名前: 投稿日: 02/03/24 20:35 ID:???
- EUC指定してるじゃん
$code = "euc";
↓
$code = "sjis";
- 344 名前: 296 投稿日: 02/03/24 20:46 ID:a/tByZOh
- >>343
ありがとうございます くだらないこと聞いてすみません
- 345 名前: 324 投稿日: 02/03/25 05:37 ID:???
- 昨日の324です。昨日のbbsはちょっと失敗だったもんで、もし差し支えがなければ
今度はこちらにトリップ付けお願いします。http://www.we-box.com/cgi/rb2main.html
アップロードなどで面倒でしょうから、式を入れるところを指示していただけるだけでも結構です。
よろしくお願いします。
ところで、付け足す式ってこれであってますか?
sub trip {
my $key = shift;
$key =~ s/"/"/g;
$key =~ s/</</g;
$key =~ s/>/>/g;
my $salt = substr("${key}H.", 1, 2);
$salt =~ tr/\x00-\x20\x7b-\xff/./;
$salt =~ tr/\x3a-\x40\x5b-\x60/A-Ga-f/;
return substr(crypt($key, $salt), -8);
}
- 346 名前: 324 投稿日: 02/03/25 05:39 ID:???
- すいません。
$name =~ s/◆/◇/g;
$name =~ s/\x23(.+)$/ "◆".trip($1)/e;
が抜けてました。
- 347 名前: nobodyさん 投稿日: 02/03/25 09:13 ID:???
- $myname =~ s/</</g;
の~ sの~とsの間はスペースをあけないと行けないですか?
<だけではなく、>も変換したいときは、
$myname =~ s/</</g;
$myname =~ s/>/>/g;
と2つ書かないといけませんか?
- 348 名前: 296 投稿日: 02/03/25 12:02 ID:jj3+leP3
- ttp://www5.cds.ne.jp/~aid/foolcgi/06.html
の
CGIをテキスト化↓
http://www.h2.dion.ne.jp/~i-deai/sozai/bunhen.txt
前質問して変換した文字を
}
sub pr_html {
print "<TEXTAREA>$bunsyo</TEXTAREA>";
としたら文字がテキストエリアに表示されるようになったんですが
iモードからみるとテキストの中に表示されないんです(泣)
原因わかる方いらっしゃいますか?
- 349 名前: nobodyさん 投稿日: 02/03/25 12:22 ID:gl1wRNze
- i-modeはテキストボックすウツルノカ?
- 350 名前: 296 投稿日: 02/03/25 12:33 ID:jj3+leP3
- >>349
はい
- 351 名前: nobodyさん 投稿日: 02/03/25 12:37 ID:???
- Perlで書かれたCGIを作って公開してる人で、
この人のソースを見てPerlの勉強をしろという
人はいますか?
- 352 名前: nobodyさん 投稿日: 02/03/25 12:58 ID:???
- >>296
http://www.nttdocomo.co.jp/p_s/imode/tag/textarea.html
- 353 名前: nobodyさん 投稿日: 02/03/25 14:36 ID:???
- >>324
http://www.we-box.com/cgi/rb2main.html
$mynameって↑の所が配布しているスクリプトに書いてあったの?
て書くか過去ログとか読んでみた?
- 354 名前: nobodyさん 投稿日: 02/03/25 15:05 ID:???
- >>353
すいませんでした。KENTのを参考にしてやってみます。
- 355 名前: nobodyさん 投稿日: 02/03/25 19:00 ID:???
- KENTのCGIも凄いよね。
なんか駄目なのか初心者の私には分からないけど。
- 356 名前: 356 投稿日: 02/03/26 16:38 ID:Ag222T8Y
- 突然の依頼で申し訳ございません。
http://www.geocities.com/rtewat/petit.txt
こちらのKENT氏の掲示板に
http://www.geocities.com/rtewat/petit_up.txt
こちら側の画像アップロードを付けたいと思ったのですが、
Petit Boardのバージョンが違っているために
うまく機能を取り付けることができませんでした。
どなたか取り付けられるほどのスキルをお持ちの方がおられましたら
画像アップロード機能を取り付けて頂けませんでしょうか?
- 357 名前: nobodyさん 投稿日: 02/03/26 17:55 ID:???
- >>356
やだ。
- 358 名前: nobodyさん 投稿日: 02/03/26 23:15 ID:???
- >>357
無理な事を書いて申し訳ございませんでした。
- 359 名前: nobodyさん 投稿日: 02/03/26 23:18 ID:???
- >357
>やだ。
じゃなくて、オマエにはできないんダロ!!
えらそうにすんな!!
- 360 名前: nobodyさん 投稿日: 02/03/26 23:31 ID:???
- >>359
ごめん
- 361 名前: nobodyさん 投稿日: 02/03/27 00:25 ID:???
- >>360
やだ。
- 362 名前: nobodyさん 投稿日: 02/03/27 02:43 ID:???
- >>361
でもおしえない。
- 363 名前: nobodyさん 投稿日: 02/03/27 20:09 ID:Vxg6xCJc
- YY-Boardで親記事の表示件数はデフォルトで設定できるんですが、
2chでいえば10件というようにトップでの子記事(レス)の件数を設定する方法はあるでしょうか?
また、子記事の件数を制限させる方法があるでしょうか?
検索しても見つけることができなかったので教えてくださいませ。
- 364 名前: nobodyさん 投稿日: 02/03/27 20:19 ID:???
- 子記事を配列に入れて下から10件取って表示すれ
書き方は略
- 365 名前: aaa 投稿日: 02/03/27 21:09 ID:Vxg6xCJc
- >>364
ヒントください
参照サイトがあればうれしいなぁ
- 366 名前: nobodyさん 投稿日: 02/03/27 21:52 ID:???
- >>365
そんな便利なサイトがあったらおれもほしいなぁ
- 367 名前: nobodyさん 投稿日: 02/03/27 22:08 ID:L1nxqVfL
- http://www23.tok2.com/home/tanaka/develop/threadbbs.html
- 368 名前: nobodyさん 投稿日: 02/03/27 22:45 ID:???
- >>365
http://www.perl.com/
- 369 名前: nobodyさん 投稿日: 02/03/27 23:24 ID:???
- >>368
えいごやねんもん・・・
ニホンゴキボンヌ
- 370 名前: nobodyさん 投稿日: 02/03/27 23:40 ID:???
- >>363
はるか昔、WEBプログラミング板がレンタルサーバー、CGI板(tako鯖時代)だったころに
そんな改造があったような、、、。tako鯖は今でも過去ログみれるんかなぁ
- 371 名前: nobodyさん 投稿日: 02/03/27 23:45 ID:???
- tako鯖の過去ログなくなってた、、、。
- 372 名前: kateinojijou 投稿日: 02/03/28 16:58 ID:???
- はじめまして。兵庫県のラブハウスと申します.当方では、飼えなく
なった犬をお引取りし、不幸な犬が増えないよう日々活動しております。ワンちゃん
は、こちらで引き取った後、大事にして下さる
里親さんを探し、見つかるまでの間こちらが責任を持ってお世話させていただきま
す。 なかなか里親さんが見つからなくても、保健所に連れて行ったり、捨てるとい
うこと は一切ありませんので、ご安心ください。
○:●:○:●:○:●:○:●:○:●:○:●
http://isweb37.infoseek.co.jp/family/atp2001/
- 373 名前: nobodyさん 投稿日: 02/03/30 14:02 ID:I3eyv3Uq
-
↓のimgboard v1.22 R6のスクリプト下さい。
- 374 名前: nobodyさん 投稿日: 02/03/30 14:22 ID:???
- ↑アホは逝け
- 375 名前: asuka 投稿日: 02/03/30 17:56 ID:???
- それと、もっと書きこみ隊のCGIに管理モードを付けて、MBS Proでレンタルできるようにする
方法をどなたか教えてください
- 376 名前: asukaka 投稿日: 02/03/30 21:12 ID:???
- age
- 377 名前: nobodyさん 投稿日: 02/03/31 00:30 ID:3oCdf+4h
- 知恵を貸して下さい。
BBSをパスワードで入室制限のものに改造したいのですが、出来るでしょうか?
またパスワードで入室制限付きのBBSスクリプトを配布しているところはありませんか?
- 378 名前: nobodyさん 投稿日: 02/03/31 02:43 ID:???
- >>377
まあ落ち着きなさい。
>BBSをパスワードで入室制限のものに改造したいのですが
できます。で、どのスクリプトを改造したいんですか?
>パスワードで入室制限付きのBBSスクリプト(略)
ああ、まだ探してもいないんですね。じゃあこちらへ。
http://pc.2ch.net/test/read.cgi/php/1013282469/
- 379 名前: 377 投稿日: 02/03/31 10:06 ID:b7Nmir5m
- >>378
レスありがとうございます。
>パスワードで入室制限付きのBBSスクリプトは探したのですが、見つかりませんでした。
ttp://pocket.727.net/dl/
ここのV12.2を現在使用しています。
これを改造したいのです。
こういう質問は「探してますスレ」にいくものなのですか?
- 380 名前: 377 投稿日: 02/03/31 10:08 ID:b7Nmir5m
- 追加
この形が気に入っているので、出来ればこれを改造したいのです。
さもなくば、同じ形態のものでパス付きのスクリプトがあると助かるのです。
- 381 名前: nobodyさん 投稿日: 02/03/31 10:12 ID:IBwhX0HV
- YY-Boardで
>>1←参照レス機能を有効にする方法はありますか?
単独表示する方法は見つけたんですが。
- 382 名前: nobodyさん 投稿日: 02/03/31 14:20 ID:???
- >>377-380
玄人さんからみれば笑われそうなソースのような気がするが、
なんとなくできたので貼り付けてみる
ログを表示させる前にパスワードのチェックをさせるって流れです。
msgbrd.cgiの最初のほう $Ver_No = '12.201'; の下にでも以下の行書いて
$view_password ="keijibanmitai"; # " 〜 "の中がパスワード
あと100行目あたりからを以下のように
elsif($IN{'cmd'} eq 'ver'){
&Ver;
}
else{
&Password_check; # ここ変更
}
exit(0);
#####
# ここからを付けたし
>>383 につづく
- 383 名前: nobodyさん 投稿日: 02/03/31 14:20 ID:???
- >>382の続き
#####
# ここからを付けたし
sub Password_check {
if ($IN{'view_check'} eq $view_password || $IN{'p'} ne "") { &Main; }
elsif ($IN{'view_check'} eq "" || $IN{'view_check'} ne $view_password) {
print "Content-type: text/html\n\n";
&Printhead;
print<<"_EOM_";
<form method="POST" action="$Maincgi">
閲覧パスワードを入れてください
<input type="text" name="view_check"> <input type="submit" value="送信">
</form>
</body></html>
_EOM_
exit;
}
}
#ここまでを付けたし
#####
sub Main{
とりあえずローカルで試したらそれっぽく動いてるので大丈夫かと。
もっと凝ったことしたかっらた、Perl覚えて自分でなんとかしてください。
- 384 名前: nobodyさん 投稿日: 02/04/01 00:36 ID:UbWdTSJx
- age
- 385 名前: 探してるんです 投稿日: 02/04/01 09:49 ID:TtQlzVFz
- http://www.rescue.ne.jp/cgi/furiwake/
このcgiですが、認証後に表示されたページ以外は見れなく
することはできないものでしょうか。
他のスレッドにも書き込んだのですが、
ここがピッタリのところだと思いますので
今一度書かせていただきました。
- 386 名前: nobodyさん 投稿日: 02/04/01 12:30 ID:???
- >>385
ムリ。
- 387 名前: nobodyさん 投稿日: 02/04/01 13:41 ID:???
- CGIへの直リンク禁止処理を追加する
ということをやろうと思いましてやってみたのですが、
許可をしたアドレスからもはじかれてしまいます。
どこかが間違っているのでしょうか?
お願いします。
##特定したURL以外アクセス禁止(1ならする、0ならしない)
$badurl = '1';
##上記で1にした場合そのURL指定(CGIを設置するページ)
#リンク許可ページのURL (正確に記入。複数指定可)
$url[1] = 'http://';
$url[2] = 'http://';
$url[3] = '';
$url[4] = '';
if($badurl) {
$url[0] = $script;
$ENV{'HTTP_REFERER'}=~ s/%(..)/pack("C",hex($1))/eg;
if($ENV{'HTTP_REFERER'}){
for(@url){
if($_ && $ENV{'HTTP_REFERER'} =~ /^\Q$_\E/){
$flag = 1;
last;
}
}
}
if($badurl && $flag != 1) { &error("CGIへの直リンクは禁止です"); }
}
- 388 名前: nobodyさん 投稿日: 02/04/01 13:54 ID:???
-
- 389 名前: 探してるんです 投稿日: 02/04/01 13:55 ID:d8PhHCaw
- >>386
むりですか・・・
レス有り難うございました。
385で書いたようなcgiを使いたいときは
どこかに発注しなければいけないんでしょうかね。
その場合費用はいくら位なのでしょうか。
ご存じの方はご教示下さい。
- 390 名前: nobodyさん 投稿日: 02/04/01 14:06 ID:???
- 普通に.htaccessで細かく設定すればいいじゃん。
- 391 名前: nobodyさん 投稿日: 02/04/01 14:07 ID:???
- >>389
おれなら、作業にかかった日数×2万円で受ける。
ただし、瑕疵責任については、負わない。
- 392 名前: nobodyさん 投稿日: 02/04/01 15:57 ID:???
-
- 393 名前: nobodyさん 投稿日: 02/04/01 20:27 ID:???
- age
- 394 名前: 377 投稿日: 02/04/01 20:44 ID:7BoT4DGK
- >>382
ありがとうございます。とても感謝しています。
早速やってみます。
- 395 名前: 投稿日: 02/04/02 12:34 ID:???
- http://www.rescue.ne.jp/cgi/2shot3/
のチャットでチャットの利用状況を下のように簡単に表示させることってできますか?
[1号館] 待 空 満 空 空 空 空
[2号館] 待 空 空 空 空
[3号館]空 空 空 空 空
- 396 名前: nobodyさん 投稿日: 02/04/02 13:08 ID:???
- できます。
- 397 名前: nobodyさん 投稿日: 02/04/02 13:22 ID:???
- 出来ますなぁ。
- 398 名前: nobodyさん 投稿日: 02/04/02 13:38 ID:???
- >>387
お願いします。
- 399 名前: 395 投稿日: 02/04/02 13:42 ID:???
- でたらめにいじってたらなんとか状況表示できるようになったんですが
満
空
空
って感じで縦に表示されてしまいます。横に並べるにはどうしたらいいでしょうか?
CGIをテキスト化したもの
http://www.h2.dion.ne.jp/~i-deai/sozai/scan.txt
- 400 名前: nobodyさん 投稿日: 02/04/02 13:52 ID:vQkiGH9y
- >>399
縦に並ぶと言うことは、満なり空なりの後に<BR>タグが入っている事ですよね?
ということは?
- 401 名前: nobodyさん 投稿日: 02/04/02 13:55 ID:???
- <HR>に変えてみるって事・・・かな・・・?
- 402 名前: 395 投稿日: 02/04/02 13:56 ID:???
- >>400
そう<center>はずしたら横になったんですが
空 満 空
って感じで空白ができてしまうんです(鬱
- 403 名前: 395 投稿日: 02/04/02 14:14 ID:???
- できましたありがとうございました。
- 404 名前: 400 投稿日: 02/04/02 14:21 ID:vQkiGH9y
- trもtdも取ったら?
スクリプトが吐き出したソースを眺めてごらん。
- 405 名前: nobodyさん 投稿日: 02/04/03 00:41 ID:GttiUx1R
- http://www.t-okada.com/shu1_note/11_13_log.html
このBBSを使いたいのですが、投稿時にタグが使えないようです。
使えるようになりますか?
スクリプトのダウンロードは下記です。
http://www.t-okada.com/cgi/s_downloader1/
- 406 名前: nobodyさん 投稿日: 02/04/03 01:13 ID:???
- ダウンロードしろってか
- 407 名前: 405 投稿日: 02/04/03 01:15 ID:GttiUx1R
- ここに書いても良いですか?
- 408 名前: nobodyさん 投稿日: 02/04/03 01:15 ID:???
- ソースを何処かにアップしてurl貼る。
- 409 名前: nobodyさん 投稿日: 02/04/03 01:22 ID:???
- >>405
スクリプトをわざわざダウンロードさせる気ですか?
しかもメールアドレス書かせてそこに送りますなんて
仕組みのとこ気分的に非常にイヤですな。
txt形式にしてどこかにUPしる!と言いたいとこだが、
下の2行のような記述あるとこ探して削除してみ。
○○○ =~ s/</</g;
○○○ =~ s/>/>/g;
それでもダメならスクリプトをtxt形式にしてどこかに
UPしる!
- 410 名前: nobodyさん 投稿日: 02/04/03 01:24 ID:???
- 変換されるの忘れてた、、、
○○○ =~ s/</</g;
○○○ =~ s/>/>/g;
- 411 名前: nobodyさん 投稿日: 02/04/03 01:25 ID:???
- >409
アホ発見!
- 412 名前: nobodyさん 投稿日: 02/04/03 01:28 ID:???
- >>411
だよね。シンデクル、、、
- 413 名前: 405 投稿日: 02/04/03 03:19 ID:GttiUx1R
- >>410
検索で探してみたのですが、見あたりません。
メインのcgiの中にあるんですよね。
どこかにアップします。少しお待ち下さい。よろしくお願いします。
- 414 名前: 405 投稿日: 02/04/03 18:19 ID:2YgAzoOm
- http://www.miniflo.com/cgi/up/source/063.txt
アップしました。
どなたかよろしくお願いします。
- 415 名前: nobodyさん 投稿日: 02/04/03 19:07 ID:???
- >>414
sl1_bbs_cfg.cgi
これを見せれ。
- 416 名前: 405 投稿日: 02/04/03 20:19 ID:anNonN4H
- >>415
はい
http://www.miniflo.com/cgi/up/source/064.txt
- 417 名前: nobodyさん 投稿日: 02/04/03 20:30 ID:???
- 欲しい部分がないな。
sl1_bbs_r.cgi と sl1_bbs_o.cgi と sl1_bbs_a.cgi も・・・・か?
- 418 名前: nobodyさん 投稿日: 02/04/03 21:13 ID:???
- バラバラにしまくってるな。
このcgi
- 419 名前: nobodyさん 投稿日: 02/04/03 22:25 ID:???
- いわゆるモジュール化ってやつですね!!
- 420 名前: nobodyさん 投稿日: 02/04/03 22:39 ID:???
- 書き込み処理をしてるのはsl1_bbs_r.cgiかな?
- 421 名前: 405 投稿日: 02/04/04 02:57 ID:Psb3orCt
- http://www.miniflo.com/cgi/up/source/066.txt
お世話になります。
このBBSはこのまま設置しようとしても構文エラー頻発します。
あらゆる所をかきかえなくてはなりません。
勿論必要なところは書き替えてます。
#!/usr/local/bin/perl を
#!/bin/perlに変えるとか、パーミッションの設定とかは出来ています。
エラーが無くなれば、今度は警告が出ます。結局まだ設置出来てません。
何なんでしょうか?
設置しようとしているサーバーはwakwakです。
- 422 名前: nobodyさん 投稿日: 02/04/04 03:07 ID:???
- つか、タグ仕様可能か不可能か設定できそうじゃない?
sl1_bbs_cfg.cgiみせてみれ
- 423 名前: nobodyさん 投稿日: 02/04/04 03:08 ID:???
- 一応、書いておくな。
sub check_data {
my ($value_data) = @_;
# $value_data =~ s/</</ig;
# $value_data =~ s/>/>/ig;
$value_data =~ s/\|\|\|//g;
$value_data =~ s/\r\n/<BR>/g;
$value_data =~ s/\r/<BR>/g;
$value_data =~ s/\n/<BR>/g;
&jcode'convert(*value_data,$mycode);
if ($mycode eq 'sjis') { &jcode'h2z_sjis(*value_data); }
if ($mycode eq 'euc') { &jcode'h2z_euc(*value_data); }
return $value_data;
}
こうする。
- 424 名前: nobodyさん 投稿日: 02/04/04 03:10 ID:???
- ミスった。
$value_data =~ s/</</ig;
$value_data =~ s/>/>/ig;
この2行を探して先頭に#を付けるだけ。
- 425 名前: nobodyさん 投稿日: 02/04/04 03:11 ID:???
- 設置できるできんは自分で
- 426 名前: nobodyさん 投稿日: 02/04/04 03:16 ID:???
- 一応。
http://www.wakwak.com/info/connection-setup/ftp/custom-cgi.html
- 427 名前: 405 投稿日: 02/04/04 03:52 ID:Psb3orCt
- >>424
ありがとうございます。
sl1_bbs_r.cgi
の中にありました。
- 428 名前: nobodyさん 投稿日: 02/04/04 03:59 ID:???
- >427
ソースを見たところ、あんまりいいたくはないけど
もっと処理速度を上げられる書き方があるのに..という箇所が随所に
見られました。今後Perlを勉強してチューンナップしていってください。
- 429 名前: nobodyさん 投稿日: 02/04/04 06:28 ID:LDcuVgD6
- はにゃ〜んってなんですか?
知り合いが使っていた言葉なのですが
- 430 名前: nobodyさん 投稿日: 02/04/04 06:29 ID:???
- >>429
ごめんなさい。スレ違いの誤爆です、気にしないでください。
- 431 名前: nobodyさん 投稿日: 02/04/04 17:53 ID:???
- http://www.geocities.co.jp/Milano-Killer/6249/uploadcgi.txt
えぇと、このアップロード掲示板の表示をソートしたときに
逆順にソートできないでしょうか?
新しい投稿を上にもってきたいのです。
- 432 名前: nobodyさん 投稿日: 02/04/05 01:15 ID:???
- >431
たったこれだけの処理で2500ステップもあるから、もっとコンパクトに
整理して書き直したほうがいいのでは? ざっと見ただけで動作確認はしません
でしたが、一応以下に書いておきます。
2427行および2456行を↓のように書き替える。
@array= reverse sort @array;
- 433 名前: 431 投稿日: 02/04/05 12:21 ID:???
- >>432
おぉ。どうもありがとうございます。動作確認いたしました。
reverse ってそう記述するんですね。
- 434 名前: nobodyさん 投稿日: 02/04/05 13:53 ID:vHWX7n4+
- http://www.b-u-g.net/
↑にあるTbookmarkplusについてなのですが、
登録画面と、変更・削除画面を分けたいのです。
よろしくお願いします。
- 435 名前: nobodyさん 投稿日: 02/04/05 14:11 ID:???
- >>434
http://www.b-u-g.net/cgi-bin/bstbp/cbbs.cgi?mode=al2&namber=57&rev=&no=0
ほほぉ〜マルチポストですか。なかなかの教えて君っぷりですな。
二度とくるな。
- 436 名前: nobodyさん 投稿日: 02/04/05 14:13 ID:UiVSKNUe
- http://www.kent-web.com/
ここの COM CHATをiモード対応にしたいです。
- 437 名前: nobodyさん 投稿日: 02/04/05 15:06 ID:???
- フレームをどうにかせい
Locationでログに飛ばしてみては?
- 438 名前: 436 投稿日: 02/04/05 15:15 ID:UiVSKNUe
- ちなみに、perl知識はほとんど0に近いです・・・
- 439 名前: nobodyさん 投稿日: 02/04/05 15:22 ID:???
- >>436
そのチャットのどういうところに惹かれてそのチャットをi-mode対応にしたいの?
すでにi-mode対応の別のチャットにCOM CHATの機能をつけるという手段もあるべ。
- 440 名前: 436 投稿日: 02/04/05 15:28 ID:UiVSKNUe
- 動作の軽さ、シンプルさかな?
ここのDXチャットの携帯版と同じような
機能をつけたいんだけど・・・・
- 441 名前: 436 投稿日: 02/04/05 15:34 ID:UiVSKNUe
- ここってのは
http://www.cgiboy.com/
- 442 名前: nobodyさん 投稿日: 02/04/05 17:44 ID:???
- >436
perlの知識ほぼ0で改造を考える君は凄いと思う。
- 443 名前: 436 投稿日: 02/04/05 18:22 ID:u7CcrBBe
- HTML表示部ぐらいの知識ならありますけど・・・
あとは$とか
- 444 名前: nobodyさん 投稿日: 02/04/05 19:27 ID:79Gl0aG1
- YY-BOARD型の掲示板の色選択のところにテキストボックスを追加して、
そこに色名を入れてもらい、その色で記事を表示するようにしたいのです。
(従来の■による色選択も活かしたまま、追加したい)
スクリプトは下記にアップさせてもらいました。
http://www.geocities.co.jp/HeartLand/1575/board.txt
どうかよろしくお願いします。
- 445 名前: nobodyさん 投稿日: 02/04/05 21:25 ID:YOkmh3/V
- >>444
教えてやろうか?
ラジオの部分をテキストにしやがれ。
- 446 名前: nobodyさん 投稿日: 02/04/06 00:41 ID:???
- >>436
その前に>>1ぐらい読めや。
- 447 名前: 春厨房 投稿日: 02/04/06 00:48 ID:+tk8w0bj
- 皆さん、はじめまして。こんばんは。
下のしりとりCGIで、「名前」と「しりとりの言葉」以外に、「コメント」の欄もつけたいんですが、
そのためにはどこをどう改造すれば宜しいでしょうか?
どうか教えてくださいまし。よろしくおねがいします。
↓
http://www.geocities.co.jp/SiliconValley-Cupertino/4960/siritori.txt
- 448 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 01:27 ID:NYi0ELIt
- >>447
やってみますので、12:00マデ待ってください。
でも、その前に誰かやっちゃうかも。
- 449 名前: nobodyさん 投稿日: 02/04/06 01:37 ID:SGfKyt/H
- 【コピペ1周年】同時多発オーダーIN吉野家【祭り】
(1)馴れ合い禁止。(一人で来る事。同伴禁止:いても知らぬ顔)
(2)「大盛りねぎだくギョク」を頼むこと。(並盛りねぎだくギョクも可)
(3)各会場ごとに指定時間厳守で現地集合。
(4)食ったら即帰る。
注)吉野家は家に帰るまでが吉野家です。
http://ex.2ch.net/test/read.cgi/entrance/1017935504/l50
http://www2.mnx.jp/carvancle/yoshigyu/ スレよりぬき等
- 450 名前: 春厨房 投稿日: 02/04/06 10:09 ID:YHKRj1tK
- >>448さん、どうも有難う御座います♪ごゆっくりで構いません。
どうぞよろしくおねがいします。
- 451 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 10:26 ID:NYi0ELIt
- >>450
スミマセン、寝坊してしまいました。
もしかしたら12:00過ぎてしまうかもしれません。
あと、コメントって書いた人全員の記録しておくんですか?
それからどこに表示するんでしょう?
- 452 名前: 春厨房 投稿日: 02/04/06 11:34 ID:zR3Pbdrf
- >>451さん
おはよう御座います、どうもです♪
よく見てみたら、このしりとりは「言葉」だけしか登録できないみたいでした。
だから、先ほどの「コメント」の欄を追加以外に「名前」追加出来るようにしてくださいまし。
本当に手前勝手ですみません。
-------------------------------------------
はい。コメントは書いた人全員分記録でお願いします。
表示の仕方は、ボックス部分が↓こんな感じでお願いします。
<center>
お名前:<input type="text" name="username" size="30" maxlength="200"><br>
言 葉:<input type="text" name="strings" size="30" maxlength="200"><br>
一 言:<input type="text" name="com" size="30" maxlength="200"><br>
初めの読みをひらがな一文字で:<input type="text" name="first" size="2" maxlength="2"> <br>
最後の読みをひらがな一文字で:<input type="text" name="end" size="2" maxlength="2"> <br>
</center>
表示部は↓こんな感じで宜しくお願い致します。(タグ怪しいかも)
<CENTER><table cellspacing=0 cellpadding=0 width=90%>
<tr><td colspan=2><hr size="1" color=#000000 width="100%"></td></tr>
<tr><td rowspan=2 align=right width=30><input type="checkbox" name="1"></td><td><b><font size="4" color="適当">「(言葉)」</font></b>
<font size="2" color="適当">(名前)(日時)</font> <font size="2" color="適当">No.1</font></td></tr>
<tr><td><font size="2" color="適当">(コメント)</font></td></tr>
</table></CENTER>
どうぞ宜しくお願い致します。時間は全く気にしておりません。ごゆっくりで結構です。
- 453 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 11:36 ID:NYi0ELIt
- >>450
とりあえずできました。
入力フォームがちょっと汚らしいので、いぢってください。
zip自己解答形式です。
http://www.sgmt.jp/files/siritori.exe
- 454 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 11:48 ID:NYi0ELIt
- >>452
どうやら同時レスだったみたいです。
今からもう一回やりますので、お待ちください。
- 455 名前: nobodyさん 投稿日: 02/04/06 12:25 ID:???
- 自己解凍形式は止めた方が…。
- 456 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 12:29 ID:NYi0ELIt
- >>452
できました。
ちょっと皆さんもテストしていただけませんが?
http://www.sgmt.jp/cgi-bin/siritori/siritori.cgi
>>455
やめます。
- 457 名前: 春厨房 投稿日: 02/04/06 12:53 ID:2fTm3+Oy
- >>456さん、どうも有り難う御座います。本当に感謝です。
今からテストさせていただきます。
- 458 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 12:56 ID:NYi0ELIt
- >>457
ラウンジの人は書き込んでくれません(w
access_logはすごいことになってますが。
- 459 名前: 春厨房 投稿日: 02/04/06 14:08 ID:1Z1uOFRv
- ども、遅れましたがテストさせていただきました。
すごいです!バッチリです♪
有難う御座いました。
- 460 名前: 春厨房 投稿日: 02/04/06 14:10 ID:1Z1uOFRv
- あ!・・・それでどこをどんな風に改造すれば宜しいでしょうか?
教えてくださいまし。ほんとに手間かけてすみません・・。宜しくお願いします
- 461 名前: nobodyさん 投稿日: 02/04/06 14:17 ID:???
- 矢野 最高!
- 462 名前: nobodyさん 投稿日: 02/04/06 14:17 ID:???
- 誤爆スマソ
- 463 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 14:28 ID:NYi0ELIt
- >>460
http://www.sgmt.jp/files/siritori.zip
遅くなってすいません。
- 464 名前: 春厨房 投稿日: 02/04/06 16:01 ID:90jMp2AA
- >>463さん
ダウンロード&設置させていただきました。ばっちり作動しました♪
本当にどうも有り難う御座います。このご恩は忘れません。
それでは失礼します。
- 465 名前: nobodyさん 投稿日: 02/04/06 17:16 ID:hOQwElKs
- ,、_ __,....,_ _,...、
,} {`i;:r,;'ニ (;;;;、` , r'
. {i' i:.'ー<.・)}:ム ヾi,
キタ━━━━━━━ノ // -r /:::ミ ('ーヽ━━━━━━━━━??!!
i゙ i:/ /二./ /',=、__ノi/
ヽ ヽ! {:::} //::::''´`'7!/
ヽ、__ヽ!l::i:::::ii;;;;;;;|,ノ
`ヽ、`ー""ヽ
`'ー-'''"
- 466 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/06 18:54 ID:NYi0ELIt
- >>464
文字化けの件は大丈夫でしょうか?
>>465
どんな顔なのかわからない。
- 467 名前: 464 投稿日: 02/04/06 19:58 ID:SOc4N1tk
- >>466さん
半角カナを入れるとさすがに文字化けしますが、それ以外なら全く問題無いです♪
お心遣いどうもありがとうございます。
- 468 名前: nobodyさん 投稿日: 02/04/06 21:00 ID:???
- 化けた
- 469 名前: hanamogera ◆kkkKkkko 投稿日: 02/04/07 09:58 ID:???
- >>467
jcode.pl使って半角かなを全角に変換したほうがいいと思います。
- 470 名前: 464 投稿日: 02/04/07 12:27 ID:0a2d4Joj
- >>469さん、
うーん・・・半角カナは使わないように書いておいたので別にいいです。
・・・すみません。(汗)
- 471 名前: キタ━━━━━━━━(゚∀゚)━━━━━━━━! 投稿日: 02/04/07 15:39 ID:???
- __,,..、、- - - .、、...,,___
,,、‐''"~ ̄  ̄``''‐、、
/ \
/ ヽ
/ ヽ
/ / ~~` '' ‐- 、、 ,,__ __ ,,..、、 -‐ '' "~~\ ヽ
| / __  ̄ __ ヽ |
.| { ´ ‐- ....__ __... -‐ ` } .|
.| 〉,,・^'' - .,, ~ i ~ __,,.- ^`・、.〈 |
./ ̄| /,/~ヽ、 `'' ‐--‐ ,.| 、‐-‐'' "~ _ノ~\,ヽ | ̄ヽ
| (` | / ヽ,,_____`‐-、_、..,,___ノ八ヽ___,,.._-‐_'"´___,, ノ ヽ .|'´) |
| }.| ./' \二二・二../ ヽ / ヽ、二・二二/ 'ヽ | { |
.| //| .| / | |. \ | |ヽヽ|
.| .| | .| / | |. \ | | | .|
|ヽ.| | / .| |. ヽ .| .|./ .|
| .| | / | | ヽ | | /
ヽ .| | / .| | ヽ | | /
.ヽ.| | / '二〈___〉二` ヽ | |./
| | `-;-′ | |
iヽ|. ,,... -‐"`‐"`'‐- 、、 |/i
| ヽ /...---‐‐‐‐‐----.ヽ / .|
| ヽ. ,, -‐ ''"~ ~"'' ‐- 、 / |
.| ヽ ! ./ .|
,,| ヽ. | ./ |、
|\. ヽ / /.|
.|. \. ヽ、____ ___/ / .|
- 472 名前: nobodyさん 投稿日: 02/04/07 21:42 ID:XlY3TlqR
- 17氏スクリプトのVER16なんですが、
i-modeで見たときのread.cgiで、
現在の2chのように前の10レス・次の10レスに対応したいんですが、
教えてください
- 473 名前: nobodyさん 投稿日: 02/04/07 23:20 ID:???
- 死ネ
- 474 名前: nobodyさん 投稿日: 02/04/08 12:39 ID:Udb0KNLP
- http://www2q.biglobe.ne.jp/~terra/cgi/password.htm
上記のようなCGIでアクセス制限をかけたBBSがあります。
それでこのBBSをブックマーク出来ないようにする方法はありますでしょうか?
- 475 名前: nobodyさん 投稿日: 02/04/08 17:00 ID:???
- >>474
マイクロソフトやネットスケープにお願いしてください。
- 476 名前: nobodyさん 投稿日: 02/04/08 18:54 ID:???
- なんか、ブックマーク弾ける奴どっかで見たな。でも忘れた。探せ。
- 477 名前: nobodyさん 投稿日: 02/04/08 19:18 ID:???
- >>476
Javascriptでreffererが空白ならそれはブックマーク。
- 478 名前: 474 投稿日: 02/04/08 23:08 ID:5LgVRzDy
- >>477
どういうことですか?
- 479 名前: nobodyさん 投稿日: 02/04/08 23:25 ID:???
- >>478
君には無理ってこった。
- 480 名前: nobodyさん 投稿日: 02/04/09 18:23 ID:10B4imLY
- >>474
$ref = $ENV{'HTTP_REFERER'};
if ($ref eq "") { print"氏ねやカス!"\n; }
でどう?
- 481 名前: nobodyさん 投稿日: 02/04/09 18:24 ID:???
- スマソ間違えた
$ref = $ENV{'HTTP_REFERER'};
if ($ref eq "") { print"氏ねやカス!\n"; }
- 482 名前: age 投稿日: 02/04/10 21:49 ID:???
- age
- 483 名前: 質問すんません 投稿日: 02/04/10 21:51 ID:???
- キーボードのあるボタンを押したり連打したりできるスクリプトってありますでしょうか?
- 484 名前: nobodyさん 投稿日: 02/04/10 21:56 ID:???
- >>483
不可能。
キーボードが勝手に動いたら心霊現象。
- 485 名前: nobodyさん 投稿日: 02/04/10 21:58 ID:???
- >>483
ここはWebProg板ですが、何か?
- 486 名前: nobodyさん 投稿日: 02/04/11 13:44 ID:???
- http://members.tripod.co.jp/fukudakanbouchoukan/yybbs.txt
この掲示板にて
レスが一定数を超えると
返信フォームでもレスがつけられないようにし、
なおかつお知らせが出るようにしたいです。
現状
http://members.tripod.co.jp/fukudakanbouchoukan/a.html
↓
このような感じにしたいです。
http://members.tripod.co.jp/fukudakanbouchoukan/b.html
お願いします。
- 487 名前: nobodyさん 投稿日: 02/04/11 16:55 ID:???
- >>486
設定項目の適当なところに追加
# 1スレッドの最大記事数
$res_max = 10;
670行目以降にある返信フォームのとこをいじる
# 関連記事出力
print "- 以下は、記事NO. <B>$in{'no'}</B> に関する<a href='#RES'>返信フォーム</a>です -<hr>\n";
$count=0; # ***** この行追加 *****
while (<IN>) {
($no,$reno,$date,$name,$mail,$sub,$com,$url) = split(/<>/);
(このへん省略)
print "<font color=$sub_color><b>$sub</b></font> 投稿者:<b>$name</b> 投稿日:$date $url <font color=$sub_color>No\.$no</font><br>\n";
print "<blockquote>$com</blockquote><hr>\n";
++$count; # ***** この行追加 *****
}
}
close(IN);
続きは >>488
- 488 名前: nobodyさん 投稿日: 02/04/11 16:56 ID:???
- >>487の続き
# タイトル名
if ($resub !~ /^Re\:/) { $resub = "Re\: $resub"; }
# ***** ↓ここから *****
if ( $count >= $res_max ) {
print "返信が多くなってきたため、新規投稿で新スレを建ててください。<br><br>\n";
print "<a href=\"$script\">掲示板に戻る</a>\n";
} else {
# ***** ↑ここまで追加 *****
print <<"EOM";
<a name="RES"></a>
print "</td></tr></table></form>\n";
print "</blockquote>\n</body>\n</html>\n";
} # ***** この行追加 *****
exit;
}
#----------------#
# デコード処理 #
#----------------#
おわり
- 489 名前: nobodyさん 投稿日: 02/04/11 17:36 ID:???
- >>487
>>488
ありがとうございました。
感動で涙が止まりません。
本当にありがとうございました。
- 490 名前: nobodyさん 投稿日: 02/04/12 17:54 ID:Rf4zpV9v
- すみませんが質問させて下さい。
http://tackysroom.com/sample/smp_tackynote992.cgi
上記日記CGIを、特定の記事数ごとに表示するにはどうしたらよいでしょうか?
設定では月ごとか1日のみかどちらかしか選択できなくて、
1日ごとだと表示が面倒で、月ごとの表示だと重くなってしまうので…
ソースは
http://moe43.tripod.co.jp/cgi/tackynote.txt
です。どなたかよろしければ知恵を貸してやって下さい。
- 491 名前: nobodyさん 投稿日: 02/04/12 21:43 ID:???
- >>490
http://tackysroom.com/sample/smp_tackynotesp.cgi
一週間づつの表示ができる新しいVersionのがあるみたいですけど
これじゃダメなんですか?
- 492 名前: 490 投稿日: 02/04/12 22:29 ID:???
- すみません…!見落としていたようです!
完全にこちらのミスです。
お手数をおかけして本当に申し訳ありませんでした。
わざわざ教えて下さってありがとうございました。
これからは初歩的(と言うのもバカバカしい…)ミスをしないように気を付けます…
- 493 名前: nobodyさん 投稿日: 02/04/12 23:00 ID:OHj6Fi0K
- http://ww81.tiki.ne.jp/~mikan-mt/c/
http://sirizamurai.s4.xrea.com/sample/r_board.cgi
ここで配布されているr_boardというスレッドフロート式掲示板なのですが
レスをした後にスレのトップではなく掲示板のトップへ戻るように改造できないでしょうか?
- 494 名前: nobodyさん 投稿日: 02/04/13 06:57 ID:a/Dbri8B
- >>493
ワードパッドで開くような、でかいスクリプトを改造する気がしない
#---------------------------------------------------------------main
&decode;
&count;
if (-e "$mainte") { &error('メンテナンス中です。しばらくお待ちください。'); }
if ($in{'command'} eq "write") { &write; }
elsif ($in{'command'} eq "reswrite") { &reswrite; }
elsif ($in{'command'} eq "remove") { &remove; }
elsif ($in{'command'} eq "rjump" ) { &rjump; }
elsif ($in{'command'} eq "download") { &download; }
else { &html; }
exit;
#---------------------------------------------------------------html
を、どうにかしたらいいんじゃない?
- 495 名前: nobodyさん 投稿日: 02/04/13 07:54 ID:???
- >493
そんなもん、レスの処理の後に Location で飛ばせばいいだけのことだろ。
>494
きみはプログラミングにメモ帳つかってる初心者だろ。
- 496 名前: nobodyさん 投稿日: 02/04/13 13:40 ID:???
- >>495
まともに答えられないなら無理して書き込まなくて良いんだよ?w
- 497 名前: nobodyさん 投稿日: 02/04/13 14:44 ID:VMPYMAwG
- アメリカのCGIの日本語化に挑戦しています。
が、フォームに入力した日本語が、どうしてもうまく表示されません。
cgi-lib.plというのが悪いような気がするのですが…。
これって、定番のライブラリですが、
うまく日本語化する方法はないのでしょうか?
やってることは、
require './jcode.pl';
と書いて、
&ReadParse(cgi-binでやる)
の後とかその中とかに、
&jcode'convert(*val,'sjis');
と書いたり、いろいろ試したのですが、ダメ。
1週間、ずーといろいろやったのですが、
どうしても、うまく行きません。
- 498 名前: nobodyさん 投稿日: 02/04/13 14:46 ID:???
- >>497
>>1
なお、質問するときは
1)そのスクリプトのある場所(URL必須、拡張子".txt"でアップすればなお良し)
2)どんな風に改造して欲しいのか? (完成イメージHTMLを用意すればなお良し)
を必ず明記しよう。
- 499 名前: nobodyさん 投稿日: 02/04/13 14:50 ID:VMPYMAwG
- >>498
cgi-lib.plというのは定番ライブラリで、
定番的処理の方法があるんじゃないかと
思って、質問しているのですが…。
どんなスクリプトにも対応できる
標準的なやり方ってないんですか?
- 500 名前: nobodyさん 投稿日: 02/04/13 14:57 ID:VMPYMAwG
- cgi-libのなかに、次のように書いても、
ダメなものですか?
# Convert %XX from hex numbers to alphanumeric
$key =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
$val =~ s/%([A-Fa-f0-9]{2})/pack("c",hex($1))/ge;
# 次の1行追加
&jcode'convert(*val,'sjis');
# Associate key and value
$in{$key} .= "\0" if (defined($in{$key})); # \0 is the multiple separator
$in{$key} .= $val;
- 501 名前: nobodyさん 投稿日: 02/04/13 15:29 ID:???
- >>494=496ってバカ?
- 502 名前: nobodyさん 投稿日: 02/04/13 15:44 ID:???
- 粘着が何かほざいてるよ ププ
- 503 名前: 501 投稿日: 02/04/13 16:14 ID:???
- 496が494へのレスなら納得なんだがなぁ
ちなみに495は俺じゃないぞ
- 504 名前: nobodyさん 投稿日: 02/04/13 17:40 ID:???
- >>499
cgi-lib.plって初めて知ったよ。
で、作者様のページのサンプル
http://cgi-lib.berkeley.edu/ex/simple-form.html
で、ちゃんと日本語入力できて表示できてるんだけど・・・
やっぱおまえさんが自力で書いた部分に問題があるんじゃないかと。
- 505 名前: 494 投稿日: 02/04/13 18:01 ID:???
- >>495
そうさ漏れは初心者さ
誰だって始めはそうだろ?
- 506 名前: 500 投稿日: 02/04/13 18:24 ID:VMPYMAwG
- >>504
たしかに、表示されました。
ということは、jcode.plは
なんのためにあるんですか?
- 507 名前: 504 投稿日: 02/04/13 19:03 ID:???
- >>506
そりゃもちろん、漢字コードを変換するためさね。
- 508 名前: nobodyさん 投稿日: 02/04/13 19:10 ID:???
- >493
r_boardの件
801行の
$in{'command'} = 'read';
を削除です
>497
r_boardのデコードサブルーチン
sub decode {
my ($name,$value);
&ReadParse;
while (($name,$value) = each %in) {
if ($name ne "file") {
&jcode'convert(*value, "sjis", "", "z");
$value =~ s/\&/&/g;
$value =~ s/</</g;
$value =~ s/>/>/g;
$value =~ s/\"/"/g;
$value =~ s/\r\n/<BR>/g;
$value =~ s/\r|\n/<BR>/g;
}
$in{$name} = $value;
}
}
- 509 名前: nobodyさん 投稿日: 02/04/14 02:16 ID:???
- http://ime.nu/us.f1.yahoofs.com/users/dd38ef39/bc/My+Documents/VenumX+Bot.zip?bcLKLC9ALboRle9Z
- 510 名前: 500 投稿日: 02/04/14 04:56 ID:ej0dAZG8
- >>508
レスありがとうございます。
初心者なもんで、苦労しましたが、
日本語がうまく表示されない原因は他にありました。
(メタキャラクタをはじくようなサブルーチンがあった。
これで1週間以上ムダにした)
なお、504さんがいうように、
jcode.plなしでも日本語表示できるのですが、
これは、jcode.plは使わなくてもいいということでしょうか?
- 511 名前: nobodyさん 投稿日: 02/04/14 05:05 ID:???
- >>502=505 粘着死ね
- 512 名前: nobodyさん 投稿日: 02/04/14 10:19 ID:???
- 憐れな>>511は無視な方向で。。
- 513 名前: nobodyさん 投稿日: 02/04/14 12:42 ID:???
- ↑
無視できない奴
- 514 名前: nobodyさん 投稿日: 02/04/14 14:15 ID:IPbdNQdj
- imgboard v1.22 R6ってIP隠せないんですか?
丸見えなんですが。
- 515 名前: nobodyさん 投稿日: 02/04/14 14:20 ID:???
- >>514
>>1読んで出直してね
- 516 名前: nobodyさん 投稿日: 02/04/14 17:05 ID:???
- ASPが実行環境のVBscriptで組んでるサンプルですが、
DBのフィールドが数値型の場合はどこを変更すればいいですか?
http://www.lint.ne.jp/~tomo/asp/lint.ne.jp/dbacc/addasp.htm
- 517 名前: nobodyさん 投稿日: 02/04/14 18:29 ID:???
- >>516 マルチポスト君
- 518 名前: nobodyさん 投稿日: 02/04/14 18:33 ID:???
- >>517
は?
- 519 名前: nobodyさん 投稿日: 02/04/14 18:35 ID:???
- >>517
こっちはスクリプト改造でしょ?マルチと言われるのは
心外ですな。( ゚Д゚)
- 520 名前: nobodyさん 投稿日: 02/04/14 19:13 ID:SYUFOo/D
- >>500
jcode.plなんかいらないよね〜
あれ、なんで必要なのか知ってる人いる?
- 521 名前: 520 投稿日: 02/04/14 19:14 ID:SYUFOo/D
- あ、スレ違いか・・・
- 522 名前: 500 投稿日: 02/04/14 21:04 ID:ej0dAZG8
- >>520
ほんとにいらないの?
でも、なんか心配。
- 523 名前: 507 投稿日: 02/04/14 21:38 ID:???
- >>522
ブラウザから入力された漢字コード(IEならSJISかな。i-modeは
確実にSJIS)を、変換したい(UNIXなら大抵EUC。メールに入れて
送る時はJIS)ときに使うだけで、変換しないなら要らないよ。
- 524 名前: ほほ 投稿日: 02/04/15 09:53 ID:7Ngfgl5F
- 初心者コーナーPart11 から誘導されてきました。
http://www.kent-web.com/bbs/sample/light.cgi
このcgiに
http://yassu.no-ip.com/haikyo/cgi-bin/log.cgi?room=001
のようにURL指定すると画像張り付くようなことがしたいです。
どのようなソースをどこに付け足せばよいですか教えてください。
- 525 名前: ◆l0DtPXyM 投稿日: 02/04/15 17:57 ID:???
- >>524
漏れがどうにかしてやる!
待ってろ!
- 526 名前: ◆l0DtPXyM 投稿日: 02/04/15 18:00 ID:???
- >>524
デコード処理の近くにある。まず変数を増やせ
$gazou = $FORM{'gazou'};
- 527 名前: ◆l0DtPXyM 投稿日: 02/04/15 18:04 ID:???
- >>524
記事んとこをこうしろ。
print "<IMG SRC=\"$gazou\"><BR><blockquote>$comment<P>$url</blockquote><hr>\n";
- 528 名前: ◆l0DtPXyM 投稿日: 02/04/15 18:06 ID:???
- >>524
URL欄のしたに画像フォームを追加。
<tr><td nowrap><b>画像</b></td>
<td><input type=text size="$url_wid" name=gazou value="http://"></td></tr>
これでどうだ?
- 529 名前: ほほ 投稿日: 02/04/15 18:38 ID:QFUtae+h
- >525さん
レスありがとうございます。
>デコード処理の近くにある。まず変数を増やせ
デコード処理がどこだか良くわかりません。
>記事んとこをこうしろ
記事のところというのもどこだかわかりませんでした。
結局わかったのは最後だけです。
前後の行なども書き加えてください。よろしくお願いします。
- 530 名前: nobodyさん 投稿日: 02/04/15 19:42 ID:???
- >>529
ハズカシイなぁ、もぅ。
- 531 名前: 525 投稿日: 02/04/15 21:31 ID:rpk7woSO
- >>524さん
ちょっと間違いがあったようです
このままだとエラーが発生することが判明しました。
あと2,3日余裕をくだされば完璧に仕上げさせていただきます。
- 532 名前: ほほ 投稿日: 02/04/15 22:13 ID:5SzFKIQt
- >525さん
2.3日でもかまいません。本読んでるんですけど、そこまでたどり着けませんので
よろしくお願いします。
- 533 名前: 525 ◆l0DtPXyM 投稿日: 02/04/16 18:00 ID:???
- >>524
出来ました。
http://okunao.tripod.co.jp/light.txt
light.txtをlight.cgiにリネームしてください。
- 534 名前: ほほ 投稿日: 02/04/16 20:39 ID:vj/x5Q1y
- >525さん
CGI実行してみました。ビジュアルはほぼ希望どうりです。
ありがとうございます。
あともう少しわがままを聞いてください。
コメントをスペース1っこで画像を貼り付けていったときに
2重投稿エラーが出ると思います。貼り付けた画像を元に
2重投稿エラーを避ける事はできますか?
あとlight.cgiは投稿した後リセット押さないでブラウザでリロードすると
すぐに2重投稿エラーになってしまいます。このへんも回避できますか?
もし、時間があるようでしたらよろしくお願いします。
- 535 名前: 525 ◆l0DtPXyM 投稿日: 02/04/16 20:59 ID:???
- >>524さん
画像は書き込みの度に変えるのですか?
- 536 名前: ほほ 投稿日: 02/04/16 21:38 ID:B2D4dIFX
- >525さん
はい。毎回違う画像を貼ります。
img src っていうのを毎回書くのが面倒なので
できれば画像のとこはURLだけ書き込めばと思ってます。
- 537 名前: 525 ◆l0DtPXyM 投稿日: 02/04/16 21:58 ID:???
- >>524さん
<IMG SRC="***">は書かなくてもURLだけで出来るはずですが、、、
それとご希望の修正をして再うpしました。
そちらでテスト願います。
- 538 名前: 525 ◆l0DtPXyM 投稿日: 02/04/16 21:59 ID:???
- >>524さん
http://okunao.tripod.co.jp/
の二つのファイルを***.cgiにリネームしてみてください。
- 539 名前: 525 ◆l0DtPXyM 投稿日: 02/04/16 22:12 ID:???
- >>524さん
名前が過去と一緒だと再投稿できないことが判明しました。
これより先はちょっと私には改造できないかもしれません。
ここまでが私の限界です。
- 540 名前: ほほ 投稿日: 02/04/16 23:30 ID:ji+16LdM
- >525さん
やって見ました
ブラウザ窓2つ開けて交互に貼り付けて交互に
リロードすると前貼ったやつを貼ってしまいます。
とりあえず当初の希望はできましたのでありがとうございました。
お時間がありましたら、よろしくお願いします。
- 541 名前: nobodyさん 投稿日: 02/04/16 23:39 ID:???
- >>540
自分ではやらんの?
- 542 名前: nobodyさん 投稿日: 02/04/17 02:23 ID:???
- 「情報を再送信しないと ページを更新できません」ってやつだろ?
それは回避不可。
掲示板自身にリンクはって「リロード」とか書いときなさい。
- 543 名前: 525 ◆l0DtPXyM 投稿日: 02/04/17 09:03 ID:???
- >>542さん
あ〜そのテがあったか、
メソッドがPOSTだとそうなるんだよね
- 544 名前: nobodyさん 投稿日: 02/04/17 19:35 ID:pUwmOFzd
- http://sk.redbit.ne.jp/~tboard/cgiroom.html の
TBOARD004 と TBOARD006 を使っているのですが・・・
鯖屋さんから『CPU占有率90%Over』と言われCGIの停止命令をうけました。
数種類のCGIチェッカーでチェックしてみたのですが、これといって問題はありませんでした。
デザイン/機能的にお気に入りのCGIなので・・・
CPU占有率が軽減できるように最適化(と言うんですかね?)していただけない
ものでしょうか?
よろしくお願いします。
- 545 名前: nobodyさん 投稿日: 02/04/17 19:48 ID:???
- >>544
余談だけど、UNIXでアクティブなプロセスが1こしか無い場合、
そのプロセスのCPU占有率は限りなく100%に近づくものです。
また、複数のプロセスがアクティブな場合、特別なことをしなければ、
各プロセスが均等に占有します。
なので、CPU占有率90%Overと言われても、「あたりまえじゃ!」としか
言いようがありません。鯖変えたほうがいいかも。
- 546 名前: 544 投稿日: 02/04/17 20:38 ID:???
- >>545 さんご指摘の通りだと思います。
板違いなのですが・・・
鯖屋さんに言ったんですよ・・・『んじゃ、引っ越せってことですか?』と。
月1,2回はもめるんですよ。対応(っていうかってメールの内容)もムカツクし・・・
何時も(偽装)ヒラ謝りをしながら気を使うんですよね。
契約も残ってるし自ら出て行くのも納得いかないし
よさげな鯖屋さんも見つからないし・・・
print "負けたくないんですよ!鯖屋に!";
でもPerlはprint分位しかわからない。ので
- 547 名前: 544 投稿日: 02/04/18 00:15 ID:DhPOYyDw
- ああああああ・・・スクリプトファイル削除されちゃった。
同じような掲示板CGIはあるが…あのCGIでないとコンテンツがしっくりこないんだよ。
サイトの中ではあのCGIが生命線だし今までのカキコ内容は宝なんだよ。
まじで最適化キボンヌ。新コードで再チャレンジしたいんだ。
Webprog板住人さん鯖屋さんにリベンジさせてください。
まじ宜しくお願いしますわ。
- 548 名前: nobodyさん 投稿日: 02/04/18 04:22 ID:???
- >544
掲示板CGIでそう負荷がかかるとは思えない。
アクセスが万単位であったり大量の書き込みがあったり改造してたりするのでなければ
いちゃもんつけられてるだけと思われ。
- 549 名前: nobodyさん 投稿日: 02/04/18 05:51 ID:???
- >>544
レンタル鯖板で鯖屋を晒すべし
- 550 名前: nobodyさん 投稿日: 02/04/18 08:41 ID:???
- >>548
CGI素人の後輩が組んだ掲示板CGIはなぜか異様に重かった。
恐らく無駄なデータに対して無駄なループがあったんだろう。
- 551 名前: nobodyさん 投稿日: 02/04/18 20:47 ID:Xv+8+6gt
- ども、CGIスレにて自分で改造と意気込んだのはよかったのですが
自分の知恵の無さに泣きを見ました(w
改造依頼なのですがThe Roomさんのところの
Light Chat ( ttp://dream.lib.net/room/cgi/e_lchat.html )で、
JavaScriptモードOFFにて発言時にフォーカスがsubmitへ逝ってしまってBSで
削除ができなくなってしまいます。
KENT-WEBさんの PONNY CHATのようにフォーカスを固定できないものでしょうか?
PONNY CHAT ttp://www.kent-web.com/chat/ponny.html
CGIからの制御は難しいようですがFormを上手く組みなおせば、できそうと思ったのですが。
アドバイス、よろしくおねがいします。
- 552 名前: nobodyさん 投稿日: 02/04/19 19:26 ID:3rqw4z8c
- http://dream.lib.net/room/cgi/e_upboard.html
この掲示板のCGIのことで教えてもらいたいことが2つあります。
1.レスを記入するボックスは本来1行なのですが
これを2行にするにはどうすれば良いのでしょうか?
2.投稿するとタイトルやレスの頭に[1]・[2]・[3]と
順番に数字が入るのですが、これを表示させなくする方法を教えてください。
- 553 名前: nobodyさん 投稿日: 02/04/19 21:32 ID:???
- >>552
1.の質問はperlでは無くHTMLの改造だな<INPUT TYPE="text">を<TEXTAREA>にしなさいな
ただし改行コードを削除している可能性があるので文字列置換を削除しなければならないかも、、、
投稿やレスの頭につく数字はスカラー変数を削除しなさいな
- 554 名前: 552 投稿日: 02/04/20 07:35 ID:ilcuvKZu
- 「<INPUT TYPE="text">を<TEXTAREA>にしなさいな」がいまいちよくわかりません。
色々やったのですが上手くいかないので、もう少し詳しく教えてください。
「文字列置換を削除」についても…。
ごめんなさい。
- 555 名前: 動作確認もせずにレス 投稿日: 02/04/20 09:13 ID:???
- >>552
1)
547行目の<input>を667行目の<textarea>ように。
改行処理はされてるみたい(1133行目)。レイアウトは適当に調整してちょ。
2)
タイトル:521行目 \[$temp2[0]\] を削除
レス: 469行目 \[$temp1[0]\] を削除
$temp1とか$temp2とかは止めてホスィ…
- 556 名前: 553 投稿日: 02/04/20 10:49 ID:???
- >>552
せめてHTMLが分かるようになってからここに来なさいな
- 557 名前: 心優しい553 投稿日: 02/04/20 13:26 ID:7YSAp/x0
- >>552
改造してやったぞ
http://okunao.tripod.co.jp/upboard.txt
.cgiにリネームしてな
- 558 名前: 552 投稿日: 02/04/20 13:44 ID:Hi5ZuXLw
- >>555
547行目とか1133行目とか言われて、また困ってしまいました。
エディタは何を使ってらっしゃるんでしょうか???
>>556
ごめんなさい。HTMLはちょっとしか分からないのにまた来ちゃいました。
レスを書くボックスを
<TEXTAREA NAME="res" ROWS=2 COLS=50 WRAP=off class="input"></TEXTAREA>
っていうデザインに変更させたいんですよ〜。ボックスの中の色はデフォルトのままで。
どなたかお暇でご親切な方、書き加えるもの、書き加える場所、消すもの等
手取り足取り教えてください。お願いしますm(__)m
何度も何度もすみません。
- 559 名前: 552 投稿日: 02/04/20 13:47 ID:Hi5ZuXLw
- あわわ、書き込んだら心優しい方が現れた!
>>553
どうもありがとうございました。
見させてもらいます。
- 560 名前: 心優しい553 投稿日: 02/04/20 13:53 ID:???
- >>552
<TEXTAREA NAME="res" ROWS=2 COLS=50 WRAP=off class="input"></TEXTAREA>
へは自分で改造してね
まぁ、この漏れも1年前はHTMLの知識なんてほとんど無かった、、、
いろんなスクリプトを自分で改造していきながら知識を付けて逝ったので
君も頑張りたまえ。
- 561 名前: nobodyさん 投稿日: 02/04/21 02:26 ID:???
- >560
しつこい! 親切ぶりやがって。
ソースはもらったからもう用はないねー。
- 562 名前: nobodyさん 投稿日: 02/04/21 02:37 ID:???
- >>561
お前、こっちにもいたのか・・・ハァ
- 563 名前: nobodyさん 投稿日: 02/04/21 07:33 ID:???
- >>558
ってか、行数を表示できないエディタってなによ?
メモ帳?
- 564 名前: nobodyさん 投稿日: 02/04/21 11:45 ID:???
- 改行前に折り返しがあるとそれで2行扱いになるエディタとか。
- 565 名前: nobodyさん 投稿日: 02/04/23 08:29 ID:???
- あげ
- 566 名前: nobodyさん 投稿日: 02/04/25 12:53 ID:DUGv6Dx1
- こちらには初めてやってきました
perlはまったく未知の世界ながら、見よう見真似でいじっています
フリーのCGIをほんのちょっとだけ
カスタマイズしよう(選択項目を増やそう)と奮闘中なのですが
よくわかりません
ネットサーフレスキューさん
ttp://www.rescue.ne.jp/の「ゲストブック」なんですが
今ある記入項目に加えて、たとえば誕生日とか出身地とかも
出力できるようにするには、どうしたらいいんでしょうか
基本のままなら設置、動作は確認済みです
- 567 名前: 566 投稿日: 02/04/25 12:58 ID:???
- 追記
項目の入れ替えは可能なんですが、増やすことができません
下手にいじると変数名と値がずれて出力されてしまうんです
ご教授お願いします
- 568 名前: nobodyさん 投稿日: 02/04/25 15:52 ID:???
- >>566-567
# index.html 適当なところに
<tr>
<th nowrap bgcolor="#ff5555">血液型は?</th>
<td nowrap bgcolor="#5555ff"><select name="bloodtype" size=1><option value="" selected>未選択<option>A型<option>B型<option>AB型<option>O型</select></td>
<th nowrap bgcolor="#ff5555">出身地は?</th>
<td nowrap bgcolor="#5555ff"><select name="hometown" size="1">
<option value="" selected>未選択
<option>北海道<option>青森<option>秋田<option>岩手<option>宮城<option>山形<option>福島<option>栃木
<option>新潟<option>群馬<option>埼玉<option>茨城<option>千葉<option>東京<option>神奈川<option>山梨
<option>長野<option>岐阜<option>富山<option>石川<option>静岡<option>愛知<option>三重<option>奈良
<option>和歌山<option>福井<option>滋賀<option>京都<option>大阪<option>兵庫<option>岡山<option>鳥取
<option>島根<option>広島<option>山口<option>香川<option>徳島<option>愛媛<option>高知<option>福岡
<option>佐賀<option>大分<option>熊本<option>宮崎<option>長崎<option>鹿児島<option>沖縄<option>日本以外
</select></td>
</tr>
# regist.pl 25行目
print DB "$date_num\t$date_now\t$FORM{'name'}\t$FORM{'email'}\t$FORM{'sex'}\t$FORM{'address'}\t$FORM{'bloodtype'}\t$FORM{'hometown'}\t$FORM{'age'}\t$FORM{'access'}\t$FORM{'homepage'}\t$FORM{'comment'}\t$HTTP_USER_AGENT\t$host\n";
# regist.pl 50-58行目の適当なところに以下の2行追加
&jis("血液型: $FORM{'bloodtype'}"); print OUT "$msg\n";
&jis("出身地: $FORM{'hometown'}"); print OUT "$msg\n";
# search.pl 80行目
($num,$date,$name,$email,$sex,$address,$bloodtype,$hometown,$age,$access,$homepage,$comment,$agent,$host) = split(/\t/,$select);
# search.pl 94-100行目の適当なところに以下の2行追加
if ($bloodtype ne '') { print "<li>血液型 $bloodtype<br>\n"; }
if ($hometown ne '') { print "<li>出身地 $hometown<br>\n"; }
- 569 名前: nobodyさん 投稿日: 02/04/25 16:00 ID:???
- 血液型じゃなくて誕生日か。めちゃめちゃボケてた、、、
# index.html
<th nowrap bgcolor="#ff5555">血液型は?</th>
<td nowrap bgcolor="#5555ff"><select name="bloodtype" size=1><option value="" selected>未選択<option>A型<option>B型<option>AB型<option>O型</select></td>
の変わりに
<th nowrap bgcolor="#ff5555">誕生日</th>
<td nowrap bgcolor="#5555ff"><input type=text name="birthday" size=30></td>
# regist.pl 25行目
$FORM{'bloodtype'} の変わりに $FORM{'birthday'}
&jis("血液型: $FORM{'bloodtype'}"); print OUT "$msg\n";
の変わりに
&jis("誕生日: $FORM{'birthday'}"); print OUT "$msg\n";
# search.pl 80行目
($num,$date,$name,$email,$sex,$address,$bloodtype,$hometown,$age,$access,$homepage,$comment,$agent,$host) = split(/\t/,$select);
の変わりに
($num,$date,$name,$email,$sex,$address,$birthday,$hometown,$age,$access,$homepage,$comment,$agent,$host) = split(/\t/,$select);
if ($bloodtype ne '') { print "<li>血液型 $bloodtype<br>\n"; }
の変わりに
if ($birthday ne '') { print "<li>誕生日 $birthday<br>\n"; }
- 570 名前: nobodyさん 投稿日: 02/04/25 16:35 ID:???
- >>566-567
http://www.ij.oit.ac.jp/WWW/CGI/index.html
これ読めば一撃で分かるよん。
- 571 名前: 566 投稿日: 02/04/25 19:06 ID:???
- >568
できました!ありがとうございます!
しかもindex.htmlまで追加してくださって・・・
恐縮です
ところで怖くて確かめていないんですが、
search.pl80行目とregist.pl 25行目の配列順序は
必ず同じでないといけないんでしょうか
・・・いけないんですよね
とりあえず570のサイトを熟読してまいります
本当に本当に助かりました!
- 572 名前: 投稿日: 02/04/25 22:01 ID:???
- apeboardとかで、2つの改行を<P>にするにはどうすればよいですか?
- 573 名前: nobodyさん 投稿日: 02/04/25 23:49 ID:???
- apeboard+ Ver.1.04 なら apeboard_plus.cgi の 107行目
$message =~ s/\r/<br>/g; の下にでも
$message =~ s/<br><br>/<p>/g;
を追加かな
- 574 名前: nobodyさん 投稿日: 02/04/26 22:59 ID:hL3nAspR
- ttp://www.url-battle.com/cgi/
ここで配付されているYY-BORAD 4.54ベースのスクリプトなのですが。
ttp://blue.ribbon.to/~rustyblue/bbs.html
このように親記事のNo.横の返信フォームへのリンクを切り、
記事のすぐ下の返信フォームを表示させレスができるようにしたいのです。
(レイアウト汚いのと下部の広告がウザイは堪忍して下さい)
どこをどうやれば良いのかサパーリなので、どなたか御教授お願いします。
- 575 名前: 574 投稿日: 02/04/26 23:01 ID:???
- × 記事のすぐ下の
○ 記事のすぐ下に
- 576 名前: nobodyさん 投稿日: 02/04/27 01:47 ID:???
- >>574
bbs.htmlにフォームを追加して、それに対する処理を変えてやればいいんじゃない?
基本的には>>568-569とやることは同じだと思うが。。
- 577 名前: nobodyさん 投稿日: 02/04/27 08:13 ID:???
- 574<<
uho!氏が改造したものを参考にしたらどうだ?
- 578 名前: nobodyさん 投稿日: 02/04/28 00:31 ID:okfAtolN
- stlfbbsの事で質問させてください。
ファイル配布元(txtが無かったです)ttp://www.blk.mmtr.or.jp/~stlf/softwares/
投稿者のURLへ画像でリンクさせたいんです。(デフォルトはテキストリンクです)
stlfbbs.cgiの120行目
$s_url = '(<A HREF="' . $s_url . '" TARGET="_top">URL</A>)';
を
$s_url = '(<A HREF="' . $s_url . '" TARGET="_top"><img src="gazou.gif"></A>)';
128行目の
$inline =~ s/\(URL\)<!--s-->/$s_url/i;
を
$inline =~ s/\(<img src="gazou.gif">\)<!--s-->/$s_url/i;
としたのですが、どうもうまくいきません。
「画像にリンク」自体は出来たのですが、画像が表示されないんです。[×]←コレになります。
cgiディレクトリから別ディレクトリの画像を呼び出すために「http://--」、「./」などを書いてみましたがCGIエラーが起きてしまいます。(「/」が使用不可?)
cgiディレクトリ自体に画像を置き、呼び出そうとすると[×]になります。
stlfsput.htmlの方をいじってみましたがやはりダメでした。
(URL)を(<img src="http://--/gazou.gif">)とすると、画像は表示されますが、リンクされません。
(<img src="1s.gif">)とすると、画像は表示されませんが、リンクは出来ます。あぁ・・・。
書き換える場所は間違ってないと思うのですが、画像を呼び出す記述が理解できてないみたいで・・・。
この場合、どうしたら解決できるのでしょうか?ヒントをお願いします。
- 579 名前: nobodyさん 投稿日: 02/04/28 00:46 ID:???
- 画像はcgiと同じディレクトリ?
src="./gazou.gif"
とかで試してみて。
- 580 名前: 578 投稿日: 02/04/28 00:58 ID:???
- >>579
レスありがとうございます。
>src="./gazou.gif"
今もコレと同じような記述をいくつか試していたんですが、ダメでした。やはりエラーがおきます。
もちろん同じディレクトリ内に置いてあります。
そもそもcgiディレクトリにある画像は呼び出せないんです。
アドレスに直接書き込むと「Forbidden 回覧出来ません」になってしまうんです。(@ニフティです)
- 581 名前: nobodyさん 投稿日: 02/04/28 01:04 ID:???
- >>578 >>580
いじるのはstlfbbs.cgiの120行目だけでいいよ
$s_url = '<A HREF="' . $s_url . '" TARGET="_top"><img src="gazou.gif" border="0"></A>';
stlfbbs.cgiの128行目は $inline =~ s/\(URL\)<!--s-->/$s_url/i; のままで。
これはstlfsput.htmlの (URL)<!--s--> の部分を $s_url と置換するって命令だから
ここまでいじっちゃうとアウト。
ニフティでサーバーがわかれてるんだったら
$s_url = '<A HREF="' . $s_url . '" TARGET="_top"><img src="http://〜〜〜/gazou.gif" border="0"></A>';
- 582 名前: nobodyさん 投稿日: 02/04/28 01:06 ID:???
- >578
ネタはよせ!
>579
そのアホさは、Dream ★ だろ!
- 583 名前: 578 投稿日: 02/04/28 01:24 ID:???
- >>581
レスありがとうございます。
指摘して頂いた所を直してみたら、エラーも無く画像も表示されるようになりました。
が!リンク出来ませんでした・・・。
新しくDLし直して必要箇所だけをいじってみましたが、リンクしてもらえなくて・・・。
でも画像表示出来たのはかなり大きいです。ありがとうございました。
後少し・・・どこなんだろ。
>>582
ネタ?マジ質問だぞ。
- 584 名前: nobodyさん 投稿日: 02/04/28 01:26 ID:???
- >>583
できあがったhtmlソースはちゃんとなってるの?
ちゃんとなっててリンクされないんならブラウザの(以下略
- 585 名前: 578 投稿日: 02/04/28 01:32 ID:???
- >>584
アドバイスありがとうございます。
htmlはちゃんとなってるはずです・・・多分。
cgiの方を<img src="gazou.gif" border="0">としたので、
htmlの方も<img src="gazou.gif" border="0"><!--s-->としてありますが・・・心配です。
ちょっといじってみます。
- 586 名前: nobodyさん 投稿日: 02/04/28 01:39 ID:???
- 実はgazou.gifが無かったという罠。
- 587 名前: nobodyさん 投稿日: 02/04/28 01:39 ID:???
- >>585
あのさ >>581 の書き込みよく読んでくれてる?
そんなにわかりにくい書き方してないと思うんだけど、、、
+ いじるのはstlfbbs.cgiの120行目だけ +
stlfbbs.cgiの128行目は $inline =~ s/\(URL\)<!--s-->/$s_url/i; のまま。
ログ部分のテンプレhtmlの stlfsput.html で
URLを挿入したい部分も (URL)<!--s--> のままです。
- 588 名前: 585 投稿日: 02/04/28 01:45 ID:???
- >>587
>>581の書き込みの意味を勘違いしてました。
htmlの(URL)まで変えてしまったのがいけなかったんですね。
ありがとうございました。おかげでリンク出来るようになりました。
あともう一息・・・。
- 589 名前: 585 投稿日: 02/04/28 16:35 ID:okfAtolN
- 昨日はありがとうございました。
・・・恥ずかしながら、またも詰まってしまいました。
今度はcgiの名前を変えられるかどうかを勉強してるんですが・・・。
デフォルトのttp://--/stlfbbs.cgi
をttp://--/enhancebbs.cgiとしたいんです。
いろいろな箇所に手を付けてみたところ、エラーは起きないのですが投稿内容が表示されないんです。(log部分が出てこない)
主要と思われる3つのファイルをアップしておきます。
enhancebbs.cgi ttp://homepage1.nifty.com/simples/enhancebbs.cgi.txt
enhancebbs_r.cgi http://homepage1.nifty.com/simples/enhancebbs_r.cgi.txt
enhancettp://homepage1.nifty.com/simples/enhancebbs.ini.txt
他のテンプレ(テンプレ内のincludeも)やlogファイルもちゃんと
対応した名前に書き換えてあります。jcode.plは中身が理解できなかったのでそのままの名前です。
今も睨めっこしてるんですが、なかなか前に進めません。
良かったら間違ってる箇所を指摘して頂けますか?
- 590 名前: 585 投稿日: 02/04/28 22:08 ID:???
- 自分で何とか解決できました。レス無駄に消費してすみません。
- 591 名前: nobodyさん 投稿日: 02/04/30 19:26 ID:???
- http://www.cj-c.com/cgi_s/ibbsk.htm
を
http://saya.kiy.jp/cgi/bbs.html
のkerox2 bbsとログが共有&書き込みできるように改造お願いします。
- 592 名前: nobodyさん 投稿日: 02/05/01 09:50 ID:???
- >>591
(1) 掲示板のフォームのname="hoge"の部分を統一する。hiddenも考慮する。
(2) ログの並び順を統一する。
(3) 1.2.にあわせて変数名等を全て変更する。
難しくないが面倒臭い。
スクリプトのソースがないから判る事はこれくらい。
別にソース出しても俺はやらないけど。
- 593 名前: nobodyさん 投稿日: 02/05/01 14:33 ID:???
- ょぅι゛ょ精製サブルーチンお願いします…
- 594 名前: nobodyさん 投稿日: 02/05/01 14:49 ID:???
- >>593
精製っつーと、どんな処理をお望みか?
- 595 名前: nobodyさん 投稿日: 02/05/02 04:54 ID:2Oqc4hmQ
- http://www.geocities.co.jp/Milkyway-Lynx/2562/chatcgi.txt
ゆいチャットで
荒らしが現れたら
チャットしてる人達が名前の所をクリックして3票(同じ人が3回入れても意味無し)集まったら荒らしをハジク
という事をしたい。
IPを入れて荒らしをはじくというのはあるのですが
チャットしてる人達が数人、荒らしと認めたらその場ではじくような事がしたいです。
よろしくお願いします。
- 596 名前: ひよこなnobodyさん 投稿日: 02/05/02 06:27 ID:???
- はじめまして
http://zurubon.strange-x.com/uploader/(ずるぼん)
を使ってるんですけど各ファイルのダウソ数をDATEの右横とかに
出したいのですが教えてください。
いちよですが参考になれば↓
http://www.kent-web.com/count/lime.html
- 597 名前: nobodyさん 投稿日: 02/05/02 12:02 ID:???
- >>595
なるほど。簡単に出来そうだね。しかし僕は↓のほうの改造に興味があるので
誰か他の人頼みます。
>>596
おもしろそうですね。ジャバスクリプトのイベント処理を使って
改造してみたいと思います。
一週間待って音沙汰が無かったら忘れられたと思ってあきらめて下さいw。
- 598 名前: nobodyさん 投稿日: 02/05/02 13:33 ID:???
- >>595
なんかさぁ、1chの×が3つ溜まったらあぼーんを思い出したよ。
もう少しシステム練らんとろくなことにならんよ。
- 599 名前: ひよこなnobodyさん 投稿日: 02/05/02 22:25 ID:???
- >>597
了解しました。本当にありがとうございます
- 600 名前: 非通知さん 投稿日: 02/05/02 23:35 ID:???
- スクリプト作成キボンヌ!
ごっつい窓が開くやつおながいします。
5/2 23:00〜 只今迷惑メール撃退祭り中!!
http://cocoa.2ch.net/test/read.cgi/phs/1017853520/l50
5/2 23:00〜 http://www.online-av.com/
誰でも参加できるF5訪問。
http://www.online-av.com/
http://www.online-av.com/i/index.html
http://www.online-av.com/i/sample/sample01.html
http://www.online-av.com/i/sample/sample02.html
http://www.online-av.com/i/sample/sample03.html
よろしくおながいします。 m(_ _)m
携帯・PHS板 一同 http://cocoa.2ch.net/phs/
- 601 名前: nobodyさん 投稿日: 02/05/03 00:07 ID:???
- >>596
何とかできますぃた。。
当初の路線を変更したため、ジャバスクリプトのジの字も出てこないソースとなりましたw。
どうぞ大事に使ってやってください。↓の僕のHPからDLしてください。
http://homepage2.nifty.com/nonota/
- 602 名前: ひよこなnobodyさん 投稿日: 02/05/03 03:22 ID:???
- >>601 様
寝る前に覗いてみたらもうやってくれたんですかぁ!
いやぁ、すごい感謝デス。本当に、ありがとうございますネ。
もちろんかなり大事に使います。また言いますが、、本当アリガトございます
- 603 名前: ひよこなnobodyさん 投稿日: 02/05/03 04:02 ID:???
- >>601 様
え〜只今設置できました。あと全然問題なく動きます。
ありがとうございました。バッチシ期待通りでした!!
ちなみにサポート文はここ↓を参考に書けば楽です
http://isweb41.infoseek.co.jp/computer/ari-sin2/index2.html
- 604 名前: nobodyさん 投稿日: 02/05/03 10:30 ID:I3/fkiRQ
- >>603
作者より
喜んでいただけて光栄です。
サポート文はそこを参考にさせてもらいます。ありがとうございます。
それと、お馬鹿さんな事にCGIに自分の著作権表記をいれるのを忘れていました。
貴方のスクリプトのどこにでもいいですから、僕のHPのURLとY.K.Studioが
改造しましたという旨を、表記下さい。よろしくお願いします。
- 605 名前: nobodyさん 投稿日: 02/05/03 10:31 ID:???
- >>604
晒し屋うぜぇよ。
- 606 名前: nobodyさん 投稿日: 02/05/03 10:32 ID:???
- ウゼえ消えろ
∧_∧ _ _ .' , .. .∧_∧
( ´_ゝ`) _ .- ― .= ̄  ̄`:, .∴ ' ( >>6)
/ '' ̄ __――=', ・,‘ r⌒> _/ /
/ /\ / ̄\-―  ̄ ̄  ̄"'" . ’ | y'⌒ ⌒i
_| ̄ ̄ \ / ヽ \_ | / ノ |
\ ̄ ̄ ̄ ̄ ̄ ̄ \__) , ー' /´ヾ_ノ
||\ \ / , ノ
||\|| ̄ ̄ ̄ ̄ ̄ ̄ ̄|| ̄ / / /
|| || ̄ ̄ ̄ ̄ ̄ ̄ ̄|| / / ,'
|| || || / /| |
!、_/ / 〉
∧_∧ 死ね
_( ´_ゝ`)
/ ) _ _
/ ,イ 、 ノ/ ∧ ∧―= ̄ `ヽ, _
/ / | ( 〈 ∵. ・( 〈__ > ゛ 、_―
| ! ヽ ー=- ̄ ̄=_、 (/ , ´ノ
| | `iー__=―_ ;, / / / ←>>04
!、リ -=_二__ ̄_=;, / / ,'
/ / / /| |
/ / !、_/ / 〉
/ _/ |_/
ヽ、_ヽ
- 607 名前: 604 投稿日: 02/05/03 10:35 ID:???
- ごめんなさい。sage忘れました。。回線切って反省してきます。
- 608 名前: nobodyさん 投稿日: 02/05/03 13:45 ID:???
- ずるぼんさんのアプロダでファイル名をリネームしないで
そのままにする改造箇所をお教えくだされ
ttp://zurubon.strange-x.com/upload.txt
たのむ
- 609 名前: ひよこなnobodyさん 投稿日: 02/05/03 22:22 ID:???
- >>604
分かりました
- 610 名前: nobodyさん 投稿日: 02/05/03 23:35 ID:???
- ついでにずるぼんのことなのだが
元々のファイル数制限ではなくて総計何SIZEになれば削除という機能を
加えて欲しいのだが。
>>601
予想以上に好評でした。ありがと。ただなぜかinfoseekにあぷろだ置いてるのだけど
たまに全部ファイルが削除になる。/source/ファイルには残ってるのだけど。
自分の設定が悪いのからかもしれないが
- 611 名前: nobodyさん 投稿日: 02/05/04 00:38 ID:???
- >>610
最新版は直ってる
- 612 名前: 611 投稿日: 02/05/04 01:06 ID:???
- やっぱり直ってないみたい。なぜか板に表示されないのに
sourceファイルには残ってる
- 613 名前: nobodyさん 投稿日: 02/05/04 01:49 ID:???
- http://isweb42.infoseek.co.jp/art/world32/upload.txt
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です。
時間経つと板からファイルが消えます
- 614 名前: nobodyさん 投稿日: 02/05/04 07:53 ID:???
- >>610
改造版作者より
ちょっとファイルの排他処理が甘かった模様です。スイマセン。
今から強化します。Ver0.2を使って見てください。
- 615 名前: nobodyさん 投稿日: 02/05/04 08:52 ID:???
- ずるぼんあぷろだ改造版作者より
>>610->>613
とりあえず申し訳無いのですがsubupload.cgi Ver0.2を作成しましたので私のHP(>>601)からDLして
置き換えてもらえないでしょうか?それとパーミッションは755よりも777が望ましいです。(フォルダとスクリプト)
スクリプトを安定させるコツ
・出来ればパスワード、カウンター、FTP転送などのおまけ的な機能を使わない。
>>608
ずるぼんさん本人に聞いてみてください。
>>610
暇があったら改造してみます。ただ今現在はデバッグで手一杯なので。。
- 616 名前: nobodyさん 投稿日: 02/05/04 13:35 ID:???
- >>615
著作権消してもいいですかー?
あれは僕への朝鮮ですね。
- 617 名前: 613 投稿日: 02/05/04 18:54 ID:???
- >>615
早い対応と説明大変ありがとうございます。あなたのスクリプト使ってよかったです。
これからもよろしくお願いします
- 618 名前: 613 投稿日: 02/05/05 00:22 ID:???
- Ver.3入れてみたところ快調でした。
それとわざわざHPへのご報告ありがとうございます。
- 619 名前: 613 投稿日: 02/05/05 03:37 ID:???
- う〜ん・・。また時間経つとsourceファイルに残ったまま板に表示されません
- 620 名前: nobodyさん 投稿日: 02/05/06 03:03 ID:???
- >>601
10??????.tempみたいな感じのがsourceフォルダの中に
たまにできます。あと出来たらHPに板置いてくれませんか?
- 621 名前: nobodyさん 投稿日: 02/05/08 05:59 ID:Nv6MjGlg
- apeboard+はアイコン選択の際にクッキーが効かないようになっているのですが
これをクッキー対応にさせて、いちいち選択し直さないようにするようには
出来ないでしょうか。よろしくお願いします。
http://www.2apes.com/products/index.html
- 622 名前: nobodyさん 投稿日: 02/05/08 18:02 ID:???
- ソース出せ
- 623 名前: nobodyさん 投稿日: 02/05/10 04:18 ID:???
- >>601
また板のファイル表示吹っ飛びました。。
5使ってたんですが
- 624 名前: nobodyさん 投稿日: 02/05/10 06:02 ID:???
- >>622 http://www.otafuku.co.jp/
- 625 名前: 4415 投稿日: 02/05/10 17:42 ID:???
- Kent氏のYYBBSにもっと書き込み隊の昇進機能を付ける・・・。
誰か改造できる?
例:http://ion.adam.ne.jp/(リンク張ってスマソ)
ココの掲示板みたいな感じで・・・・。
- 626 名前: (・A・) 投稿日: 02/05/10 21:07 ID:???
- エキサイトチャットのJAVAアプレットのソース落としたいんだけど
どうすれば良いですか?
- 627 名前: nobodyさん 投稿日: 02/05/10 21:17 ID:???
- >>625
えーと、例に出してるサイトが使ってる掲示板をそのまま使えばいいのではありませんか?
そこの掲示板の著作権表示をたどるとここにたどり着きましたよ。
http://tackysroom.com/cgi_nmaruchan.htm
- 628 名前: 投稿日: 02/05/10 21:24 ID:???
- >>626
ソース配布してなければ無理
- 629 名前: nobodyさん 投稿日: 02/05/10 22:08 ID:???
- >>625
口の利き方がむかつく。
誰か改造できるって?スキルも無いくせに、、、。
- 630 名前: nobodyさん 投稿日: 02/05/10 22:23 ID:???
- >>629
そう書くと君のほうがスキルを鼻にかけるDQNだと思われてしまう罠。
腹が立ったなら放置しとけ。
- 631 名前: 投稿日: 02/05/10 22:27 ID:???
- BBSなんですが、画像をアップロードして投稿できるように
したいのですが、どうもうまくいきません。
1.画像はサーバーにはアップされているのに表示できない
2.親記事で画像無しだと、子記事に画像を付けて投稿しても反映されない
といったようなややこしい状態になります。
該当されると思われるスクリプトを置いておきますので
諸先輩方どうか宜しくお願いします。
ttp://spamkill.hoops.ne.jp/bbs.txt
ttp://spamkill.hoops.ne.jp/bbs_eng.txt
- 632 名前: nobodyさん 投稿日: 02/05/11 01:07 ID:???
- >>625
4415って名前欄に入った厨房がWEB製作板でもなんだか的外れな
アホな発言してたな。こりゃ放置で>ALL
ちなみにこの場合改造するのは普通YYBBSじゃない方。
って言えばむちゃくちゃ簡単なのはわかるだろうがなw
- 633 名前: nobodyさん 投稿日: 02/05/11 01:16 ID:???
- >>626
アプレットならHDDの中にキャッシュとして残ってると思うよ。
そこから先はJAVA関係のサイト巡れば…。
- 634 名前: (・A・) 投稿日: 02/05/11 11:18 ID:???
- >>633
テンポラリーファイルの中ですか?
ありがとうございます。早速、見てみます。
- 635 名前: nobodyさん 投稿日: 02/05/12 08:18 ID:k99BTwzt
- 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段 "[" から "]" までスマートに一段でソースを吐くことは
出来ないでしょうか?表示上は問題ないのですがちょっと気になるもので…
- 636 名前: nobodyさん 投稿日: 02/05/12 08:20 ID:k99BTwzt
- >>635すみません頭の方が切れてましたね
下の場合ですが
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段 "[" から "]" までスマートに一段でソースを吐くことは
出来ないでしょうか?表示上は問題ないのですがちょっと気になるもので…
- 637 名前: nobodyさん 投稿日: 02/05/12 09:48 ID:???
- >>636
\nを消してください
- 638 名前: nobodyさん 投稿日: 02/05/12 17:12 ID:???
- >>637ありがとうございます
- 639 名前: ◆VJMxnfn. 投稿日: 02/05/12 20:03 ID:???
- >>595
荒らしが3人で入ってきて普通にチャットしてる人を次々と落とすという
新たな荒らし方法が出てくると予想してみる
- 640 名前: nobodyさん 投稿日: 02/05/13 20:10 ID:0X8BIqsG
- 突然すみません。掲示板の改造をお願いします。
http://www.kent-web.com/bbs/aska.html
現在KENTWEBさんの「ASKA BBS」を使用しています。
これを、指定した時間以外は掲示板を表示しないようにしたいです。
例えば8:00〜17:00は「この時間は利用できません」とか
エラーメッセージが出るようになればいいなと思ってます。
お忙しいとは思いますがよろしくお願いします。
- 641 名前: ◆VJMxnfn. 投稿日: 02/05/13 20:21 ID:???
- >>640
http://cgiroom.nu/list/level_up/timer/index.htm
- 642 名前: 631 投稿日: 02/05/13 22:12 ID:???
- やっぱりかなり難しい改造なのでしょうか・・・・
- 643 名前: nobodyさん 投稿日: 02/05/13 22:35 ID:???
- >>642
実際にその掲示板のややこしい動きとやらを見せてくれたらわかるかもしれんが。
まさかリンクミスとかじゃないよな。
あと、4000行を超えるスクリプトを追うのは激しく面倒。暇な人を待て。
- 644 名前: nobodyさん 投稿日: 02/05/14 04:27 ID:???
- >>643
普通の人は1000行超えてたらもうぐったりだと思われ
- 645 名前: nobodyさん 投稿日: 02/05/14 06:46 ID:???
- 漏れは30行以上でぐったり
- 646 名前: nobodyさん 投稿日: 02/05/14 07:30 ID:vNEin2BE
- 先日635で、お世話になりました。後から考えると単純な質問したとちょい反省中です。
でっ・・また 皆さんの力を貸してください。
掲示板なのですが、投稿した時に投稿者のブラウザー機種を表示させたいのですが
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
ぜひ、よろしくお願いします。
- 647 名前: 投稿日: 02/05/14 12:38 ID:???
- >>646
PCのUAは吐き出されたものを処理すればいいだけ。
携帯のは http://dream.lib.net/room/ の ma_lib.pl を
参考にすればわかりやすいかも。
- 648 名前: nobodyさん 投稿日: 02/05/14 21:46 ID:7mUBcsur
- >>647 ma_lib.plを見ても全然わかりませんでした。
やっぱ、単純なものもわからなければここに来る資格なしですか?
もう少しがんばって見ます。アドバイスありがとうございました。
- 649 名前: nobodyさん 投稿日: 02/05/14 23:39 ID:???
- >>648
カウンタを作れないとここには来てはいけません
- 650 名前: nobodyさん 投稿日: 02/05/15 00:17 ID:???
- >>649
このスレは良いんじゃないの?
- 651 名前: nobodyさん 投稿日: 02/05/15 01:00 ID:???
- >>646
if ($ENV{'HTTP_USER_AGENT'} =~ /MSIE 5\.5/) { $ENV{'HTTP_USER_AGENT'} = "MSIE 5.5" ; }
- 652 名前: nobodyさん 投稿日: 02/05/15 03:52 ID:1tDJvwWS
- http://www.everysoft.com/auction/
のEveryAuction
http://www.everysoft.com/cgi-bin/auction.pl
の日本語化したのってないのかな?
- 653 名前: ワキガのオッサン 投稿日: 02/05/15 06:21 ID:???
- >>651
それじゃ MSIE 5.0が来たときにまた同じ質問をしにくるべ
- 654 名前: nobodyさん 投稿日: 02/05/15 07:40 ID:???
- >653
あとは応用してくれってことでそ
- 655 名前: ワキガのオッサン 投稿日: 02/05/15 07:43 ID:???
- >>654
おそらくそれすら改造できない厨だと思われ
- 656 名前: nobodyさん 投稿日: 02/05/15 09:46 ID:???
- (´-`).。oO(…れべるひくい…)
- 657 名前: 投稿日: 02/05/15 10:43 ID:???
- (´-`).。oO(それなりの人はそれなりのやることあるから正直かまってられない・・・)
- 658 名前: nobodyさん 投稿日: 02/05/15 16:58 ID:???
- (;´Д`)条件判断とスカラ変数くらい覚えてから改造してくれって頼めよ
- 659 名前: nobodyさん 投稿日: 02/05/16 01:15 ID:???
- 判断つーより分岐じゃないの? 考えてる訳でなし。
- 660 名前: nobodyさん 投稿日: 02/05/16 13:37 ID:???
- FFAをi-mode用にしたいけどわかんないよぉぉぉ
- 661 名前: 投稿日: 02/05/16 14:41 ID:???
- >>660
ならi-mode対応にした改造版を使え
- 662 名前: nobodyさん 投稿日: 02/05/17 04:26 ID: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時何も表示しない
優しく、わかりやすく教えて下さいませ。
- 663 名前: nobodyさん 投稿日: 02/05/17 06:36 ID:???
- >>662
(;´Д`)シネヨ
- 664 名前: nobodyさん 投稿日: 02/05/18 04:11 ID:???
- >>663
おまえがシネ!ボケが
- 665 名前: nobodyさん 投稿日: 02/05/18 09:49 ID:???
- $ENV{'TZ'} = "JST-9";
($sec,$min,$hour,$mday,$mon,$year,$wday,$dmy,$dmy) = localtime(time);
- 666 名前: nobodyさん 投稿日: 02/05/18 12:20 ID:???
- >>664
ハァ?なんだその態度は。糞厨房はもうこなくていいよ
- 667 名前: nobodyさん 投稿日: 02/05/20 23:46 ID:O0KKTX9E
- http://www3.yi-web.com/~dulfer/iken.txt
(配布元ttp://www.axs.to/~mkomu/keitai/)
ここのアンケートCGIなんですが、
check boxでの、複数項目の取り込みとデータベースの書き出しに対応させるには
どのように書き換えれば良いのでしょうか・・・
本家へ質問しましたが、ゲストブックの書き込み状況を見る限りサポートは期待できなさそう...
- 668 名前: nobodyさん 投稿日: 02/05/21 23:41 ID:Yhiz/uIl
- 17氏スクリプトでi-modeからもスレ立てできるよう、改造したいんですが
どこをなおせばいいでしょう?
- 669 名前: ファイルの更新日時cgi 投稿日: 02/05/22 01:27 ID:???
- ページの更新日時を表示するcgiを見つけたのですが
更新日当日しか「更新しました」と表示されません。
なので23時59分に更新すると1分で「更新しました」というのが消えてしまいます。
これを12時間とか24時間表示し続けれるようにしたいのですが
素人ということもあり時間の数式がさっぱりわかりません。
どなたか手直ししていただけませんでしょうか。
http://www.geocities.co.jp/HeartLand-Momiji/6161/new.txt
- 670 名前: nobodyさん 投稿日: 02/05/22 04:38 ID:???
- >>669
頻繁にファイル更新しないなら、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)
で逝けそう(ぉ
- 671 名前: nobodyさん 投稿日: 02/05/22 09:43 ID:nSs6layR
- >670
ありがとうございます。
用途はトップページに掲示板や本人登録型リンク集などcgiの
最終更新時間を表示したいと考えていたのです。
- 672 名前: 669 投稿日: 02/05/22 09:52 ID:???
- >670
すいません。
さっそく設置してみたのですが更新日時に関係なく
ランダム(のように基準がわからないのです)で
「更新されました」と出てしまいます。
- 673 名前: nobodyさん 投稿日: 02/05/22 20:19 ID:???
- 単に日付を数値化しただけだからね。だから、「逝けそう」と書いたのに…
- 674 名前: ken 投稿日: 02/05/23 01:29 ID:TLsld2En
- http://www.kent-web.com/count/index.html
にあるKENTの夢のカウンターで、カウントを非表示にして
カウンターを別ページに表示したいのですが、どうすれば、よろしいでしょうか?
お手数ですが、なにとぞお願い致します。m(__)m
どなたかお教えくださいませ。m(__)m
よろしくお願い致します。
- 675 名前: nobodyさん 投稿日: 02/05/23 01:49 ID:Ygb2ii6b
- 終了と言いながらも煽りに反応してる不細工な1
このヴァカ男を晒しあげにしてください
http://ex.2ch.net/test/read.cgi/diet/1022072704/
- 676 名前: しろうと 投稿日: 02/05/23 01:50 ID:???
- >>669
こんなのはどう?
-------
#!/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
- 677 名前: nobodyさん 投稿日: 02/05/23 01:53 ID:???
- 下から3行目の</table>は消し忘れ
- 678 名前: nobodyさん 投稿日: 02/05/23 02:03 ID:???
- >>674
マルチポストはやめようね
- 679 名前: nobodyさん 投稿日: 02/05/24 18:59 ID:???
- KENTWEBで配布しているWEBTLK(HTMLチャット)を改造したいのですが。
入室後の文字色指定をプルダウンメニューではなくラジオボタンで選択するようにしたいんです。
あ、関係ありませんがKENTさんの改造スクリプトを扱っていた「さとの部屋」と「another place」ってどこに行ったんでしょう。知っている方が居たら教えてくれませんか?
- 680 名前: 投稿日: 02/05/24 19:08 ID:???
- cgiからメールを送信した際LOG中の「limit」の値を1減らしたいんですが
できません。「$limit--」ではだめですか?自分でいじったとこを水色でマーク
してる部分です。
http://www.h2.dion.ne.jp/~i-deai/cgi.htm
- 681 名前: df 投稿日: 02/05/24 20:18 ID:9eTMj/b7
-
-------風俗の総合商社・MTTどこでも-------
〇デリバリーヘルス〇デートクラブ〇女性専用ホストクラブ〇
〇ハードSM奴隷クラブ〇レズビアン倶楽部〇ホモ・オカマ倶楽部
〇変態痴女と遊ぶ会〇痴漢・覗き趣味の会〇変態同好会・各種!
●楽しく遊べます! 090-8002-8356番
-----------美男・美女会員など多数在籍中-----------
http://www.mttdocomo.jp/
-----女性アルバイト随時募集・高収入(日払い)月100万円可能-----
-----レズビアン・スタッフ●ホモスタッフ●女性専用ホストスタッフ同募-----
http://www.mttdocomo.jp/
------------------------------------------------
- 682 名前: nobodyさん 投稿日: 02/05/24 22:07 ID:PSoFhpNb
- http://k-server.org/tekitou/collect.txt
キーワードを持たせてGoogleに放り込み、出てきたアドレスのページの中の
imgタグの中からアドレス取ってダウンロードしようとしてるんだけど、
なんか、一個見つかると他のアドレスで探索したときも
同じパスでダウンロードしてしまうのですが原因わかるかたいますか?
(要するにAページで/image/a.gifと見つかるとBのページでも存在しないのに/image/a.gifで処理しようとする。)
- 683 名前: nobodyさん 投稿日: 02/05/24 22:36 ID:???
- >>682
if(/<a href=(http:\/\/[^directory].*?)>/){
(*´∀`)プププ
use strict使って初期化されてない変数探せばぁ?(゚Д゚)
- 684 名前: nobodyさん 投稿日: 02/05/25 15:11 ID:kHc1b+7M
- http://dream.lib.net/room/cgi/e_ma.html
↑ここの携帯用アクセス解析cgiを改造して、PCのホスト情報も読み取れるようにしたいんですが、
↓これをどのように書き換えれば出来るでしょうか?
http://dream.lib.net/room/cgi/works/ma_lib_pl.txt
- 685 名前: nobodyさん 投稿日: 02/05/25 17:29 ID:???
- >>684
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'});
- 686 名前: 684 投稿日: 02/05/25 20:52 ID:BoqWmaHN
- >>685
すいません。だめでした。
- 687 名前: nobodyさん 投稿日: 02/05/25 23:23 ID:???
- >>684
そのアクセス解析ってUA別の解析するものだったと思うけど。
ホスト情報ってどういう意味で言ってるの?
- 688 名前: うじゃぱぁ〜 投稿日: 02/05/26 00:16 ID:owhpWvq3
- みなさまはじめまして、
Perl勉強中の今日この頃です。
ttp://www23.tok2.com/home/tanaka/develop/threadbbs.html
↑このスレッド型掲示板に、二重投稿禁止機能を追加したいと考えております。
改造のアドバイスをいただけたらと思います。
よろしくお願いいたします。
- 689 名前: nobodyさん 投稿日: 02/05/26 00:20 ID:???
- (^o^)/~~~bye bye
- 690 名前: nobodyさん 投稿日: 02/05/26 11:12 ID:f4yr64/R
- >>688
$ENV{'REMOTE_ADDR'}取得して禁止すれば?
- 691 名前: nobodyさん 投稿日: 02/05/27 14:47 ID:???
- >>690
「二重投稿」だから、投稿メッセージの内容、ログの内容、IP or リモホで判定するんじゃないの?
- 692 名前: nobodyさん 投稿日: 02/05/28 01:42 ID:???
- >>691
ケータイ人間は?それに、必ずしもコピペ(キャッシュ)内容を再送するとは限らない
無難にワンタイムパス発行しては?
- 693 名前: nobodyさん 投稿日: 02/05/28 07:18 ID:???
- >>必ずしもコピペ(キャッシュ)内容を再送するとは限らない
それじゃあ2重投稿じゃないじゃん
- 694 名前: nobodyさん 投稿日: 02/05/28 09:44 ID:???
- 先生!Perl初心者コーナーで質問したら
このスレで書きなさいと言われたので、こちらで質問します。
激しく初心者なのですが、掲示板の入力する項目に
「名前・メルアド・URL・本文」以外に年齢とか趣味とかの
項目を追加したいと思います。どうすればいいのでしょうか?
テスト用のサンプルとしてKENTさんのASKA BBSを使ってます。
http://www.kent-web.com/bbs/sample/aska.cgi
- 695 名前: nobodyさん 投稿日: 02/05/28 10:02 ID:???
- >694
禿しく初心者と自分で言うくらいだったら、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
- 696 名前: 695 投稿日: 02/05/28 10:09 ID:???
- >688-693
KENTのasuka.cgiを読んだら、名前と内容(本文)で重複投稿をチェックしている。
if ($in{'name'} eq $name && $in{'comment'} eq $com) {
&error("二重投稿は禁止です");
}
- 697 名前: 補足 投稿日: 02/05/28 10:10 ID:???
- ↓忘れ物
($no,$date2,$name,$mail,$sub,$com,$url,$host2,$pw2,$time2)
= split(/<>/, $lines[0]);
- 698 名前: nobodyさん 投稿日: 02/05/28 12:44 ID:???
- >>692何言ってるか?
- 699 名前: nobodyさん 投稿日: 02/05/28 14:36 ID:???
- >>698
重複投稿=連続投稿ということでは?
- 700 名前: nobodyさん 投稿日: 02/05/28 14:59 ID:???
-
今だ!700番ゲットォォォォ!!
 ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ̄ ̄ ̄
∧∧ ∧∧ ドドドドドド・・・・
(゚Д゚ ,,) (゚Д゚ ,,) ∧∧ (´´
⊂_⊂V⊂ ⊂ )⊂(゚Д゚ ,,)_/(´´
Y /⊃ | .L⊃∧∧∪ _⊃(´⌒(´
ドカ ∪∧∧J⊂(x _x⊂ノ(´⌒(´ (´´
ドカ ⊂(゚Д゚⊂⌒`つ≡≡≡(´⌒;;;≡≡≡
ズザ・・・
- 701 名前: nobodyさん 投稿日: 02/05/29 20:11 ID:xJVqUtLc
- KENT氏の「YY-BOARD」をマルチ設定対応にはできないでしょうか?
http://www.hoge.com/yybbs.cgi?bbs=0
と、すると「0」というディレクトリの中のset.cgiを読み込むようにしたいです。
- 702 名前: nobodyさん 投稿日: 02/05/29 20:50 ID:???
- >>701
QUERY_STRINGの分離部分にbbs=0時の分岐を刺しては?
- 703 名前: nobodyさん 投稿日: 02/05/31 00:08 ID:???
- >>701
ハッシュとかわかるか?
- 704 名前: 703 投稿日: 02/05/31 00:09 ID:bVzYO4Pw
- $bbs = $in{'bbs'};
とか使えば?
- 705 名前: nobodyさん 投稿日: 02/05/31 04:12 ID:tYW7BBAL
- お気に入りの掲示板のスクリプトに画像アップローダーの機能を付け加えたいのですが…
これこれ・この部分を付け加えれば画像アップ出来るよ!
というのを教えてください!
変数名くらいなら自分でも書きかえれますので、
そこらへんはお気を使ってもらわなくってもいいですYO!
よろしくおねがいします。
- 706 名前: nobodyさん 投稿日: 02/05/31 04:18 ID:???
- >>705
<input type="file" name="name">を加える
- 707 名前: nobodyさん 投稿日: 02/05/31 04:27 ID:???
- >>705
<form method="post" action="お気に入りのスクリプト" enctype="multipart/form-data">
- 708 名前: nobodyさん 投稿日: 02/06/01 13:47 ID:???
- >>707に付けたし
<input type=file>
</form>
cgi側の処理についてはアップ機能付きのCGIソースを解析しれ。
- 709 名前: 由芽 投稿日: 02/06/01 21:03 ID:???
- >>$bbs = $in{'bbs'};
これってどういういみ?
- 710 名前: 由芽 投稿日: 02/06/01 21:05 ID:???
- ↓ネタにマジレスカコワルイ
- 711 名前: nobodyさん 投稿日: 02/06/02 16:32 ID:DhpOMnbM
- 掲示板で入力した項目が一個だけログに記録されない(;´Д`)
- 712 名前: nobodyさん 投稿日: 02/06/02 17:21 ID:6HwbG/cr
- 教えてくださいっ!
JavaScriptでの共通処理を切り出し、別ファイル(**.js)に記述しました。
Servletから上記のファイルどもを呼び出したときに、
jsファイルがない(FileNotFound)と怒られてしまいます。
なにか設定が必要なのでしょうか?
おバカな質問でごめんなさい。
- 713 名前: nobodyさん 投稿日: 02/06/03 08:42 ID:???
- >>712 Servlet ってなに?
>>712 Servlet ってなに?
>>712 Servlet ってなに?
- 714 名前: nobodyさん 投稿日: 02/06/04 19:10 ID:???
- >713
サラブレット
- 715 名前: 715 ◆aZaelUQo 投稿日: 02/06/05 19:35 ID:IAdO/kZL
- サンプル:http://www.net-easy.com/cgi-bin/enqu/enqu.cgi
ソース:http://cat.zero.ad.jp/mouse/download/enqu2/enqu_cgi.txt
はじめまして。
私は上記のアンケートCGIを携帯用に改造したいと思っています。
そこで、改造したい点が二つあります。
まず一つ目はCookieをoffにしているとアンケートを集計出来ない点です。
これは携帯にはCookieなどないので投票出来ない為です。
二つ目はアンケートに投票した後に「ありがとうございました」という軽い画面を表示したいのですが、
投票後は集計結果の画面になってしまいます。
携帯ですと重いページを表示すると料金が高くなってしまいますのでこれも改善したいです。
もしも、教えて頂ける方がおられましたら書き込み宜しくお願い致します。
- 716 名前: nobodyさん 投稿日: 02/06/06 01:44 ID:???
- >>715
ケータイ用アンケートは他の既存スクリでも可能では?
以下、このスクリで変更すべきモノ
削るルーチン:SetCookie/CookieCutter
修正すべきルーチン:form_html/result_html/error
他にも適宜
- 717 名前: 715 ◆aZaelUQo 投稿日: 02/06/06 13:37 ID:mVD0oUeN
- >>716
レスありがとうございます。
携帯用のアンケートは色々あったんですが、
質問を増やしたり削除したりするのをブラウザで行うタイプだったり、
質問を複数出来ないタイプだったり、投票結果が別ページではなかったりと
私の理想のアンケートとはどれも違うもので、一番近いのがこれかなと思って紹介したのですが。
(私の探し方が悪いのでしょうか・…?)
その削るルーチンと修正すべきルーチンはCookeiをoffの状態で投票出きるようにする修正ですよね?
ありがとうございます。後で試してみます。
- 718 名前: 715 ◆aZaelUQo 投稿日: 02/06/06 18:00 ID:mVD0oUeN
- 715です。
716さんが教えてくれたポイントを削ったりしてみたのですが
今度はCookieをonの状態でも投票出来なくなってしまいました。(もう元に戻しましたが…)
修正すべきルーチンというのがどう修正するのかがわからなくて困っています。
まだ他にも変更点があるらしいですし…
もう、二つ目のアンケートに投票した後に軽い画面を表示したいと言ったのは無視して結構です。
Cookieをoffの状態でも投票出来るようにする事だけで結構です。
教えて頂ける方がおられましたらレスお願い致します。
- 719 名前: 投稿日: 02/06/07 18:07 ID:???
- レスキューの2Shotチャットで携帯に対応できるようにしたんですが
J−PHONEはmethodがGETなのでUserAgentで分別して
”POST”と”GET”で分けてみたんですがJ−PHONEのUserAgentで見てみるとサーバーエラーに
なってしまいます。原因がわかる方いましたら教えて下さい。
ソース↓
http://www.h2.dion.ne.jp/~i-deai/2shotcgi.txt
- 720 名前: nobodyさん 投稿日: 02/06/07 19:57 ID:???
- >>719
"Content-Type 〜" の文が中途半端な位置にあるのはナゼ?
- 721 名前: nobodyさん 投稿日: 02/06/07 22:58 ID:C6AACH6z
- >>719
135,136行目
if ($ENV{'REQUEST_METHOD'} eq 'POST') { read STDIN, $buffer, $ENV{'CONTENT_LENGTH'} }
elsif ($ENV{'REQUEST_METHOD'} eq 'GET') { $buffer = $ENV{'QUERY_STRING'} }
else { &error('エラー','不正なメソッドです.') }
こんな感じでどうでしょう。
この部分しか見てないのでこれで動く保証は出来ませんが・・
- 722 名前: 719 投稿日: 02/06/08 14:27 ID:???
- >>721
で、できました!!ありがとうございます。ほんと感謝します。
- 723 名前: nobodyさん 投稿日: 02/06/09 12:01 ID:6Hb3jJDU
- 一つ質問したいことがあります。
Kent-Webで配布されているaska.cgiという掲示板を改造したいと考えています。
改造する点は
書き込みをするために「送信する」をクリックした後、元のページに戻れなくしたいのです。
242行目の
<input type=submit value="送信する"><input type=reset value="リセット">
を
<input type=submit value="送信する" onClick="window.location.replace('$script')">
<input type=reset value="リセット">
とJavaScriptを混ぜてみても上手く行きませんでした。
本当はtype="button"なので無理矢理だったので、無理を承知だったのですが。
何か良い方法はないでしょうか。識者の方お願いいたします。
- 724 名前: nobodyさん 投稿日: 02/06/09 13:27 ID:???
- ヽ(´Д`;)ノ
- 725 名前: nobodyさん 投稿日: 02/06/09 16:40 ID:???
- >>723
J(java)scriptはどうかと。切っている人間には無反応
元のページがcgiであれば、ワンタイムパスを噛ませてみては?
また、単に書き込みペ−ジであれば二重投稿防止するだけでは?
- 726 名前: 715 ◆aZaelUQo 投稿日: 02/06/09 17:10 ID:kc9xedN1
- しつこくてすみません。
あれから毎日色々改良しているんですがどうしても出来ません。
最後の頼みです。誰か教えて下さいお願いします。
- 727 名前: nobodyさん 投稿日: 02/06/09 21:22 ID:???
- >>723
書き込みサブルーチンの後にLocationで飛ばせば?
- 728 名前: nobodyさん 投稿日: 02/06/09 23:24 ID:???
- >>726
とりあえず頑張った成果を晒してみろ。
Cookie使わない代わりにどのような手を使うのかも文で示せ。
「できない」「わからない」じゃ回答できんよ…。
- 729 名前: 715 投稿日: 02/06/10 00:59 ID:DOtnWOEq
- >>728
おぉぉレスがッ!ありがとうございます!
頑張った成果と言っても自分でも何をやったかわからないくらい色々やったので全ては文に書くことは出来ませんが、
perlの事はわからないのでとにかくCookieと書いてある所を検索して消してみたり
他のcgiのCookie部分を見ながらコピーしてみたりとまぁ色々しました。
でもどうしてもCookie offでもonでも投票出来なくなってしまいます。
>Cookie使わない代わりにどのような手を使うのかも文で示せ。
とありますがCookieをoffにして投票できるようにする為には何か他の手を使わないといけないのでしょうか?
それともそれは「連続投票をCookieを使わない変わりにどのような手で防ぐのかも文で示せ。」という事でしょうか?
後者の場合、連続投票は防ぎません。携帯サイトなので連続投票はパケ代かかりますから。(PCの入室は.htaccessで防いでます。)
何かヒントのようなものだけでも教えて頂けませんか?
- 730 名前: 投稿日: 02/06/10 02:00 ID:B7i4bf2g
- http://motsu.design-eyes.jp/motsu/jb_cgi/bbs/bbs.cgi
- 731 名前: 投稿日: 02/06/10 03:36 ID:???
- >>729
まだやってたのかい。
どこかに努力の成果のソースをあpできないの?
- 732 名前: 715 ◆aZaelUQo 投稿日: 02/06/10 04:04 ID:???
- >>731
努力の成果のソースと言われても改良してダメだったら元に戻して違う改良をして…の繰り返しですし。
そのまま続けていたら本当に滅茶苦茶になってしまうと思います。
あと、もうひとつだけキープしてるのがあるんです。
そっちは投票した後も何故か投票画面が出てしまうという意味のわからない仕様で、
他にもいくつか気にいらない点があるのですがもう諦めてそのCGIを使います。
皆さんありがとうございました。
- 733 名前: nobodyさん 投稿日: 02/06/10 05:12 ID:???
- >>715がハマッていたであろう箇所→始めの方の条件分離
perlをやらずに、改造とは…
- 734 名前: nobodyさん 投稿日: 02/06/10 07:48 ID:???
- >>733
×perlをやらずに、改造とは…
○perlを勉強せずに、改造とは…
- 735 名前: nobodyさん 投稿日: 02/06/10 09:35 ID:???
- >>732
回答側が知りたいのは、「どんな考えで」「どこを」「どのように」いじった結果、
動かなかったか、ということなんだよぅ
- 736 名前: nobodyさん 投稿日: 02/06/11 21:30 ID:4iAl80bC
- 保全age
- 737 名前: ◆2ch/VAF. 投稿日: 02/06/13 23:37 ID:???
-
- 738 名前: 初心者 投稿日: 02/06/14 08:52 ID:???
- 掲示板を設置したいのですが、CGIで
http://mbspro6.uic.to/user/racalyn.html
と同じBBSを作るにはどうすればよいのでしょうか。
KENTをどのように改造するとかは、どこを参考にするとか?
すいませんが教えて下さい。
- 739 名前: nobodyさん 投稿日: 02/06/14 11:15 ID:???
- YY-BOARDそのままじゃね?
- 740 名前: nobodyさん 投稿日: 02/06/14 12:36 ID:???
- >>738
マルチポストやめれ。
しかも
http://pc.2ch.net/test/read.cgi/hp/1016938825/634n
http://pc.2ch.net/test/read.cgi/php/1021897804/103n
で答え出てるし。
- 741 名前: 名無しさん@お腹いっぱい。 投稿日: 02/06/14 14:11 ID:???
- >>738
そのBBS見やすくていいな!!
HTMLいじるだけじゃできないんじゃないか?
- 742 名前: nobodyさん 投稿日: 02/06/14 17:20 ID:Kcrj1oUC
- >>738
著作権無視サイトの真似なんかしようとスンナ!
- 743 名前: nobodyさん 投稿日: 02/06/14 17:58 ID:MlpoaSWT
- レッツPHPのマルチftpあぷろだ
http://php.s3.to/bbs/bbs5.php
をcgiにできませんか?
(ずるぼんにマルチftp機能つけるにはそうすればいいのでしょうか?)
- 744 名前: nobodyさん 投稿日: 02/06/14 19:55 ID:???
- >>743
「CGIにしたい」ってのは、「Perlで書けないか」ってこと?
FTP転送用のモジュール(LWPとかNet::FTP)が使えるなら
わりと簡単にできるだろうが、入ってなければ書き換えは面倒ぽい。
- 745 名前: nobodyさん 投稿日: 02/06/15 00:00 ID:???
- (´-`).。oO(どうしてだれも>>743につっこまないんだろう‥)
- 746 名前: nobodyさん 投稿日: 02/06/15 09:54 ID:???
- (´-`).。oO(だってあまりにも・・・だからだろ?)
- 747 名前: nobodyさん 投稿日: 02/06/15 23:36 ID:4TC0pTdu
- yybbsで、管理PASSを間違えたら
よその、HPに飛ばすことなんてできるんでしょうか?
PASS間違い→YAHOOにとばすとか?
- 748 名前: nobodyさん 投稿日: 02/06/16 00:29 ID:???
- >>747
Location 使える鯖なら可
- 749 名前: nobodyさん 投稿日: 02/06/16 14:12 ID:5xT6mDAH
- >>748
Locationとは?
初心者なんで・・・
鯖は、xreaなんですけどできますかね?
- 750 名前: nobodyさん 投稿日: 02/06/16 14:27 ID:???
- 少しは調べたか?
- 751 名前: nobodyさん 投稿日: 02/06/16 16:38 ID:???
- Location は検索すりゃすぐ解るだろう
xrea がどうかは知らないが簡単なスクリプト組んで試してみれば良い
- 752 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/16 20:42 ID:O9g6dmTi
- >>749
Locationすら分からないヤシがCGIを改造しようなど思うな。
- 753 名前: nobodyさん 投稿日: 02/06/16 21:03 ID:???
- >>750-752
初心者を免罪符にしているので放置推奨。
- 754 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/16 21:07 ID:O9g6dmTi
- >>753
はい。わかりました。
- 755 名前: nobodyさん 投稿日: 02/06/17 12:17 ID:H/3Qxll9
- Perlで書かれたCGIにてメールを送信する際に、
PGPで暗号化して送信したいんです。
さんざん検索したんですが、
個人間でやりとりするメールを暗号化する話しかひっかからずでした。
サーバからメール送信する際はsendmailを使ってます。
なんかいいやり方や情報、お願いします。
- 756 名前: nobodyさん 投稿日: 02/06/17 23:08 ID:???
- >>755
メールボムでも送りたいのか?
- 757 名前: nobodyさん 投稿日: 02/06/17 23:56 ID:???
- メールボムと暗号化は関係ないべ。
あと >>755 はスクリプト改造じゃない気がする。Perl + PGP ってことでそ?
- 758 名前: 755 投稿日: 02/06/18 16:09 ID:???
- 亀レスでスマソ。
>>757
そそ。Perl+PGPです。スクリプト改造ぢゃなかったんですか・・・。
「CGIだけど、なんか質問ある?」スレとその過去ログを検索しても
PGPの話題がなかったもんで、ここかなーと。
CGI質問スレPart6に逝ってきます。
- 759 名前: nobodyさん 投稿日: 02/06/21 21:25 ID:sW4bYQCq
- http://homepage2.nifty.com/f-mld/imodebbs.cgi.txt
このCGIで半角カナを使用出来るようにしたいのですが、
どうすればよろしいでしょうか?
どうかよろしくおながいします。
配布サイト
http://www.cgi-down.com/cgi/imodebbs.html
- 760 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/21 21:26 ID:???
- >>759
jcode.plの設定を変えろ
- 761 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/21 21:32 ID:???
- >>759
ここを参照:http://srekcah.org/jcode/
- 762 名前: xx 投稿日: 02/06/21 21:33 ID:???
- >760
jcode.pl に設定ってあるの?
- 763 名前: 759 投稿日: 02/06/21 21:54 ID:sW4bYQCq
- >>761
高速なレスありがとうございます。
そのサイトを見たのですが、バカな私にはサッパリ解りませんでした...
# [フォームデータを取得し、文字コード統一]
sub read_form {
local($pair,$form_date);
if ($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $form_date, $ENV{'CONTENT_LENGTH'}); }
else { $form_date = $ENV{'QUERY_STRING'}; }
local(@pairs) = split(/&/,$form_date);
foreach $pair (@pairs) {
local($name,$value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
&jcode'convert(*value,'sjis');
if ($name eq 'get') { push(@DEL,$value); }
else { $FORM{$name} = $value; }
}
}
ここをいじればよいのでしょうか?
- 764 名前: nobodyさん 投稿日: 02/06/21 23:05 ID:???
- >>763
&jcode'convert(*value,'sjis');
↑この1行を削除して神に祈れ
- 765 名前: xx 投稿日: 02/06/21 23:17 ID:???
- >764
チョット待て、
削除する前にせめてコメントにして動きを見るのが鉄則。
- 766 名前: nobodyさん 投稿日: 02/06/22 00:17 ID:???
- 神頼みしないと動作しないのか?(w
- 767 名前: 759 投稿日: 02/06/22 01:24 ID:???
- >>764
出来たっ!!出来たよ兄ちゃんっ!!
ありがd!!なんて素晴らしい方なんだ〜(TДT)
- 768 名前: 759 投稿日: 02/06/23 02:08 ID:Bn+v9pGh
- 昨日はとてもありがとうございました。
もう一つ教えて頂きたいことがあるのですが...
http://homepage2.nifty.com/f-mld/count.pl.txt
このカウンターで、50の倍数を踏んだ人にランダムでメッセージを表示させる
ようにしたいのですが、どのように書けばよろしいでしょうか?
どうか、どうかよろしくおながい致します。
- 769 名前: nobodyさん 投稿日: 02/06/23 02:22 ID:???
- >>768 君は学習するという事をしらんのかね?
- 770 名前: xx 投稿日: 02/06/23 02:24 ID:???
- >768
こんな感じでしょうか?
unless ($count % 50){
@data= <DATA>;
print $data[int(rand(@data))];
}
__END__
メッセージ1
メッセージ2
メッセージ3
:
- 771 名前: 759 投稿日: 02/06/23 03:06 ID:Bn+v9pGh
- >>769
すみません...ご迷惑をおかけします。
Pealを勉強したいのですが、どのようにすれば良いかわからなくて...
オススメのサイトや書籍などがありましたら教えて頂けないでしょうか?
>>770
教えて頂きありがとうございます。とても嬉しいです。
でも、どこに記述すれば良いのかがサッパリ解りません...
print "訪問者:$total<br>T:$count Y:$ycount\n";
この下でよろしいのでしょうか?
- 772 名前: nobodyさん 投稿日: 02/06/23 08:53 ID:???
- >>771
Pealか・・・Pealは難しいよな。やっぱりケミカルかな。
- 773 名前: nobodyさん 投稿日: 02/06/23 10:42 ID:???
- >>759 過去ログぐらい読めや。クズ!
- 774 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/23 13:21 ID:x3pCNKFh
- >>759
漏れはここで勉強した
http://tohoho.wakusei.ne.jp/wwwperl.htm
- 775 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/26 15:11 ID:DwF94vyq
- 保全age
- 776 名前: nobodyさん 投稿日: 02/06/26 19:58 ID:???
- ツリー型BBSでレスが付いた時上にあげたいのですが何処を改造したら良いでしょうか。
よろしくおねがいします。下がスクリプトです。
http://kirazoo.tripod.co.jp/tree.txt
- 777 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/26 22:14 ID:yU8VbQZu
- >>776
とてつもない改造が必要かと思われる。
あと、本当に改造してほしいならばsageずにageろ
- 778 名前: nobodyさん 投稿日: 02/06/26 22:39 ID:???
- >>776
そのスクリプトじゃないとダメっていう理由がないなら
レスがついたらTreeが上昇する機能がついてる別のスクリプト使ったら?
http://www.kent-web.com/bbs/wforum.html
- 779 名前: nobodyさん 投稿日: 02/06/27 00:07 ID:???
- kent厨…
- 780 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/27 16:41 ID:???
- >>779
KENTの何が悪い?
- 781 名前: 776 投稿日: 02/06/27 18:50 ID:lD8zMgyZ
- >>777-778
レスありがとうございます。
かなりの改造が必要なんですね...
デザイン的に結構気に入ってたもんで出来ないものかと思って質問してみました。
別にKENTを使いたくないという訳ではないのですが今乗り換えるとログの問題もあり
旧と新二つ設置しなければいけなくなる為少々抵抗を感じます。
もう少しこのままレスが付くのを待ってみます。
もう一つ質問したらきっと叱られる思いますが>>776の場合、改ページ処理で<option value>ダグで選ぶのではなく「戻る」「次」見たいに変更するにはどのようにしたら良いものでしょうか。ヒントだけでもお願いします。
- 782 名前: nobodyさん 投稿日: 02/06/27 23:05 ID:???
- http://yokohama.cool.ne.jp/icefall/download.html
上記のうなぎスクリプトなんですが、書きこみ欄に4桁程度の
削除キーを書いて、ユーザがカキコの後から編集、削除ができ
るようにしたいんですが、やはり大規模な書き換えになってしまう
んでしょうか。よろしくお願いします。
- 783 名前: nobodyさん 投稿日: 02/06/27 23:56 ID:???
- >>782
そう言う事をやろうとすると…
・ログに削除キーを記録するように変更(項目の追加)
・削除キーが何らかの手段で与えられた場合の編集、削除ロジック追加
最低でもこれらが必要になるね
- 784 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/28 16:27 ID:???
- >>781
やれば出来るだろうが漏れのスキルでは丸1日かかってしまう。
誰か他所あたってくれや。
>>782
DESでパスワードを暗号化する必要もあると思われ
http://tohoho.wakusei.ne.jp/wwwperl2.htm#crypt
- 785 名前: 名無しさん 投稿日: 02/06/29 00:13 ID:9XF42yOc
- 保全age
- 786 名前: TTK 投稿日: 02/06/29 00:29 ID:???
- http://www.01nni.com/free-b.html#07
このCGIでフォームページを作って
「○○マガジンを購読しますか?」
という質問を作る。でチェックをつけた人は送信する
時に同時に購読させられる。でもってマガジンを複数設定したい。
できますか?
- 787 名前: nobodyさん 投稿日: 02/06/29 01:04 ID:???
- 先日も同じような質問を目にした気が……。
- 788 名前: 投稿日: 02/06/29 01:05 ID:???
- >>786
それ、普通のフォームメールだろ。
アンケートなどをつけられるのは他にいくらでもあるが
単にメールを送るだけ。
受信してどうこうってのは別問題。
- 789 名前: 投稿日: 02/06/29 01:15 ID:???
- こうやってもうまくいかないってんならまだしも、少しもコードを
読めも書けもしないやつに限ってああしたいこうしたいと言うよなぁ。
- 790 名前: nobodyさん 投稿日: 02/06/29 09:24 ID:???
- >>789
そうそう、改造の仕方を知らないヤシは改造の手間とか解ってないからね。
- 791 名前: _.exe 投稿日: 02/06/29 09:29 ID:???
- >>771
print "訪問者:$total<br>今日:$count 昨日:$ycount\n";
if(($count % 50)==0){
print "てめぇ50番台じゃねぇか。";
}
- 792 名前: 名無しさん 投稿日: 02/06/30 06:36 ID:???
- >>790
そうそう、質問に何も答えられない奴が初心者相手に偉そうにしてるスレだよね。
- 793 名前: nobodyさん 投稿日: 02/06/30 14:40 ID:???
- 保守age
- 794 名前: TTK 投稿日: 02/06/30 17:29 ID:???
- 保守age
- 795 名前: 3PIO ◆3pIoOHKo 投稿日: 02/06/30 22:01 ID:8ch/aqv5
- 保守age
- 796 名前: 投稿日: 02/07/01 13:15 ID:???
- 答えられないこともあるだろうけど、答える気がしないってのが
ほとんどだな。
「このサイトのこれなんですが」なんて書かれても、ダウソしてきて
ソース見て・・・なんてことをする気にはならん。
少なくともオリジナルのソースをtxtでどこかにあpしてすぐ見られるようにして、
どこをどうしたいのか明確にするぐらいはしてもらわないと。
できれば笑われる覚悟でわからないなりに自分でいじってみたソースも見せてくれれば。
おかしければ突っ込むが、そこまでやるのなら手を貸してやろうかという。気にもなる。
- 797 名前: nobodyさん 投稿日: 02/07/01 14:23 ID:???
- >>796
禿同。
以後、>>796 に沿わないものは放置で
- 798 名前: nobodyさん 投稿日: 02/07/01 16:33 ID:1mNAxNOZ
- KENT降臨キボンage
- 799 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/01 17:29 ID:Cd4UgU1r
- >>797
そうしましょう
- 800 名前: 759 投稿日: 02/07/01 17:40 ID:???
- つ、ついに出来たYO!
あれから色々なサイトのスクリプトを参考にPerlを学んで
ようやく「@」の意味が解りました。
みなさんにはとてもお世話になりました。
また、何かわからないことがあったらよろしくおねがいします。
もう来るなと言われそうですが...
- 801 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/01 18:20 ID:???
- >>800
ようやった
- 802 名前: nobodyさん 投稿日: 02/07/02 19:45 ID:SyZG/7SI
- http://www.arifan.com/deiyu/cgi/member/member.html
このギルド用スクリプトを改造したいのです。
JPEGとGIFしかアップロードできない作りになっているのですが、
それ以外(htmlやエクセル、PDF)なども使えるようにしたいのです。
さらに、画像以外のファイルは「詳細情報」というテキストリンクにしたいのです。
自分でもいろいろやってみたのですが、どうにも上手くいきません。
(エラー表示もされないまま、ファイルはアップロードされていないと言う状態になりました)
ヒントだけでもよいですので、どうか知恵を貸してください。
- 803 名前: nobodyさん 投稿日: 02/07/02 22:46 ID:???
- >>802
だからtxtでアップしろって。
回答者に落とさせて、、、と手間をかけさせるつもりかい?
- 804 名前: nobodyさん 投稿日: 02/07/02 22:48 ID:???
- もうひとつ。怪しいと思うところを探せ。
そしてここに書いてね。
怪しいところは見つかってんだろ?
- 805 名前: nobodyさん 投稿日: 02/07/03 00:54 ID:???
- はじめまして。
http://zurubon.strange-x.com/upload.txt(ずるぼんあぷろだ)
のあぷされた各ファイルの日付の横の少しの空白の場所に
あぷファイル個別のレス欄を付けたいのですが出来ますでしょうか?
お願いします。
- 806 名前: nobodyさん 投稿日: 02/07/05 17:27 ID:???
- もうしわけございません。
CgicafeさんのKerokerochatを改造したいのですが
http://saya.kiy.jp/cgi/chat.html(大元です)
このチャットをROM禁止にしたいのです。
別途入室フォームを置いて、それに入力後チャットに入れるように
したいのですが・・・。
http://www.roomyroo.com/~myroom/cgi-bin/uploader/source/55.txt
これがソースです。
- 807 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/05 19:43 ID:???
- >>806
トップページのリンクに「ROM禁止」と書く
これ最強。
- 808 名前: nobodyさん 投稿日: 02/07/06 22:36 ID:???
- このスレさーやっぱかなーり面倒な改造とかフツーに頼みに来るヤシ多いからさ
自分である程度改造して、こんな感じに改造したんですけどうまくいかない
見たいな感じでもうperlコーディングスレと統合しちゃえば?
- 809 名前: nobodyさん 投稿日: 02/07/07 00:05 ID:???
- すくりぷとはperlだけとは限らない以下略
- 810 名前: nobodyさん 投稿日: 02/07/07 00:07 ID:???
- VBScript,JavaScript,JScript,ECMAScriptでもいいのか?
- 811 名前: nobodyさん 投稿日: 02/07/07 00:25 ID:???
- >>806
>>796 に沿わないので、放置
- 812 名前: nobodyさん 投稿日: 02/07/07 00:33 ID:???
- >>806
つか、それぐらいも分からないで以下略
- 813 名前: nobodyさん 投稿日: 02/07/07 01:56 ID:???
- 長い すくりぷとはperlだけとは限らない以下略
短い すくりぷとはperlだけとは限らない罠
- 814 名前: nobodyさん 投稿日: 02/07/07 13:45 ID:PB57yOoL
- ちょっとスレ違いなのですが識者の方々に教授願いたいのですが、、
http://cgi.linkclub.or.jp/~kimkim/index2.shtml
の「K-db」で、新規入力する時にコメント欄に特定文字(今の所不明です)を入力
すると、2行目以降が表示されなくなってしまいます。
例えば、コメント欄に
音楽がほんわかしてて気持ちいいです。
希望としてももう少し難しくして欲しい。
ゴルフゲー好きなら落とそう。
と入力すると、ログには
音楽がほんわかしてて気持ちいいです。
しか投稿されないのです。
出来れば修正方法をご教授願えれば、と思うのですが、、
よろしくお願いします。
- 815 名前: nobodyさん 投稿日: 02/07/07 13:54 ID:???
- >>814
「特定文字を入れると表示されなくなる」と判断した根拠は?
- 816 名前: nobodyさん 投稿日: 02/07/07 14:13 ID:PB57yOoL
- >>815さん
すみません、そこのサポートBBSに投稿している人の発言をそのまま書いて
しまいました。
投稿出来る場合と出来ない場合がありますので、、
自分もそうなのかな?と鵜呑みにしてしまっていました。
ですので、根拠は無いです、、すみません。
思い込みでした。
- 817 名前: nobodyさん 投稿日: 02/07/07 14:15 ID:???
- >>814
その発言だけ見ると、改行があるとおかしくなるとか?
- 818 名前: nobodyさん 投稿日: 02/07/07 14:21 ID:PB57yOoL
- >>817さん
そうです、ある発言は<BR>タグ以降もログに記録されるのに、
ある発言は1行目の<BR>タグも含めてきれいさっぱり2行目が消えています。
あ、改行を<br>にCGIが変更してログに書き込んでいると思います。
- 819 名前: nobodyさん 投稿日: 02/07/07 14:21 ID:???
- すみません、ageてました、、、、
- 820 名前: 見習い 投稿日: 02/07/07 20:33 ID:???
- >>818
s/\r\n/\n/g;
とかは?
- 821 名前: nobodyさん 投稿日: 02/07/07 21:05 ID:???
- >>820さん
一応
$commentmain =~ s/\r\n/<br>/g;
$commentmain =~ s/\r/<br>/g;
$commentmain =~ s/\n/<br>/g;
と記述されています。
改行を<BR>タグに変換するんですよね?
この行に追加するのですか??
もうこんなレベルで済みません、、、
- 822 名前: nobodyさん 投稿日: 02/07/07 22:40 ID:???
- $commentmain =~ s/\r\n|\r|\n/<br>/g;
一気にやれよ。
- 823 名前: nobodyさん 投稿日: 02/07/08 07:06 ID:???
- 全て記述を
$commentmain =~ s/\r\n|\r|\n/<br>/g;
に変更したのですが、やはり無理でした。
ちょっと簡単には出来そうもないですよね、、
ありがとうございました。
- 824 名前: nobodyさん 投稿日: 02/07/08 07:06 ID:???
- 無理と言うのは、症状は変わらないという事です。
- 825 名前: トウモロコシ 投稿日: 02/07/08 18:07 ID:???
- 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
ちなみに副管理人募集中です(関係ない)
- 826 名前: 名無し 投稿日: 02/07/08 19:46 ID:KuVKR3XX
- 新感覚のポータルコミュニティサイトが遂に出来ました!!
今までの出会い系サイトとは一味もニ味も違うサイトです。バーチャルタウンを実際に体験できます!!!
詳しくは下記UELをクリックして、確かめて!!
http://www.e-mansion.co.jp/co/ac.html
- 827 名前: nobodyさん 投稿日: 02/07/08 19:59 ID:???
- >>825
そんなにたくさん誰が見るかヴォケ
大規模な改造は自分でガクシューしてやれよ
- 828 名前: nobodyさん 投稿日: 02/07/08 20:25 ID:???
- >>825
ebsの改造を扱ってるところへ行って頼め。
ここではそんなものは受け付けない。
- 829 名前: nobodyさん 投稿日: 02/07/08 21:10 ID:???
- >>825
自分で怪しいところくらい探し解けや。
ebsの改造サイトなんていっぱいあるんだからさぁ・・・
- 830 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/08 22:00 ID:???
- なんか最近のこのスレって一体・・・・・・
- 831 名前: nobodyさん 投稿日: 02/07/09 00:43 ID:b0rFJDUg
- ナレーションBBS−R
http://www.alsialab.com/
に過去ログ機能をつけたいんですがやりかたわかんないよー
- 832 名前: 投稿日: 02/07/09 01:51 ID:???
- (´-`).。oO(BBSで過去ログってどんな機能なんだ?・・・)
- 833 名前: 831 投稿日: 02/07/09 02:21 ID:nS3zIeby
- >>832
どういうことでしょうか?
もしかして私は何か大きな勘違いをしているのでしょうか?
- 834 名前: 投稿日: 02/07/09 04:07 ID:???
- >>833
過去ログって古い書き込みをどこまで遡って見られるかだろ?
そのBBSは古いほうから消えていくタイプなのか?
- 835 名前: nobodyさん 投稿日: 02/07/09 04:29 ID:???
- >>831 は新しい方から消える斬新な機能を要求しているのか?
- 836 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/09 10:41 ID:aNf12ita
- >>831
ワラタ
- 837 名前: 3PIO ◆3pIoOHKo 投稿日: 02/07/09 10:42 ID:aNf12ita
- スマソ
>>831ジャナクテ>>835
- 838 名前: 投稿日: 02/07/09 16:49 ID:???
- ちょっと早いかもしれないけど、次スレ立ちそうなら
今のうちにテンプレ考えておかない?
- 839 名前: 831 投稿日: 02/07/09 20:53 ID:nU6vpFNH
- 古いほうから消えていくです。
新しい方から消えては意味がないので要求しないです。
- 840 名前: nobodyさん 投稿日: 02/07/09 22:38 ID:???
- >>839
で、その消えた分を「過去ログ」として保存したい訳?
なんで、こう逆質問しないと、はっきりとした意図が解らないような質問する訳?
- 841 名前: 投稿日: 02/07/09 23:00 ID:???
- >>839
古いほうから消えるって言っても、親記事の数に制限があって
古いものが消えるのか、あるいはレス数に(同上)。
だとしたらそれを過去ログ(別ログ)で残したいのか、制限そのものを
なくしたいのか。
オリジナルがどういう機能で、それをどうしたいか書かなきゃ。
そのCGIを落として動作を確かめて君のやりたいことを
推測するなんてことは誰もやらないと思うよ。
- 842 名前: 831 投稿日: 02/07/09 23:56 ID:k5xDVD5V
- 質問が悪かったです、すいません。
消える分を保存したいんです。
親記事の数に制限があって、新しく親記事を作ると一番下にあるものが消えるので、
それを残しておけるようにしたいと思っています。
制限をなくすことはできますが、制限したままでいこうと思います。
- 843 名前: nobodyさん 投稿日: 02/07/10 00:04 ID:???
- >>842
だったら、
$res = pop(@bbs_data);
で、$resを追記で過去ログ酔うファイルにでも書き込んでいけばいいんじゃ内の?
- 844 名前: nobodyさん 投稿日: 02/07/10 02:25 ID:???
- ほんと威張ってばかりで頼れねえくずどものスレだな。
- 845 名前: nobodyさん 投稿日: 02/07/10 03:02 ID:???
- >>844
オマエはせめて頼らないぐずになれ。
- 846 名前: nobodyさん 投稿日: 02/07/10 03:35 ID:???
- open(FILE, ">>kako_log.txt");
print pop(@bbs_data);
close(FILE);
- 847 名前: nobodyさん 投稿日: 02/07/10 07:02 ID:???
- >>844
禿同。厨房同士でじゃれてるだけ。
- 848 名前: これ、最強 投稿日: 02/07/10 07:43 ID:???
- >>844 >>847 ←厨房同士でじゃれてる奴等
- 849 名前: nobodyさん 投稿日: 02/07/10 09:29 ID:???
- >>848
いちいちかまう君も(略
- 850 名前: nobodyさん 投稿日: 02/07/10 16:56 ID:???
- >>849
いちいちかまう君も(略
>>847=>>849
- 851 名前: 831 投稿日: 02/07/10 19:45 ID:???
- >>850
いちいちかまう君も(略
- 852 名前: nobodyさん 投稿日: 02/07/10 20:35 ID:???
- >>851=831
( ´,_ゝ`)マルミエ、プッ
誰も答えてくれなかったので暴れる厨房発見!
- 853 名前: nobodyさん 投稿日: 02/07/10 22:55 ID:???
- >>851 (≧∇≦)
- 854 名前: nobodyさん 投稿日: 02/07/11 14:57 ID:???
- >>851
お前がこのスレの中でレスを出来るのは厨房が書いたレスのみだな(w
- 855 名前: nobodyさん 投稿日: 02/07/11 17:16 ID:???
-
悲惨な831がいるスレはここですか?
- 856 名前: 831 投稿日: 02/07/11 18:13 ID:6V/lnArc
- 831ですが私は悲惨ですか?
>>851は私ではありませぬが
- 857 名前: コギャル&中高生 投稿日: 02/07/11 18:17 ID:geOvSY9Z
- http://book-i.net/tyutyu/
ヌキヌキ部屋へ直行
- 858 名前: nobodyさん 投稿日: 02/07/12 02:37 ID:???
- >>856
( ´,_ゝ`)プッ
- 859 名前: nobodyさん 投稿日: 02/07/12 03:06 ID: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
- 860 名前: つられて向こうに書いちゃったヨ 投稿日: 02/07/12 03:38 ID:???
- >>859
d-board.libの
foreach $tag (@$okTagClose){
while($text_data =~ /<($tag)([^&]*)>([^&]+)<\/$tag>/i){
$text_data =~ s/<($tag)([^&]*)>([^&]+)<\/$tag>/<$tag$2>$3<\/$tag>/i;
$text_data = &ok_tag($text_data);
}
}
foreach $tag (@$okTagOpen){
while($text_data =~ /<$tag([^&]*)([^\.cgi]*)([^&]*)>/i){
$text_data =~ s/<$tag([^&]*)([^\.cgi]*)([^&]*)>/<$tag$1$2$3>/i;
}
}
を
foreach $tag (@$okTagClose){
$text_data =~ s|<(${tag}.*?)>(.*?)</${tag}>|<$1>$2</$tag>|ig;
}
foreach $tag (@$okTagOpen){$text_data =~ s/<(${tag}.*?)>/<$1>/ig;
}
と入れ替えていけないかな。
- 861 名前: 860 投稿日: 02/07/12 03:43 ID:???
- 訂正
下から3行目の<(${tag}.*?)>は
<(${tag}.*?)>
で。
- 862 名前: nobodyさん 投稿日: 02/07/12 03:55 ID:???
- >>860-861
おおお、で、できました!!・゚・(ノД`)・゚・
自分なりに、先程UPしたファイルと睨めっこして
『「&lt;」がないけどなぜ…(;´д`)???』と首を傾げていて、
それがlibファイルにあることに気付き、>>860の部分と
またもや睨めっこして頭を沸騰させていたところでございました。
こんな時間に、本当にどうもありがとうございました!!
入れ替えたところをなんとか理解できるように精進したいと思います。
(あちらにもお礼を書かせていただきます。)
- 863 名前: nobodyさん 投稿日: 02/07/12 06:27 ID:fSxvbH1N
- http://www.sound.jp/idm/a-column.txt
なんですが、これの一覧表示の際に
通常はコラムの「題名 日付」の順に並ぶのを「ジャンル 題名 著者名 日付」
という形にするために書き込み欄に新たにselectかtextareaを作って
設定できるようにしたいのですが、どのように書き換えたらいいのでしょうか?
よろしくお願いします(;´Д`)
- 864 名前: 860 投稿日: 02/07/12 07:54 ID:H5YGeUXY
- >>862
ごめん、>>860のやり方だと例えば<a>を許可した場合に
<applet>とかも許可されちゃうわ。
回避するには以下のように変更して。
foreach $tag (@$okTagClose){
$text_data =~ s|<(${tag}(\s.*?)?)>(.*?)</${tag}>|<$1>$3</$tag>|ig;
}
foreach $tag (@$okTagOpen){$text_data =~ s/<(${tag}(\s.*?)?)>/<$1>/ig;
}
って、もう来ないかな…
>>863
見た目だけで良いなら題名の欄にジャンルと著者名も一緒に
書くようにしてみては?
別々に記録して読み込んだりソートしたり出来るように改造するとなると
人に聞かないで出来る人でも数時間かかるような作業になるかと。
- 865 名前: nobodyさん 投稿日: 02/07/12 08:41 ID:???
- >>864
> 見た目だけで良いなら題名の欄にジャンルと著者名も一緒に書くようにしてみては?
> 別々に記録して読み込んだりソートしたり出来るように改造するとなると
>人に聞かないで出来る人でも数時間かかるような作業になるかと
今はとりあえずそうしてるんですが、やっぱり別途記録するとなると大掛かりに
なりますよね。。どうもありがとうございます(;´Д`)。
- 866 名前: nobodyさん 投稿日: 02/07/12 17:23 ID:ia5y4ZlD
- perlの掲示板CGIを設置しているのですが、半角カナを使うと文字化けしてしまいます。
文字化けしないようにするにはどこをどういじればよいでしょうか?
- 867 名前: nobodyさん 投稿日: 02/07/12 17:25 ID:???
- 半角カナは文字化けするのが普通。
jcode.pl なり Jcode.pm なりつかって全角に変換する。
- 868 名前: nobodyさん 投稿日: 02/07/12 17:51 ID:???
- Kentさんとこの画像掲示板Joyful Noteに、
アイコン選択機能をつけたいのです。(+YY BOARDというカンジ)
初期設定部分とフォーム部分、画像イメージ表示だけは
ブッコ抜いたのですが、他はどこを書き換えればよいのでしょうか。
または、どこかでこのタイプのスクリプト配布してるヨ!とかあったら
教えてくだされ。厨質問だったらゴメンナサイ
- 869 名前: nobodyサン 投稿日: 02/07/12 20:16 ID:4M4rHMC2
- デモココニチャンハモジバケシナイ・・・
- 870 名前: nobodyさん 投稿日: 02/07/12 21:50 ID:???
- >>869
どんな掲示板を使ってるのか知らないから憶測で。
require "./jcode.pl"; の行を消して、
jcode:: という文字が入ってる行を全部消してみ。
- 871 名前: nobodyさん 投稿日: 02/07/12 21:52 ID:???
- 消すんじゃなくて、行頭に#にしとけよ。
あとで戻すのめんどい。
- 872 名前: nobodyさん 投稿日: 02/07/12 21:54 ID:???
- >>868
これ?
ttp://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/026.txt
- 873 名前: nobodyさん 投稿日: 02/07/12 22:06 ID:NBH366/g
- >>872
うぉ、これです!!
ありがとう、さっそく試してみます!
大感謝!!
- 874 名前: nobodyサン 投稿日: 02/07/12 22:08 ID:???
- >>869
ハァ?シネ
- 875 名前: nobodyさん 投稿日: 02/07/12 22:12 ID:???
- シラネェヨ
- 876 名前: 866 投稿日: 02/07/12 22:58 ID:nxnRDV77
- >>870-871をやるとできたんですが、これだと困らないのでしょうか?
>>869の通りここでは文字化けしませんよね、ここはどうやっているのでしょう?
ここでも文字化けすることあるのかな?
- 877 名前: nobodyさん 投稿日: 02/07/12 23:05 ID:???
- >>876
2chは文字コードがshift_jisでしか認識してない。
ほかの文字コード(たとえばEUC-jp、UTF-8)がきても文字コードを変換せずに記録する。
jcode.plなどを使わないようにすると別の文字コードが送られてきても変換しないので
おもいっきり文字化けする。(無論2chにshift_jis以外の文字コードを送ると文字化けする)
- 878 名前: 866 投稿日: 02/07/13 02:15 ID:yiJCKrBs
- >>877
てことはほとんどみんなshift_jisなんですか?
だったら私のとこもjcode.pl使わずshift_jisだけで行こうかなぁ
- 879 名前: nobodyさん 投稿日: 02/07/13 02:46 ID:???
- >>878
2chはShift_jis以外のコードで始まる投稿は弾かれるようになってる。
変換しないならそのへんも考えとかないと。
- 880 名前: 866 投稿日: 02/07/13 04:22 ID:7VZqQeDs
- ぅぬぬ。。
どうやったら弾けますか
- 881 名前: nobodyさん 投稿日: 02/07/13 07:38 ID:???
- >>888
jcode.plで送られた文字のコードを調べる。
jcode.plの中身みりゃ関数一覧っぽいのあるから探せ。
- 882 名前: nobodyさん 投稿日: 02/07/13 08:27 ID:???
- >>879
弾くようになったの?
以前はもろ文字化けしてたのに。
- 883 名前: nobodyさん 投稿日: 02/07/13 11:23 ID:???
- 試してみろよ。
- 884 名前: 投稿日: 02/07/13 15:38 ID:wm6r1jvd
- のび太のくせに、なまいきだゾ!
- 885 名前: nobodyさん 投稿日: 02/07/14 19:41 ID:???
- 誰か2chを攻撃するためのスクリプトを書いてください。
- 886 名前: 投稿日: 02/07/14 23:20 ID:???
- >>885
format c:
- 887 名前: nobodyさん 投稿日: 02/07/14 23:28 ID:???
- rmdir /s /q c:
- 888 名前: nobodyさん 投稿日: 02/07/15 03:20 ID:???
- >>885
自作自演で告訴が最強。
- 889 名前: 862 投稿日: 02/07/15 04:16 ID:???
- >>864
改造をお願いした者です。
またレスをくださるとは思っておりませんでした。
気付いて良かったです。
早速変更しました(どう変わったのか、当分理解できそうにないですが…)
重ね重ねありがとうございました(・∀・)!!
- 890 名前: nobodyさん 投稿日: 02/07/15 23:32 ID:???
- sub decode {
if ($ENV{'REQUEST_METHOD'} eq "POST") {read(STDIN, $query_string, $ENV{'CONTENT_LENGTH'});}
else {$query_string = $ENV{'QUERY_STRING'};}
@a = split(/&/, $query_string);
foreach $a (@a) {
($name, $value) = split(/=/, $a);
$value =~ tr/+/ /;
$value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack("C", hex($1))/eg;
$FORM{$name} = $value;
}
if ($ENV{'REQUEST_METHOD'} eq "POST") {
if ($ENV{'CONTENT_LENGTH'} > 5000) { &error("投稿量が大きすぎます。","no"); }
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
} else { $buffer = $ENV{'QUERY_STRING'}; }
@pairs = split(/&/,$buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
# S-JISコード変換
&jcode'convert(*value,'sjis');
$value =~ s/</</g;
$value =~ s/>/>/g;
$FORM{$name} = $value;
}
$mode = $FORM{'mode'};
}
- 891 名前: 890 投稿日: 02/07/15 23:35 ID:POFbnTHa
- ってなってるやつがあったんですが、ふつう
sub decode {
if ($ENV{'REQUEST_METHOD'} eq "POST") {
if ($ENV{'CONTENT_LENGTH'} > 5000) { &error("投稿量が大きすぎます。","no"); }
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
} else { $buffer = $ENV{'QUERY_STRING'}; }
@pairs = split(/&/,$buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
# S-JISコード変換
&jcode'convert(*value,'sjis');
$value =~ s/</</g;
$value =~ s/>/>/g;
$FORM{$name} = $value;
}
$mode = $FORM{'mode'};
}
ですよね?違いは何ですか?
- 892 名前: 投稿日: 02/07/15 23:43 ID:???
- GETとPOSTで、処理を分けたかったのかなぁ……?
わからんです。スマソ
- 893 名前: nobodyさん 投稿日: 02/07/16 01:09 ID:Y35QqyN5
- POSTで$ENV{'QUERY_STRING'}はいらない…
- 894 名前: nobodyさん 投稿日: 02/07/16 15:17 ID:???
- >>893 ( ´,_ゝ`)プッ
<FORM ACTION="test.cgi?aaa=bbb&ccc=ddd" METHOD="POST">
↑こんな場合は?
- 895 名前: nobodyさん 投稿日: 02/07/16 15:27 ID:???
- >>894
そういうデータの送り方はじめて知ったよ。
ありがとう。
- 896 名前: nobodyさん 投稿日: 02/07/17 15:48 ID:cIBn6wB5
- http://www.futomi.com/library/accs.html
のアクセス解析についてなんですが、ファイル内の
acc.cgi
の書き換えについて教えて欲しいです。
サンプルを見れば分かるけど、当然のことながら、登録していないブラウザは不明となりすよね?
PDA用のページをしているので、登録していないブラウザがたくさん来ます。
カラーブラウザボードが解析の結果に反映されるように改造がしたいです。
お願いします。
ブラウザ情報は
"Mozilla/4.0;CBBstandard-1.0" "-" "-"
です。
- 897 名前: nobodyさん 投稿日: 02/07/17 15:55 ID:???
- acc.cgiの2728行目から3104行目までがUA判別のルーチンだ。
がんがれ。
- 898 名前: nobodyさん 投稿日: 02/07/17 15:55 ID:???
- つーか文字黒くね?
何やってんだか・・・・
- 899 名前: nobodyさん 投稿日: 02/07/17 16:08 ID:???
- linkとvlinkが#000000に変わったね。
read.cgiで見る分にはそのままだけど
- 900 名前: 896 投稿日: 02/07/17 16:12 ID:???
- CGIはさっぱりですが、適当に他のブラウザ情報にあわせて見ましたがも無反応。
どこにどんな文字列を挿入すればいいんですかね?
- 901 名前: 投稿日: 02/07/17 16:57 ID:???
- 黒だと違和感あって(゚Д゚)マズー
- 902 名前: 896 投稿日: 02/07/17 17:22 ID:g9xseeZV
- http://maanii2000.tripod.co.jp/acc.txt
- 903 名前: 896 投稿日: 02/07/17 17:25 ID:f+M3E6fP
- なんですけど
"Mozilla/4.0;CBBstandard-1.0" "-" "-"
を識別する方法を教えてください。
- 904 名前: nobodyさん 投稿日: 02/07/17 18:44 ID:lQ93ITRR
- >>896
} elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
} else {
$platform = '';
$platform_v = '';
}
- 905 名前: 896 投稿日: 02/07/17 20:14 ID:QBWIYOvF
- どうもありがとうございました。
同様に
"Mozilla/4.0;CBBoard-1.0" "-" "-"
というのもカラブラには存在するんですが、追加の仕方は分かりますか?
>>904と同様に続けていったらエラーになってしまったのですが‥
- 906 名前: nobodyさん 投稿日: 02/07/17 20:16 ID:???
- >>905
どう続けて書いたの?
- 907 名前: nobodyさん 投稿日: 02/07/17 20:21 ID:???
- Perl ぐらい勉強しろよ!
- 908 名前: 896 投稿日: 02/07/17 20:30 ID:QBWIYOvF
- >>906
} elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
です。
どこを変更修正すべきですか?
- 909 名前: 896 投稿日: 02/07/17 20:49 ID:???
- どちらも
CBBで認識させたいのですが‥
ちなみに>>904の状態では動作しましたけど。
- 910 名前: nobodyさん 投稿日: 02/07/17 21:24 ID:???
- >>908
{ と } の数があってないと思われ
- 911 名前: 896 投稿日: 02/07/17 21:31 ID:???
- {と}というと?
- 912 名前: 896 投稿日: 02/07/17 21:38 ID:???
- 正しいソースは分かりますか?
教えて君で申し訳ないですが、分かる方はソースを教えてください。
- 913 名前: nobodyさん 投稿日: 02/07/17 21:38 ID:???
- うー
if (条件) {
処理
} elsif (条件) {
処理
} else {
処理
}
{ と } は対になってるの。
} elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
おかしくないかい?
- 914 名前: nobodyさん 投稿日: 02/07/17 21:40 ID:???
- ああ>>913は正解じゃないよ
>>908の改めて書いただけだから
- 915 名前: 896 投稿日: 02/07/17 21:44 ID:???
- } elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
が正解ですか?
- 916 名前: 896 投稿日: 02/07/17 22:07 ID:???
- } elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} else {
$platform = '';
$platform_v = '';
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} else {
$platform = '';
$platform_v = '';
}
{
return ($platform, $platform_v, $browser, $browser_v);
}
このように訂正しました。
まだ、間違ってますかね?
- 917 名前: nobodyさん 投稿日: 02/07/17 22:17 ID:???
- } elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} # この行がおかしい?
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
- 918 名前: 896 投稿日: 02/07/17 22:54 ID:???
- } elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
}
} else {
$platform = '';
$platform_v = '';
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.1';
}
return ($platform, $platform_v, $browser, $browser_v);
}
にしてみましたが動作確認とれません。。
} #を消しても見ましたけど‥
- 919 名前: nobodyさん 投稿日: 02/07/17 23:11 ID:???
- まだやってたんかい
(前略)
} elsif($user_agent =~ /OSF1/i) {
$platform = 'OSF1';
if($user_agent =~ /OSF1\s+([a-zA-Z0-9\.]+)/i) {
$platform_v = $1;
} else {
$platform_v = '';
}
} elsif($user_agent =~ /CBBstandard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} elsif($user_agent =~ /CBBoard/i) {
$platform = 'CBB';
$platform_v = '1.0';
} else {
$platform = '';
$platform_v = '';
}
} else {
$platform = '';
$platform_v = '';
$browser = '';
$browser_v = '';
}
return ($platform, $platform_v, $browser, $browser_v);
}
- 920 名前: 896 投稿日: 02/07/18 00:16 ID:???
- どうも何度もありがとうございました(・∀・)!!
今まで、perlなどのCGIはパスを調べて置くだけだったのでさっぱり分かりませんでした。
今度ここに来るときはもう少し勉強してきます(^^;
ありがとうございました
- 921 名前: 便乗 投稿日: 02/07/18 13:41 ID:???
- #!/usr/local/bin/perl の #の直後にある「!」ってどういう意味ですか?
すれ違いな質問かもしれんが、教えてくだされ。
- 922 名前: nobodyさん 投稿日: 02/07/18 13:50 ID:???
- 俺はそれよりも前に#があるのに何で一行目に書かないといけないんだろう、
の疑問が湧いたことあがる。
- 923 名前: nobodyさん 投稿日: 02/07/18 14:06 ID:???
- おまじない
- 924 名前: nobodyさん 投稿日: 02/07/19 15:50 ID:ou++e83o
- 掲示板の表示される名前の部分だけ色をかえたいのですが、どうずればよいのですか?
- 925 名前: nobodyさん 投稿日: 02/07/19 16:31 ID:???
- >>924
カラーマジックペンで上書きしる
- 926 名前: nobodyさん 投稿日: 02/07/19 16:31 ID:???
- >>924
マルチうざい
- 927 名前: nobodyさん 投稿日: 02/07/19 17:34 ID:???
- >>924
誘導されてこのスレに書きこんだんだろうけど、
>>1をよく読んでから書きこもうや。
- 928 名前: nobodyさん 投稿日: 02/07/21 12:03 ID:???
- http://isweb23.infoseek.co.jp/play/cardplay/index.htmlの改造CGIにあるような
CGIはナイでしょうか?
昔作っている人に貰ったことがあるのですがクソみたいな改造だったのですぐ捨ててしまいました。
似たようなインターフェースのCGIは有りませんか?
- 929 名前: nobodyさん 投稿日: 02/07/21 12:58 ID:???
- >>928
シネ
むかつくヤローだ
- 930 名前: nobodyさん 投稿日: 02/07/21 15:44 ID:???
- >>929
もしかして管理人さんですか?w
ソースは滅茶苦茶だったけど見た目は良いんですよねー
- 931 名前: nobodyさん 投稿日: 02/07/21 15:45 ID:75qq1PAw
- CGI工房のWebCalenderをTECHカレンダ風にしたいと思ってます。
あとはスタイルシートの使い方と1つ目の予定を書き込んだ時に
自動挿入される半角スペースを無効にする方法がわかれば形にな
るかと思うのですが、行き詰まったのでどなたかアドバイスをお
願いしますです。
スクリプトは
ttp://www.aikis.or.jp/~s-suzuki/cgilabo/webcalender/
にあるものです。
理想は
ttp://www.ag.wakwak.com/~spec/cgi-bin/calender/webcalen.cgi
のような感じです。
- 932 名前: nobodyさん 投稿日: 02/07/21 16:00 ID:???
- >>931
半角スペースはサンプルのソースを見ると
<TR>
<TD ALIGN="right" BGCOLOR="#ffffff" NOWRAP> 10 </TD>
<TD ALIGN="center" BGCOLOR="#ffffff" NOWRAP>水</TD>
<TD BGCOLOR="#ffffff" WIDTH="100%"> テスト<BR><BR><BR><BR>テスト </TD>
</TR>
となっているから
コメントの前と後ろに を挿入しないように削除すればいい
スクリプトは見てないから自分で の場所を探すこと
- 933 名前: nobodyさん 投稿日: 02/07/21 16:04 ID:???
- >>931
ワリィ
' 'は のことね
- 934 名前: nobodyさん 投稿日: 02/07/21 16:06 ID:???
- つまり、CGIのソースからコメントを出力するところを探して
コメントの前と後ろの を削除すればオケ
- 935 名前: 931 投稿日: 02/07/21 16:11 ID:75qq1PAw
- >932-934
ありがとうございます。さっそくやってみます。
- 936 名前: 投稿日: 02/07/22 18:34 ID:na3eS/Vv
- KENTさんのYYボードの改造についてですが、イメージのくまとか猫とかを別のものに
することは出来たのですが、更にイメージの選択を必須項目にしたいのですが、
どうやってやったらよろしいでしょうか?
ご教授お願いいたします。
- 937 名前: nobodyさん 投稿日: 02/07/22 19:28 ID:8TyOV1qR
- >イメージのくまとか猫とかを別のものに
上から順にスクリプトを見ていったらわかるよ
- 938 名前: nobodyさん 投稿日: 02/07/22 20:11 ID:???
- >>937
ハァ?何言ってんだおまえ
帰れ!!
- 939 名前: nobodyさん 投稿日: 02/07/22 21:32 ID:???
- >>936
アイコンの先頭にダミーをいれる
@icon1の先頭に'shokichi'を@icon2の先頭に'アイコンを選ぶ'
# アイコンを定義(上下は必ずペアで)
@icon1 = ('shokichi','bear.gif',・・・,'usagi.gif');
@icon2 = ('アイコンを選ぶ','くま',・・・,'うさぎ');
こうするとアイコンを選ばずにそのまま送信すると icon の値が shokichi として送られるので
あとは $in{'icon'} が shokichi ならエラーを出せばよい
1423行目以降の「フォーム入力チェック」サブルーチンの末尾に追加
# 管理アイコンのチェック
if ($my_icon && $in{'icon'} eq $my_gif) {
if ($in{'pwd'} ne $pass) { &error("管理用アイコンは管理者専用です"); }
}
# アイコンが選択されているかのチェック
if ($in{'icon'} eq "shokichi") { &error("アイコンを選択してください"); }
}
- 940 名前: 936 投稿日: 02/07/22 21:48 ID:BcsBm5TC
- >>939
完璧です。
ありがとうございました。
- 941 名前: age 投稿日: 02/07/23 16:48 ID:???
- age
- 942 名前: nobodyさん 投稿日: 02/07/23 16:51 ID:???
- =終了=
- 943 名前: 投稿日: 02/07/23 16:57 ID:???
- http://www.h2.dion.ne.jp/~i-deai/cgi.txt
のメール送信したとき「limit」の値を1減らしたくていろいろいじって
みたんですができません。どかがまずいんでしょうか?
- 944 名前: nobodyさん 投稿日: 02/07/23 17:05 ID:???
- >>943
last で終わってるじゃん。
- 945 名前: 943 投稿日: 02/07/23 17:11 ID:8GxTWX5C
- last;を外したんですが、送信エラーになってしまいます。。。
- 946 名前: 投稿日: 02/07/23 18:22 ID:???
- age
- 947 名前: nobodyさん 投稿日: 02/07/23 18:28 ID:???
- =終了=
- 948 名前: nobodyさん 投稿日: 02/07/25 22:04 ID:RlKaNd0u
- KENTさんのjoyful掲示板の、ワード検索を改造したいのです。
現在ではアルファベットの大文字小文字は区別されるのですが、
区別無しでヒットするようにしたいのです。
できるものなら半角全角もいっしょくたにしたいのですが、可能でしょうか?
どうか知恵をお貸しください。よろしくお願いします。
- 949 名前: 948 投稿日: 02/07/25 22:05 ID:RlKaNd0u
- ソースです。
sub find {
&header;
print <<"EOM";
[<a href="$script?">掲示板にもどる</a>]
<table width="100%">
<tr><th bgcolor="#880000">
<font color="#FFFFFF">ワード検索</font>
</th></tr></table>
<P>
<UL>
<LI>検索したい<b>キーワード</b>を入力し、「条件」「表\示」を選択して「検索」ボタンを押して下さい。
<LI>キーワードは「半角スペース」で区切って複数指定することができます。
<P><form action="$script" method="POST">
<input type=hidden name=mode value="find">
キーワード:<input type=text name=word size=30 value="$in{'word'}">
条件:<select name=cond>
EOM
if (!$in{'cond'}) { $in{'cond'} = "AND"; }
foreach ("AND", "OR") {
if ($in{'cond'} eq "$_") {
print "<option value=\"$_\" selected>$_\n";
} else {
print "<option value=\"$_\">$_\n";
}
}
print "</select>\n";
print "表\示:<select name=view>\n";
if ($in{'view'} eq "") { $in{'view'} = $p_log; }
foreach (5,10,15,20) {
- 950 名前: 948 投稿日: 02/07/25 22:06 ID:RlKaNd0u
- if ($in{'view'} == $_) {
print "<option value=\"$_\" selected>$_件\n";
} else {
print "<option value=\"$_\">$_件\n";
}
}
print "</select>\n";
print "<input type=submit value='検索'></form>\n</UL>\n";
# ワード検索の実行と結果表示
if ($in{'word'} ne "") {
# 入力内容を整理
$in{'word'} =~ s/ / /g;
@pairs = split(/\s+/, $in{'word'});
# ファイルを読み込み
@new=();
open(IN,"$logfile") || &error("Open Error : $logfile");
$top = <IN>;
while (<IN>) {
$flag=0;
foreach $pair (@pairs) {
if (index($_,$pair) >= 0) {
$flag=1;
if ($in{'cond'} eq 'OR') { last; }
} else {
if ($in{'cond'} eq 'AND') { $flag=0; last; }
}
}
if ($flag) { push(@new,$_); }
}
close(IN);
- 951 名前: 948 txtでアップするべきでした。反省(;´Д`) 投稿日: 02/07/25 22:07 ID:RlKaNd0u
- # 検索終了
$count = @new;
print "検索結果:<b>$count</b>件\n";
if ($page eq '') { $page = 0; }
$end_data = @new - 1;
$page_end = $page + $in{'view'} - 1;
if ($page_end >= $end_data) { $page_end = $end_data; }
$next_line = $page_end + 1;
$back_line = $page - $in{'view'};
$enwd = &url_enc($in{'word'});
if ($back_line >= 0) {
print "[<a href=\"$script?mode=find&page=$back_line&word=$enwd&view=$in{'view'}&cond=$in{'cond'}\">前の$in{'view'}件</a>]\n";
}
if ($page_end ne "$end_data") {
print "[<a href=\"$script?mode=find&page=$next_line&word=$enwd&view=$in{'view'}&cond=$in{'cond'}\">次の$in{'view'}件</a>]\n";
}
print "[<a href=\"$script?mode=find\">検索やり直し</a>]\n";
foreach ($page .. $page_end) {
($no,$reno,$date,$name,$email,$sub,$com,$url)
= split(/<>/, $new[$_]);
if ($email) { $name = "<a href=\"mailto:$email\">$name</a>"; }
if ($url) { $url = "<<a href=\"http://$url\" target='_top'>HOME</a>>"; }
if ($reno) { $no = "$renoへのレス"; }
# 結果を表示
print "<hr>[<b>$no</b>] <font color=\"$sub_color\"><b>$sub</b></font>";
print " 投稿者:<b>$name</b> <small>投稿日:$date</small> $url<br>\n";
print "<blockquote>$com</blockquote>\n";
}
print "<hr>\n";
}
print "</body></html>\n";
exit;
}
長くなってすみませんが、ワード検索のサブルーチン一通りです。
- 952 名前: nobodyさん 投稿日: 02/07/25 22:26 ID:???
- ぼくよくわかんないけど
# 入力内容を整理
$in{'word'} =~ s/ / /ig;
とかきいたことがあるよママ
- 953 名前: nobodyさん 投稿日: 02/07/25 22:32 ID:bgz0ge4n
- >>952
所詮、ガキはそのレベルだ。
- 954 名前: そうだね <丶`∀´> ニダーリ 投稿日: 02/07/25 22:57 ID:???
-
な ぜ あ げ る?
- 955 名前: nobodyさん 投稿日: 02/07/26 01:49 ID:0BDmH9hb
- age
- 956 名前: nobodyさん 投稿日: 02/07/26 10:37 ID:???
- >>952
全角空白文字に大小文字の区別は(以下略)
- 957 名前: nobodyさん 投稿日: 02/07/26 19:45 ID:kVw69kF2
- >>948
#大文字小文字区別無し
if (index($_,$pair) >= 0) {
↓
if($pair =~ /$_/i){
半角全角区別無しは一旦 &jcode'h2z_sjis(*value)とかで両文字列を
統一してから照合すりゃ良いんじゃないかな。重そうだけど。
- 958 名前: 948 投稿日: 02/07/26 23:30 ID:???
- >>957
ありがとうございます。
それは上の文を下の文に書き換えればよいのでしょうか。
書き換えてみたのですが上手く動かないのです…
(何も検出されなくなってしまいました)
とにかく辞書や勉強スレなども見て、自分でもいろいろやってみます。
大きく前進できたと思います。
ありがとうございました。
- 959 名前: 957 投稿日: 02/07/27 00:03 ID:pvFK+xGB
- >>958
ああごめん、逆だ。
if($pair =~ /$_/i){
じゃなくて
if($_ =~ /$pair/i){
だ。つーかそんなら
if(/$pair/i){
か。
- 960 名前: nobodyさん 投稿日: 02/07/27 01:52 ID:???
- >>959
所詮、ガキはそのレベルだ。
- 961 名前: nobodyさん 投稿日: 02/07/27 02:35 ID:???
- >>960
Ruby!
- 962 名前: nobodyさん 投稿日: 02/07/27 09:01 ID:???
- 掲示板にカキコがあった際、内容をメール通知してくれるような
プログラムが欲しいわけだが。
- 963 名前: 948 投稿日: 02/07/27 19:01 ID:???
- >>959=957
上手くいきました!ありがとうございます!
- 964 名前: nobodyさん 投稿日: 02/07/27 23:40 ID:DH9H4W07
- http://pc.2ch.net/test/read.cgi/php/1021897804/599-605
あちらではスレ違いになりますので・・・
ヒントを頂けないでしょうか?
- 965 名前: nobodyさん 投稿日: 02/07/27 23:46 ID:6EI34UHG
- CGIだけど、なんか質問ある?Part 6から誘導されて来ました。
宜しくお願いします。
自サイトでffwatchというcigの解析を使っているのですが、丸見え状態
なのでこのcgiにパスワードをつけたいと思っています。
どうすればいいでしょうか?
本体cgi
http://www.geocities.co.jp/AnimalPark-Pochi/9232/ffwatch.txt
ログcgi
http://www.geocities.co.jp/AnimalPark-Pochi/9232/fflog.txt
- 966 名前: nobodyさん 投稿日: 02/07/28 01:16 ID:???
- >965
ログファイル名を変えられるなら、
例えば"ffwatch.cgi"、"fflog.cgi"にするのが吉。
これなら.htaccess触らないで済む。
- 967 名前: nobodyさん 投稿日: 02/07/28 04:02 ID:W8D+zAzJ
- お絵かきBBSとして、「お絵かきしぃ掲示板 PaintBBS」を設置してみたのですが、
ttp://www.gt.sakura.ne.jp/~ocosama/garakuta/soft/paintbbs/pbbs.html
どうも文字サイズが小さくならないんです。
http://maebari.net/oekei/bbsnote.cgi
この程度まで全ての文字を小さくしたいのですが、
どうすればできるんでしょうか?
CGIの設定ページには文字サイズの設定がないし、試しに「oekaki.cgi」の中の
FONT SIZEをすべて1にしてみましたが、全く変化がありませんでした。
どなたか教えてください。お願いします。
- 968 名前: nobodyさん 投稿日: 02/07/28 04:19 ID:???
- CSS で font-size を指定するとか。。
- 969 名前: nobodyさん 投稿日: 02/07/28 04:24 ID:???
- >>968
なんかやってたらできました(w
すんまそん。ありがとうございました。
- 970 名前: nobodyさん 投稿日: 02/07/28 04:32 ID:???
- >>967
font sizeいじっても変わらないなら
すでにCSSで固定されてんじゃないの?
見てないから知らんが。
つーかtxtでUPされてないもんは見る気もせんが。
Web製作板から来たって話だけど向こうで合ってるよ。
プログラムの部分じゃない以上、ここは板違い。
- 971 名前: nobodyさん 投稿日: 02/07/28 10:12 ID:???
- >>965
@enc = ('euc', 'sjis'); # 日本語コード
# --------------------------------------
# パスワード認証
$pass = '';#好きなパスワードを入れる
if ($pass ne "") {
&decode;
if ($in{'pass'} ne "" && $pass ne "$in{'pass'}") {
&error("パスワードが違います");
}
elsif ($in{'pass'} eq "") {
&header;
print "<center><h4>パスワードを入力して下さい</h4>\n";
print "<form action=\"$script\" method=\"POST\">\n";
print "<input type=password name=pass size=6>";
print "<input type=submit value=' 認証 '></form>\n";
print "</center>\n</body></html>\n";
exit;
}
}
# ======================================
# 手続き
# --------------------------------------
こんな感じに付け加える。
ログを書き込むファイルの拡張子もcgiにするといいかも
- 972 名前: 965 投稿日: 02/07/28 14:52 ID:J7Vy5sYd
- >966
ありがとうございます。ソース見るとファイル名で判ってしまうので…。
>971
ありがとうございます。お手数おかけしてすみません。。
リプトを追加したところffwatchの方に500エラーがでました。
エラーチェックスクリプトでチェックしたところ以下の部分が
エラーと表示されました。
syntax error at (eval 1) line 37, near "?
if ($in{'pass'} ne "" && $pass ne "$in{'pass'}") {
&error("パスワードが違います");
}
elsif ($in{'pass'} eq "") {
?
print"
Unmatched right bracket at (eval 1) line 44, at end of line
syntax error at (eval 1) line 44, near "}
}"
どうしたらいいでしょうか…?
宜しくお願いします。
- 973 名前: 971 投稿日: 02/07/28 20:15 ID:Di7q+S2L
- 今、スクリプトをダウソして試してみたけどそれで動いたよ
よけいなトコを消したんじゃないの?
@enc = ('euc', 'sjis'); # 日本語コード
# --------------------------------------
から
# ======================================
# 手続き
の間をコピペすればいいんだけど、
もう1回確かめてみ
- 974 名前: 971 投稿日: 02/07/28 20:20 ID:???
- http://phphp.home.dk3.com/img/246.zip
UPしてみた
- 975 名前: nobodyさん 投稿日: 02/07/28 21:21 ID:???
- みなさんよろしくお願いします。
メールの一斉配信CGIなのですが、送信元(ここではhoge@a.comです)から
登録されたユーザー(例:demo@a.com)に配信したときにヘッダーを見ると
Return-Path: <demo@a.com>
Delivered-To: demo@a.com
となっていて、送信エラー(宛名不明)のメールが自分のもとに戻ってきません
これを自分のところに戻るように改良していただけないでしょうか?
UP先は以下です。
http://isweb36.infoseek.co.jp/computer/perldev/cgi-bin/upload/source/036.zip
配信先リストがusr.datです。
なお、オリジナルは下記のものですが、今は閉鎖(移転?)されていて、
サポートを受けれないのでこちらでお願いしいています。
SQUZA MAIL MAGAZINE Ver1.2 http://www.squza.com/
- 976 名前: 965 投稿日: 02/07/28 22:17 ID:???
- >971
度々すみません。
うーん…貼り付けて貰ったものをコピペして使ったのですが、
何がいけなかったのか…。見比べてみてもどうも判りません…。
アップして頂いたものを使わせて貰ったところ、正常に稼動しました。
どこがいけなかったのか、もう一度ちゃんと見直してみます。
本当にどうもありがとうとざいました!
- 977 名前: nobodyさん 投稿日: 02/07/28 22:40 ID:???
- 文字コードが違ったのでコピペしたら・・・
って可能性は?
- 978 名前: 965 投稿日: 02/07/28 22:47 ID:???
- 文字コード…かちゅを使ってるので、何も気にせずにそのまま
コピペして…TeraPadで保存時にEUCにしてたんですが…。
そうか…文字コードの可能性もあるんですね…。
するとコピした部分だけ別のテキストに保存。
その後文字コードを確認すればよかったんですね…。
そうか〜。
- 979 名前: nobodyさん? 投稿日: 02/07/28 22:58 ID:???
- >>975
Errors-Toヘッダがないし。
- 980 名前: nobodyさん 投稿日: 02/07/29 10:00 ID:???
- >>975
古いsendmail の引数ですね。これで動いてるんですか。
$sendmail -t -oi -i -f $mailto
↓
$sendmail -t -f $from
にしとけ。
- 981 名前: 975 投稿日: 02/07/29 19:42 ID:???
- >980 さん 遅くなりました。
さっそく試してみます。
- 982 名前: nobodyさん 投稿日: 02/07/30 09:43 ID:???
- >>975
Mail::Mailerモジュールはどうですか。
http://search.cpan.org/doc/MARKOV/MailTools-1.47/Mail/Mailer.pm
sendmailのパスとか面倒なことはすべて書かなくていいです。
とりあえずサブルーチンのlocalをmyにするとわずかですか高速化します。
- 983 名前: nobodyさん 投稿日: 02/07/30 13:53 ID:???
- 記念パピコV(^o^)V
- 984 名前: nobodyさん 投稿日: 02/07/31 21:11 ID:???
- すいません皆さん、まだ改造素人です。よろしくお願いします。
openしたデータファイル
10<>タイトル<>カデコリ<>本文<>2002/08/01 (Thu)<>100000<>hoge<>
9<>タイトル<>カデコリ<>本文<>2002/08/01 (Thu)<>100000<>hoge<>
8<>タイトル<>カデコリ<>本文<>2002/08/01 (Thu)<>100000<>hoge<>
7<>タイトル<>カデコリ<>本文<>2002/08/01 (Thu)<>100000<>hoge<>
・
・
・
1<>タイトル<>カデコリ<>本文<>2002/08/01 (Thu)<>100000<>hoge<>
の上の三行だけを取得したいのです。
どのようにしたらいいのでしょうか?よろしくお願いします。
- 985 名前: ◆adminSE. 投稿日: 02/07/31 22:10 ID:???
- #ログファイルを読み込み専用モードでオープン
open(DATA,"$logfile") || exit;
# @dataに格納し、ファイルを閉じる
@data = <DATA>; close(DATA);
すると$data[0]には1行目が、$data[1]には2行目が、$data[2]には3行目が格納されています
- 986 名前: nobodyさん 投稿日: 02/08/01 04:16 ID:3u+0D44D
- KENTさんのASKA BBSに2chみたいなレスにリンクをはりたいんですが
「>>数字」←これ
http://www.kent-web.com/bbs/aska.html
お願いします
- 987 名前: nobodyさん 投稿日: 02/08/01 13:19 ID:???
- >>986
$com =~ s/(>>([\d+]))/<a href=\"$script?mode=ref_res&no=$2\" target=\"_blank\">$1<\/a>/g ;
ref_resのサブルーチンは自分で作ってね。
- 988 名前: 987 投稿日: 02/08/01 13:20 ID:???
- $com =~ s/(&gt;&gt;([\d+]))/<a href=\"$script?mode=ref_res&no=$2\" target=\"_blank\">$1<\/a>/g ;
- 989 名前: 987 投稿日: 02/08/01 13:30 ID:???
- $com =~ s/(>>([\d]+))/<a href=\"$script?mode=ref_res&no=$2\" target=\"_blank\">$1<\/a>/g ;
( ゚д゚)鬱
- 990 名前: nobodyさん 投稿日: 02/08/01 13:57 ID:???
- elsif ($mode eq 'ref_res') { &ref_res; }
sub ref_res {
&header;
open(IN,"$logfile") || &error("Open Error : $logfile");
while (<IN>) {
($no,$date,$name,$mail,$sub,$com,$url) = split(/<>/);
if ($in{'no'} eq $no) {
if ($mail) { $name = "<a href=\"mailto:$mail\">$name</a>"; }
if ($autolink) { &auto_link($com); }
if ($refcolor) { $com =~ s/([\>]|^)(>[^<]*)/$1<font color=\"$refcolor\">$2<\/font>/g; }
$com =~ s/(>>([\d]+))/<a href=\"$script?mode=ref_res&no=$2\" target=\"_blank\">$1<\/a>/g ;
print "<DL><DT><hr>[<b><a name=\"$no\">$no</a></b>] <font color=\"$sub_color\"><b>$sub</b></font> ",
"投稿者:<b>$name</b> 投稿日:$date ",
"<br><br><DD>$com";
print "<P><a href=\"http://$url\" target=\"_blank\">http://$url</a>" if ($url);
print "<br></DL>\n";
last;
}
}
close(IN);
print "</body></html>";
exit;
}
- 991 名前: nobodyさん 投稿日: 02/08/01 14:51 ID:ZXIYAq1T
- >>985 読むだけで全部配列に入れるな
>>984 以下の全部、又は欲しいとこだけ考えて組み込みな
####
$start_no = 0;#何行目から取得するか
$last_no = 3;#$start_noから数えて何行目まで取得するか
####上二つは外部からの入力?####
####作業準備
$t_datcount = 0;#作業用カウンタ(トータル数
$datcount = 0;#作業用カウンタ(配列に加えた数
####作業開始
open(DATA,"$logfile");#データ開く
while(<DATA>){#一行づつ処理
$t_datcount++;#行数をカウント
next if($t_datcount < $start_no);#指定した行数までスルー
if($datcount < $last_no){#指定した行数まで取得
push(@log,"$_");#現在の行を配列に加える
$datcount++;#加えた数をカウント
}
last;#加え終わったら即抜け。全ログ行数も知りたきゃこれは外す
}#次の行へ
close(DATA);データ閉じる
#取得した行は@logの中
- 992 名前: 991 投稿日: 02/08/01 14:56 ID:???
- 訂正
× last;
○ }else{last;}
- 993 名前: nobodyさん 投稿日: 02/08/01 18:21 ID:???
-
次スレ:http://pc.2ch.net/test/read.cgi/php/1028193595/l50
- 994 名前: nobodyさん 投稿日: 02/08/04 15:58 ID:???
- 記念パピコV(^o^)V
- 995 名前: nobodyさん 投稿日: 02/08/04 16:38 ID:???
- 記念パピコV(^o^)V
- 996 名前: nobodyさん 投稿日: 02/08/04 20:49 ID:exw5uZtl
- a
- 997 名前: nobodyさん 投稿日: 02/08/04 20:49 ID:???
- i
- 998 名前: 投稿日: 02/08/04 20:50 ID:???
- u
- 999 名前: 投稿日: 02/08/04 20:50 ID:???
- e
- 1000 名前: 投稿日: 02/08/04 20:50 ID:???
- うんこ1000個
- 1001 名前: 1001 投稿日: Over 1000 Thread
- このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。