[過去ﾛｸﾞ]
bbs.cgi再開発プロジェクト 3 (1001ﾚｽ)
bbs.cgi再開発プロジェクト 3 http://qb5.5ch.net/test/read.cgi/operate/1076666901/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
952: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 17:37:28 ID:YeLg7Dw8 >>949 my %FORM; を消し忘れた……。 >>950 よくは分からないですけど 外側のmy変数はコンパイル時に実体が作られるんでしょうか。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/952
953: [―{}@{}@{}-] 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 17:37:57 ID:yl4eb3hK SpeedyCGIインストール完了 なんとなく離してみた なぜか動いた なぜだ〜〜〜 my $NOWTIME;#現在時刻 &bbs_main; exit; ######################################################### sub bbs_main { my $version = "BBS.CGI - 2005 (for SpeedyCGI)"; $NOWTIME = time;#現在時刻 http://qb5.5ch.net/test/read.cgi/operate/1076666901/953
954: FOX ★ [] 04/12/02 17:53:42 ID:??? >>952 なんでしょうねぇ my しても、実際に使い方が悪かったらどっかに(CS?) 実態が 作られちゃうんでしょうねぇ http://qb5.5ch.net/test/read.cgi/operate/1076666901/954
955: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 17:56:29 ID:WC2kwP6B んもう、書き直すならオブジェクト指向で書き直せばいいのに。 オブジェクト指向ならmod_perlの道が見えるのに。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/955
956: FOX ★ [] 04/12/02 17:58:44 ID:??? >>955 それは大変すぎるですよ、私にとっては 次の世代の方々への贈り物ということで、 SpeedyCGI でかなり改善することが知りたいというのが目的なもんで 「かなり改善」が望めないならお蔵入りという話し。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/956
957: FOX ★ [] 04/12/02 18:00:25 ID:??? http://dso.2ch.net/test/bbs998.txt 現在の bbs.cgi こまっているところ【３】 &foxReadForm($GB);#$FORM を読み込む 安易に代入しただけじゃ駄目なの? $GB->{FORM} = %FORM; ← この部分 http://qb5.5ch.net/test/read.cgi/operate/1076666901/957
958: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 18:11:54 ID:YeLg7Dw8 >>957 foxReadFormの頭で my $FORM = $GB->{FORM}; として、代入の方は $FORM->{$name} = "$value"; とするのがよいかと。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/958
959: FOX ★ [] 04/12/02 18:12:56 ID:??? やってみるです http://qb5.5ch.net/test/read.cgi/operate/1076666901/959
960: FOX ★ [] 04/12/02 18:16:02 ID:??? sub foxReadForm { my ($GB) = @_; my $query_string = undef; my (@m_elements, $m_element, $name, $value); my %FORM = $GB->{FORM}; で駄目だった。 (my $FORM だと 500 error だった) http://qb5.5ch.net/test/read.cgi/operate/1076666901/960
961: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 18:17:51 ID:YeLg7Dw8 うひょ。 sub foxReadForm { my ($GB) = @_; my $query_string = undef; my (@m_elements, $m_element, $name, $value); my $FORM = $GB->{FORM}; #環境変数からＰＯＳＴのでーたをもらう〜 if ($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN, $query_string, $ENV{'CONTENT_LENGTH'}); @m_elements = split(/&/, $query_string); foreach $m_element (@m_elements) { ($name, $value) = split(/=/, $m_element); $value =~ s/\0//g; $value =~ tr/+/ /; $value =~ s/%([0-9a-fA-F][0-9a-fA-F])/pack("C", hex($1))/eg; $value =~ s/</</g; $value =~ s/>/>/g; $value =~ s/\r\n|\r|\n/<br>/g; $value =~ s/<br>/ <br> /g; $value =~ s/[\0\x00-\x1f]//g; $FORM->{$name} = "$value"; } } #１行データからは改行を削ってタグを閉じます $FORM->{'subject'} =~ s/\#//g; $FORM->{'subject'} =~ s/ <br> //g; $FORM->{'subject'} =~ s/&//g; $FORM->{'FROM'} =~ s/"/"/g; $FORM->{'FROM'} =~ s/ <br> //g; $FORM->{'mail'} =~ s/"/"/g; $FORM->{'mail'} =~ s/ <br> //g; $FORM->{'bbs'} =~ s/\|//g; $FORM->{'bbs'} =~ s/\\//g; $FORM->{'key'} =~ s/\|//g; $FORM->{'bbs'} =~ s/\.//g; $FORM->{'key'} =~ s/\.//g; $FORM->{'bbs'} =~ s/&//g; $FORM->{'key'} =~ s/&//g; $FORM->{'time'} =~ s/\D//g; $FORM->{'bbs'} =~ s#/##g; $FORM->{'key'} =~ s#/##g; $FORM->{'subject'} =~ s/&r//g; $FORM->{'FROM'} =~ s/&r//g; $FORM->{'mail'} =~ s/&r//g; } http://qb5.5ch.net/test/read.cgi/operate/1076666901/961
962: FOX ★ [] 04/12/02 18:18:47 ID:??? 勘違いしているかな? もう一回挑戦 http://qb5.5ch.net/test/read.cgi/operate/1076666901/962
963: FOX ★ [] 04/12/02 18:19:32 ID:??? >>961 どもども コピペさせてもらいます、 http://qb5.5ch.net/test/read.cgi/operate/1076666901/963
964: FOX ★ [] 04/12/02 18:21:55 ID:??? わーい うまくいった。 次へ行こう。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/964
965: ▲:/usr/local/bin/ch2 -o i686 ◆P8fXJj6wwo [] 04/12/02 18:22:08 ID:WBZMaSLu >>955 さすがにつらすぎるでしょう。 でも最終手段としての書き直しは軽く心に留め置いておいたほうがいいかもしれないと振ってみる http://qb5.5ch.net/test/read.cgi/operate/1076666901/965
966: FOX ★ [] 04/12/02 18:31:09 ID:??? sub bbs_main { use CGI::SpeedyCGI; my $sp = CGI::SpeedyCGI->new; my $spv = $sp->i_am_speedy ? 'yes' : 'no' ; $ENV{'TZ'} = "JST-9";#日本 #$ENV はそのまま使う my $GBX = {}; $GBX->{version} = "BBS.CGI - 2005 (SpeedyCGI = $spv)"; $GBX->{NOWTIME} = time;#現在時刻 $GBX->{PID} = $$;#pid $GBX->{FORM} = {};# &foxReadForm($GBX);#$FORM を読み込む require "./bbs-main.cgi"; &DispError2($GBX,"FOX ★","<font color=green>FOX ★ ふふふっ</font><br><br>これが表\示されるということは・・・<br>本体requireしたのにそっちへ行かないと、、、"); print "Content-type: text/html; charset=shift_jis\n\nWOWOWOWOWOW-----\n"; return; } http://qb5.5ch.net/test/read.cgi/operate/1076666901/966
967: FOX ★ [] 04/12/02 18:32:14 ID:??? require "./bbs-main.cgi"; で本体に処理を移そうとしたら・・・ 最初の起動時は本体へ行った しかーし、二回目以降はだめだった、、、 どうする? http://qb5.5ch.net/test/read.cgi/operate/1076666901/967
968: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 18:44:47 ID:WZTWIT/v >967 >951 http://qb5.5ch.net/test/read.cgi/operate/1076666901/968
969: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 18:46:08 ID:YeLg7Dw8 bbs-main.cgiの処理を関数に括りだしておいて その関数を陽に呼び出せばいいような。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/969
970: FOX ★ [] 04/12/02 18:49:18 ID:??? >>968 わたし・・・ 理解不能なんです >>969 そんなふうにしてみた sub bbs_honati { my ($GB) = @_; &DispError2($GBX,"FOX ★","<font color=green>FOX ★</font> いよいよ本体"); } 1; んで &bbs_honati ; で呼び出してみた。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/970
971: 風俗王 [非公開] 04/12/02 18:55:14 ID:lxr8SelU 今栃木県の宇都宮でトップのでりは？？？ http://qb5.5ch.net/test/read.cgi/operate/1076666901/971
972: [―{}@{}@{}-] j101097.ppp.asahi-net.or.jp [sage] 04/12/02 19:02:21 ID:yl4eb3hK ホストが違う・・・ ＥＲＲＯＲ：ユーザー設定が消失しています！ ホストU178***.ppp.dion.ne.jp 名前： E-mail： 内容： こちらでリロードしてください。 GO! 分からないことがあったら２ちゃんねるガイドへ。。。 アクセス規制・プロキシー制限等規制は、２ちゃんねるビューアを使うと回避できることがあります。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/972
973: U178142.ppp.dion.ne.jp [sage] 04/12/02 19:04:06 ID:YeLg7Dw8 あ、オレオレ。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/973
974: [―{}@{}@{}-] j101097.ppp.asahi-net.or.jp [sage] 04/12/02 19:06:38 ID:yl4eb3hK どうも前にエラーを出した人のを出してるような・・・ まあｺﾞﾆｮｺﾞﾆｮしてる途中だからかな http://qb5.5ch.net/test/read.cgi/operate/1076666901/974
975: 桃太郎 ★ [sage] 04/12/02 19:12:04 ID:??? 僕ちんは ＥＲＲＯＲ：サブジェクトが存在しません！だた。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/975
976: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:14:45 ID:XEy4KVeD 普通に書き込み画面からPOSTしてやる 結果：>>975 http://dso.2ch.net/test/bbs.cgiを直接開く 結果：>>972 http://qb5.5ch.net/test/read.cgi/operate/1076666901/976
977: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:15:50 ID:XEy4KVeD hostでなくなった（−−； http://qb5.5ch.net/test/read.cgi/operate/1076666901/977
978: FOX ★ [] 04/12/02 19:15:53 ID:??? いろいろやっているだす sub bbs_hontai { my ($GB) = @_; my $FORM = $GB->{FORM}; my $NOWTIME = $GB->{NOWTIME}; &DispError2($GB,"FOX ★","<font color=green>FOX ★</font> いよいよ本体($GB->{FORM}->{bbs} , $FORM{'bbs'})"); $FORM{なんたら} ってのが沢山あるんで my $FORM = $GB->{FORM}; と関数に入ったところで宣言してそのまま使おうと思ったんだが・・・ うまくいかんのだ どすればいいのだろう http://qb5.5ch.net/test/read.cgi/operate/1076666901/978
979: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:29:49 ID:X6CTMNgw my %FORM = $GB->{FORM}; とか？ といい加減に答えてみる http://qb5.5ch.net/test/read.cgi/operate/1076666901/979
980: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:30:03 ID:YeLg7Dw8 $GB->{FORM} は「ハッシュ」じゃなくて「ハッシュへの参照」なので $FORM{なんたら} を $FORM->{なんたら} に変えないとダメっす。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/980
981: FOX ★ [] 04/12/02 19:31:37 ID:??? >>979 やったけどだめだったっす、、 >>980 やっぱそうなんすか・・・ 死ぬほどあるんだよなぁ 一気に置き換えるのは恐いしなぁ http://qb5.5ch.net/test/read.cgi/operate/1076666901/981
982: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:36:35 ID:X6CTMNgw >>981 50%乙 FOX★氏はiijか・・・ ＥＲＲＯＲ：ユーザー設定が消失しています！ ホストh***.p***.iij4u.or.jp 名前： FOX ★ E-mail： 内容： ffffcce ffffcsvxxxxx fffff gggg hhhh http://qb5.5ch.net/test/read.cgi/operate/1076666901/982
983: FOX ★ [] 04/12/02 19:37:21 ID:??? ぐおっ こわっ http://qb5.5ch.net/test/read.cgi/operate/1076666901/983
984: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:39:23 ID:WC2kwP6B my %FORM = %{$GB->{FORM}}; # として # ここで$FORM{hoge}に対してごにょぎょんして %{$GB->{FORM}} = %FORM; # として返すとか？ http://qb5.5ch.net/test/read.cgi/operate/1076666901/984
985: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:39:26 ID:YeLg7Dw8 難産ですねー……。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/985
986: FOX ★ [] 04/12/02 19:40:12 ID:??? あなたはリロードスレッドが大好きです http://dso.2ch.net/test/read.cgi/myanmar/1101913871/ かけたぞっ http://qb5.5ch.net/test/read.cgi/operate/1076666901/986
987: FOX ★ [] 04/12/02 19:40:50 ID:??? >>984 一気に置換しちまったです http://qb5.5ch.net/test/read.cgi/operate/1076666901/987
988: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:42:22 ID:X6CTMNgw かけた〜〜 乙乙 http://qb5.5ch.net/test/read.cgi/operate/1076666901/988
989: FOX ★ [] 04/12/02 19:44:58 ID:??? しかーし 結局 ホスト情報やらhtml名やらは元々グローバルだったから ちゃんと $GB に入れてやら無いとまずいという話しかな、 結構大変そうだ、 まずは HOST 関係だけやってみよう。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/989
990: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:45:39 ID:aKb2TILl 次スレ！次スレ！ http://qb5.5ch.net/test/read.cgi/operate/1076666901/990
991: 桃太郎 ★ [sage] 04/12/02 19:49:18 ID:??? ＞990 じゃああたすが代表して立てましょ http://qb5.5ch.net/test/read.cgi/operate/1076666901/991
992: 桃太郎 ★ [sage] 04/12/02 19:54:01 ID:??? 次スレ http://qb5.2ch.net/test/read.cgi/operate/1101984763/l50 http://qb5.5ch.net/test/read.cgi/operate/1076666901/992
993: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:55:03 ID:X6CTMNgw >>992 モツカレー http://qb5.5ch.net/test/read.cgi/operate/1076666901/993
994: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 19:59:41 ID:NQYkKTg/ おお、なんか面白い状況 http://qb5.5ch.net/test/read.cgi/operate/1076666901/994
995: FOX ★ [] 04/12/02 20:00:41 ID:??? たたけ たたけ たたけ〜♪ http://qb5.5ch.net/test/read.cgi/operate/1076666901/995
996: ヾ（ﾟﾊﾟ）ﾉ ◆f0.zuburi6 [sage] 04/12/02 20:02:37 ID:bBxy901j おいらにゃー 狐のー 血がー さわーぐー http://qb5.5ch.net/test/read.cgi/operate/1076666901/996
997: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 20:03:16 ID:X6CTMNgw ・●はまだかな ・本文梨でも書き込める ・IDが??? がんばれ〜〜 http://qb5.5ch.net/test/read.cgi/operate/1076666901/997
998: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 20:03:57 ID:NQYkKTg/ るーるるーるるるる http://qb5.5ch.net/test/read.cgi/operate/1076666901/998
999: ヾ（ﾟﾊﾟ）ﾉ ◆f0.zuburi6 [sage] 04/12/02 20:04:34 ID:bBxy901j 1000(^_^;) http://qb5.5ch.net/test/read.cgi/operate/1076666901/999
1000: 動け動けウゴウゴ２ちゃんねる [sage] 04/12/02 20:05:16 ID:X6CTMNgw ﾜﾛﾀ どのような形の削除依頼であれ公開させていただきます ２ちゃんねる(+Samba) アニメ | CM | ゲーム | 映画 | 音楽 | テレビ | 日記(+Samba) アニメ | CM | ゲーム | 映画 | 音楽 | テレビ | http://qb5.5ch.net/test/read.cgi/operate/1076666901/1000
1001: １００１ [] Over 1000 Thread このスレッドは１０００を超えました。 もう書けないので、新しいスレッドを立ててくださいです。。。 http://qb5.5ch.net/test/read.cgi/operate/1076666901/1001
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.013s