★三 【 スクリプト改造工房 PART 9 】 ★三
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
2006/03/32(土) 04:52:20ID:WJnup8Dd# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
0455nobodyさん
2009/04/29(水) 22:46:53ID:???0456447
2009/04/29(水) 23:30:00ID:???ローカル変数にはmyつけるってperlのサイトに出てましたが…違うんですかorz
>>454の方法を試すと
あめ、山、海の順で登録すると海を追加した後に山が消え、あめがあ行の前に移動して
海があ行先頭にきてしまいました。
どうもchomp命令で改行外すと、索引ファイルが改行なしになって表示が狂うようです。
>>454のmy $varをやめてchomp( @index)としても同様の結果に。
改行を外すのではなく見ないようにする方がいいんでしょうか。（末尾無視するとか）
0457nobodyさん
2009/04/30(木) 00:25:58ID:???うーん、思ったよりおまいさんのperl知識が乏し過ぎてちょと話がしにくいな。
判定方法は>>454のでいいはずだけど、他にもいじっちゃったでしょ。そこがたぶん全然合って無い。
頑張る気持ちは大切にしてあげたいけど、先にもう少しperlの勉強しないと厳しいかも。
急ぎなら丸投げおいで。
0458447
2009/04/30(木) 21:19:55ID:???付け焼刃の知識じゃどうにもなんないみたいだし…。
とはいえ自分で中身わかってないと、何かあっても対処できないし
急ぎでもないので丸投げ依頼も今はやめておきます。
ありがとうございます。
0459nobodyさん
2009/05/11(月) 18:46:32ID:???0460nobodyさん
2009/05/11(月) 19:31:18ID:???0461nobodyさん
2009/05/11(月) 20:50:00ID:???0462nobodyさん
2009/05/16(土) 15:01:23ID:???なんで動かないのだろう・・・？
0463nobodyさん
2009/05/21(木) 07:04:12ID:5BoMPyL5【配布先URL】 http://www.chama.ne.jp/index.htm
【. 置き場所 .】 http://www.chama.ne.jp/download/bbs/iimgbbs/index.htm
【ヘルプ内容】 強制ID表示 ２ちゃんねると同じトリップ利用可
まだ勉強し始めの超初心者です
よろしくお願いします。
0464nobodyさん
2009/05/21(木) 07:35:18ID:???どこまでやってどこでつっかえてるんだ？
0465643
2009/05/21(木) 20:45:43ID:???参考になるようなサイトを紹介してもらえればと思ったのですが、丸投げスレの方が妥当なのでそちらに行ってみます。
0466nobodyさん
2009/05/26(火) 00:43:47ID:hNbwwEvZ【配布先URL】 ttp://plus-code.net/cgi-flash-counter/accesscounter01/
【ヘルプ内容】
このCGIは、flashでカウンターを表示しているのですが、
カウンターをクリックすると、配布URLのトップページに飛ぶようになっています。
flash(swf)自体にリンクが設定されているのですが、なんとかこれを無効にする
方法はないでしょうか？
リンクの無効が無理なら、リンクが同窓で開くため、最低限別窓で開くようにしたいです。
タグでa hrefのtargetを指定してもNGでした。
0468nobodyさん
2009/06/05(金) 17:00:12ID:???【配布先URL】 現在配布先は閉鎖しているようです
【. 置き場所 .】 ttp://www.kent-web.com/pubc/book/test/uploader/uploader.cgi
pass 3210
【ヘルプ内容】 このメールフォームcgiに日本語が含まれない場合の送信を防ぐ
機能を付けたいのですが、どうしても自分では無理です。
どうかよろしくお願いします。
0469468
2009/06/05(金) 17:12:47ID:???0470nobodyさん
2009/06/05(金) 17:21:31ID:???0471470
2009/06/05(金) 17:35:10ID:???やり易い
0472468
2009/06/05(金) 19:39:42ID:???<textarea name="message" cols="20" rows="5" ></textarea>
<br>
<input name="submit" type="submit" value=" 送 信 " id="sousin"/>
</form>
htmにはこのように記述しています
>>470
自分でカスタマイズするうちにおかしくいじってしまったのかもしれません、
どこの部分を閉じていないかもわかっていないのですがご指摘ありがとうございます
0473468
2009/06/05(金) 19:43:34ID:???ここを参考にして
if ($in{'comment'} !~ /(\x82[\x9F-\xF2])|(\x83[\x40-\x96])/) {
&error("日本語を書いてください。");
}
を付け加えようとしたのですが、日本語の文を投稿してもエラーになってしまいました。
根本的な所がわかっていないようです
0474470
2009/06/05(金) 20:06:16ID:???$in{'comment'}を$in{'message'}にすればいい。あと、荒らしに対してエラー文で"日本語を書いてください。"ってヒント与えるのはいただけない
if ($in{'message'}!~/(?:[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]|[\xA1-\xDF]){2}/){ &error("Busy now!"); }
0475nobodyさん
2009/06/05(金) 22:01:44ID:???回答ありがとうございます。
早速150行目に上記の文を書き加えると、思った通りの動作をしてくれました。
一日中考えて調べてわからなかったので本当に感謝です。
神様（∩´∀｀）∩
0476475
2009/06/08(月) 19:03:02ID:???近所の書店には自分に合いそうなものがありません。
御薦めの本を知っている方いますか？
スレ違いすみません
0477nobodyさん
2009/06/08(月) 21:02:02ID:???0479nobodyさん
2009/06/13(土) 16:33:54ID:FybrAREw【配布先URL】 http://www.kent-web.com/
【ヘルプ内容】
sub add {
&header;
print <<"HTML";
<html>
<body>
<form method="post" action="./petit.cgi">
名前：<input type="text" name="sname" size="20" maxlength="8"><br>
<input type="submit" value="投稿する">
</form>
</body>
</html>
HTML
exit;
}
こんなサブルーチンを作る。
petit.cgi?mode=add
で呼び出したフォームから、書き込みが出来るようにしたい。
投稿内容がメチャクチャ多くなる予定なので、別ページでフォームを作りたいのです。
0480nobodyさん
2009/06/13(土) 17:07:25ID:???プログラムにする必要すらなく、そのHTMLソースを丸ごとHTMLとして保存して設置すれば、とりあえず投稿はできるはず。
あとはCGIのほうからフォームを書き出してる箇所を削ってリンクでも置いておけばいい。
0481nobodyさん
2009/06/13(土) 17:35:09ID:???これをやって思い出したのですが、投稿項目を凄く(少なくとも30個以上)にしたいのです。
たとえば、初期状態だと
・お名前
・Eメール
・タイトル
・コメント
・URL
ですよね。
たとえば、これに新しく
・出身地
という項目を追加するとして、フォームを書きます。
name属性をsyussinとします。
これをスクリプトのどの辺にスカラー変数として追加したら出来るのか？がわからないのです。
どうやらログファイルに追加はできたようなのですが、掲示板上には表示がされていません。。。
0483nobodyさん
2009/06/13(土) 18:20:46ID:FybrAREwオリジナルでは364行目の
($no,$reno,$date,$name,$mail,$sub,$comment,$url,$host,$pw,$color)
を、〜$color,$syussin)
と追加。
397行目の
print "<blockquote><font color=\"$color\">$comment</font></blockquote>\n";
を、〜$comment,$syussin</font></blockquote>\n";
と追加。
517行目の
unshift(@new,"$no<><>$date<>$in{'name'}<>$in{'email'}<>$in{'sub'}<>$in{'comment'}<>$in{'url'}<>$host<>$ango<>$in{'color'}<>$in{'icon'}<>\n");
を、〜$in{'comment'}<>$in{'syussin'}<>〜
と追加しています。
私の頭以外ではどこが抜けているのでしょうか？
0484nobodyさん
2009/06/13(土) 18:23:37ID:???すみません、あくまでも例えでして。
アンケートではなくて、レスのできる掲示板で作る必要があるのです。
昔はとあるゲストブックで項目を追加したりしていたので、簡単にできるかな？と思ったのですが、難しいですね。
0485nobodyさん
2009/06/13(土) 18:31:26ID:???考え方はそれで合ってるし、実際いま俺がやってみてもそれで普通に表示されてる。
本当にログファイルに追加できてる？
「どうやら」とかじゃなくてちゃんと確かめた？
0486nobodyさん
2009/06/13(土) 19:02:09ID:???たびたびすみません。
ログファイルを覗くと、出身地に入れたはずの「地球」が残っているので、
ログへの書き込みはできていると判断しています。
しかし、コメントのすぐ右に表示されるはずの「地球」の文字はないです。
http://www1.axfc.net/uploader/Sc/so/8786.zip
せっかくなので、うｐってみました。
どこを間違えているのでしょうか？
0487nobodyさん
2009/06/13(土) 19:19:11ID:???0488nobodyさん
2009/06/13(土) 19:31:38ID:???一回吊ってから目的のスクリプト作成にむけてがんばります！
ありがとうございました！
0489nobodyさん
2009/06/18(木) 03:54:24ID:O7fG+jDb【配布先URL】 http://idol.nm.land.to/
【ヘルプ内容】 アップロードフォームの編集&削除パスをクッキーで記憶させたい
どうぞよろしくお願いします<m(__)m>
0491489
2009/06/18(木) 14:13:06ID:???0492nobodyさん
2009/06/18(木) 15:28:25ID:???0493489
2009/06/18(木) 16:05:19ID:???分かる方いらっしゃいましたらどうぞよろしくお願いします<m(__)m>
0494nobodyさん
2009/06/18(木) 16:21:56ID:???0495nobodyさん
2009/06/18(木) 17:11:51ID:???setcookie("pass", $_POST['pass'], time()+60*60*24*30 );
setcookie("downpass", $_POST['downpass'], time()+60*60*24*30 );
0497ぶぅ子 ◆0cRRT9dSGg
2009/08/16(日) 01:42:29ID:M5z+7f3F【スクリプト改造依頼スレ】（丸投げ）part7再々で投稿したら、
こちらへ誘導されたので投稿します。
よろしくお願いします。
【 CGI&PHP名 】 余裕派掲示板ver2.62
【 配布先URL 】 http://cgipon.specters.net/
【 ヘルプ内容 】 WAP2.0対応にしたいです。
お世話になっているお店のサイトの掲示板で運用されているのですが、
配布されている状態のままだと、auの携帯からの表示、投稿が出来ません。
実際にサイトを作成した人は消息不明で困っている店主さんから相談を受けました。
現状はgoogleなどで検索をし、
USER_AGENTの記述を変更すれば良いのかと認識していたのですが、
やっぱりこれだけでは足りないのでしょうか？
例えば[yoyuuha.cgi]を開き、
$mob{car} = 'UP.BROWSER';
の部分を
$mob{car} =~ m/^KDDI/
に変更という具合に。
本を読んだり、ネット検索などをしていますが自分の理解が追いつかない状態です。
すみませんがよろしくお願いします。
0498nobodyさん
2009/08/16(日) 02:24:46ID:???流石に他人のためにパケ代使って確認する気にはなれないぜ？
0499nobodyさん
2009/08/16(日) 02:34:24ID:???というかできないならできないってちゃんと言った方が良いんじゃないのか？
今後ことあるごとに頼まれるパターンだぞそれ。その度にここ来るのかよ。
0500ぶぅ子 ◆0cRRT9dSGg
2009/08/16(日) 22:44:37ID:M5z+7f3F>498
失礼しました。肝心の結果ですが、497に書いた内容を試した所、
auの携帯（W63K）では既に投稿されている内容の閲覧だけは
出来るようになってます。
でも、他キャリアの携帯でアクセスした時のように
投稿フォームやボタンなどの表示は無く、ただテキスト表示のみです。
>499
相談を受けた段階では、出来るor出来ないの即答はしませんでした。
本やネットで調べて出来そうなら試してみます、という返答のみです。
今回の相談内容だと有料でプロの方にお願いするような内容となるのでしょうか？
他のスクリプトへ変更するように提案した方が良いのかなぁ。
0501nobodyさん
2009/08/17(月) 07:01:39ID:???プロに依頼するレベルかどうかはともかく、あんたが出来ないんだから
まずはその事を伝えるべきだろう。
他の物に変えるか、金払って対応するかどうかを決めるのはその店主とやらの仕事。
0502nobodyさん
2009/09/18(金) 21:50:14ID:???get-flash-videos -Google Code
http://code.google.com/p/get-flash-videos/
数々の動画サイトからコマンドラインで動画を取得するツールなのですが、
ニコニコ動画にてダウンロードするファイルが恐らくswfだった場合、下記エラーメッセージが表示されダウンロードに失敗します。
--------------------------
Using method 'nicovideo' for http://www.nicovideo.jp/watch/nm7382869
Error: No ID found
Couldn't extract Flash movie URL. This site may need specific support adding,or fixing.
--------------------------
Perlが大好きで勉強しつつ、swf対応にしようと書き換えているのですが上手く行きませんorz
どなたかswf対応に書き換えた後のdiff結果を頂けないでしょうか…
よろしくお願い致します。
0504nobodyさん
2009/09/19(土) 00:47:27ID:???0508nobodyさん
2009/09/27(日) 13:11:10ID:???もう見てないかもしれんし, 板違いかもしれんけど, ソース見るついでに
弄ったら一応落ちてきたので, せっかくだから貼っておきます.
indent の空白が全角になるかもしれんから, 適当に手パッチした方が無難かも.
1番目のは smXXX 以外を弾く仕様になってたので, nmXXX も許すようにしただけ.
2番目のは問答無用で suffix が flv になるのようなので, 動画形式に合わせた
suffix にするようにした. なくても nmXXX は落ちてくる.
3番目のは取得したデータが動画かどうかチェックするルーチンが swf に
対応してないようなので対応させた. 先頭 3bytes が "CWS" らしいが,
いい加減に調べただけなので, なんかあっても知らんがな.
0509508
2009/09/27(日) 13:13:22ID:???+++ get_flash_videos-1.15 2009-09-27 13:12:42.000000000 +0900
@@ -2010,7 +2010,7 @@ use URI::Escape;
sub find_video {
my ($self, $browser, $embed_url) = @_;
- my $id = ($embed_url =~ /(sm\d+)/)[0];
+ my $id = ($embed_url =~ /([sn]m\d+)/)[0];
die "No ID found\n" unless $id;
my $base = "http://ext.nicovideo.jp/thumb_watch/$id";
@@ -2029,7 +2029,9 @@ sub find_video {
$browser->get($base . "/$playkey");
my $url = uri_unescape(($browser->content =~ /url=([^&]+)/)[0]);
- return $url, title_to_filename($title);
+ $url =~ m{/smile\?(.)=} or die;
+ my $type = { qw( v flv m mp4 s swf ) }->{$1} or die;
+ return $url, title_to_filename($title, $type);
}
1;
@@ -3318,6 +3320,9 @@ sub check_magic {
# Other QuickTime
} elsif(substr($data, 4, 4) eq 'moov' || substr($data, 4, 4) eq 'mdat') {
return 1;
+ # SWF
+ } elsif(substr($data, 0, 3) eq 'CWS') {
+ return 1;
}
return 0;
0510502
2009/09/27(日) 17:37:37ID:???ありがとうございます！
実は毎日見てたよこのスレ…
ずっと色々試してたけど上手く行かなかった…
助かりました。本当にありがとう！
0511nobodyさん
2009/09/30(水) 22:50:07ID:???【配布先URL】 http://www.din.or.jp/~raelian/ReadMeNicky.html
【 ヘルプ内容 】
コメントに、スパム フィルターがついているみたいなんですが、
オフにしたいのですけど、どうしたらいいでしょうか？
一人で日記に使うので、誰か他の人が書き込むことはないので。
よろしくお願いします。
0512nobodyさん
2009/10/07(水) 09:41:18ID:???スパムフィルタっつーか「日本語が入ってないとスパム扱い」の処理なら入ってるけどそれのこと？
だったら2717行目をコメントアウト。
0513nobodyさん
2009/10/09(金) 07:07:29ID:???0514nobodyさん
2009/10/09(金) 11:24:14ID:???0515CUCYMNzIrxbzJeUL
2009/10/22(木) 23:25:26ID:???0516dLYuGbiTKgcOt
2009/10/23(金) 21:29:22ID:???0517nobodyさん
2009/10/24(土) 22:30:25ID:???【配布先URL】 http://www.gnbnet.com/cgi/?mode=dojin
【ヘルプ内容】
在庫が一定以下で販売中というアイコンを残部少のアイコンに、
また、在庫が0になったら完売のアイコンという風に自動変更できるようにしたいです。
一つ前のバージョンでは
http://www.gnbnet.com/bbs/index.cgi?mode=view&seq=521
のようにアイコンを自動変更するようにできるみたいなんですが、
最新のVersion 6.91で試したところ、できませんでした。
どうかよろしくお願いします。
0518nobodyさん
2009/11/03(火) 17:26:39ID:???0519nobodyさん
2009/11/05(木) 12:38:44ID:???（テンプレは配布先のサンプル版と同じ「city」です）
【配布先URL】 ://www.w-art.org/
【ヘルプ内容】 index頁の右側に表示されるカテゴリ＞サブカテゴリ一覧部分で
サブカテゴリを横２列から横３列表示にしたいです。
（cssのほうは横３列表示が可能なサイズに変更済み）
製作者の方にメルフォから問い合わせたのですが
いつになっても返事を貰えずに困り果ててます・・・・・。
よろしくお願いします。
あと。よければこれで間違ってないかチェックしていただきたいのですが。
top.htmlの右側、カテゴリの上に通常表示される
「マーク＞おすすめサイト・相互リンクサイト」がいらなかったので
top.htmlのソースの６３行目を
local($i=0,$Gno,$gane_flag,$st_flag=0,$bf_kt_no,$gane_NOT,%gNot,$gn_list,$Ncb,$mk);
↓
local($i=0,$Gno,$gane_flag,$st_flag=0,$bf_kt_no,$gane_NOT,%gNot,$gn_list,$Ncb);
上記から下のように改変、本来６４行目から７３行目にあるソースを削除しました。
今のところ希望通り「マーク＞〜」の表示がtopから消え、不具合もないのですが
スクリプト改造として、これで間違ってないですか？
0520nobodyさん
2009/11/06(金) 12:50:52ID:???そら「カスタマイズの問い合わせするな」という所に改造の問い合わせしたんだから
返事こなくて当たり前だろ。作者さんのせいにするもんじゃないよ。
0521nobodyさん
2009/11/06(金) 14:28:03ID:???修正前のver２．０だと、top.htrml頁のソースの一番上に
--------------------------------------------
#↓設定↓
#カテゴリ・テーブル横のセル数
$table = '2';
#サブカテゴリを横に並べる数
$subcat = '2';
#↑ここまで↑
--------------------------------------------
と書いてあったんです。
なので値をどちらも'3'に変えたんですが、表示は相変わらず２列だったので
製作者へ問い合わせたら
しばらくして、top.htrmlなどを修正したver２．０1の配布がはじまり
上記の設定項目が削られてしまってたんですけど・・・・。
あと、記憶違いでなければ
私が問いあわせたときに、あの注意書きはなかったと思うんです。
・・・・・・・・私のせいだろうな、注意書き足されたの。
猛省してきます。
0523nobodyさん
2009/11/12(木) 08:59:59ID:???【配布先URL】http://cgi.toshinari.net/wiki.cgi
【ヘルプ内容】
IEでは名前を打ち込んだ場合、ちゃんと記憶されて入力された状態なのですが
firefox等では名前を入力しても記憶されません。
これをfirefoxでも入力された状態になるように改造の方をお願いします。
0524nobodyさん
2009/11/12(木) 15:01:07ID:???0526nobodyさん
2009/11/12(木) 17:30:38ID:???0528nobodyさん
2009/11/12(木) 17:38:22ID:???0529nobodyさん
2009/11/12(木) 17:43:21ID:???FireFoxというのは例で上げています。
operaでも同じ現象です。
ブラウザが悪いとは思えません。
どうやらクッキーはちゃんと取得してるようですが、ちゃんと名前欄に表示されないみたいです。
0530nobodyさん
2009/11/12(木) 18:50:30ID:???スクリプト側の問題ではないんでない？名前を代入してHTMLを返してるだけなんだから
0532nobodyさん
2009/11/12(木) 19:07:19ID:???0534nobodyさん
2009/11/12(木) 20:41:41ID:???bbs.cgiのSetCookieサブルーチン内のクッキー発行文の、path=/の後にセミコロンを付ければおｋ
ちなみに2つ発行してる意味は分からん
0535nobodyさん
2009/11/12(木) 20:50:57ID:???おぉ！ありがとうございます。
ちゃんと表示されるようになりました！
ですが日本語名だと文字化けしますね；；
エンコードに問題があるのかな・・・
0536nobodyさん
2009/11/12(木) 21:51:51ID:???escapeかけるといいらしい
0537nobodyさん
2009/11/14(土) 21:59:33ID:???自分なりにググったりして調べてやってみましたができませんでした；；
bbs.cgiのクッキー発行の部分にescapeをかけて、makeindex.plのクッキーを読み込むところにunescapeを使うんですよね・・・
0538nobodyさん
2009/11/16(月) 11:35:54ID:???makeindex.plで生成されて当該ディレクトリに置かれるindex.htmlってことはおｋ？
0540わ
2009/11/26(木) 17:55:54ID:???よろしくお願いします。無料です。 http://pokpok.org/
0541nobodyさん
2009/12/06(日) 00:20:27ID:???【配布先URL】 http://wap2.jp/download/spict/
【ヘルプ内容】 ・PC、携帯表示共にアイコン式に改造したい
・アイコンの表示箇所はタイトルの前。レス番号の位置に表示させたい
以上です。できれば、よろしくお願いいたします。
0542nobodyさん
2009/12/10(木) 01:16:42ID:NJF5r4ib【. 置き場所 .】 http://www.big.or.jp/~talk/t-club/soft/mini_r6/index.cgi
【ヘルプ内容】 トリップを実装したいのです。実際にトリップを使える
CGIから移植を試みたりしているのですが、中々うまく行きません。
方法をご存知の方いらっしゃいましたらよろしくお願いします。
0543nobodyさん
2009/12/10(木) 01:31:32ID:???0544nobodyさん
2009/12/10(木) 01:56:31ID:NJF5r4ibimgboard トリップ 実装 追加 など、あらゆる単語の組み合わせで
検索をかけましたが、紹介はあるもののすでにデッドリンクだったりして
まともにはHITしませんでした。何が足りないのでしょうか？
0545nobodyさん
2009/12/10(木) 01:59:34ID:???ここを詳しく書かないとアドバイスのしようがないのだが。
perlがわからんとかいうレベルなら丸投げ行けとしか言えん。
0546nobodyさん
2009/12/10(木) 02:08:01ID:NJF5r4ibわかりました。ありがとうございました。
0547nobodyさん
2009/12/13(日) 07:01:48ID:NqNR44Mcその節はお世話になりました。ご紹介の通り丸投げへ行きましたがダメでした。
>>ここを詳しく書かないとアドバイスのしようがない
imgboardではない別のCGIですと、いくつかの実装例がありましたので、
それを見ながら似たようなことをやっていましたが、
トリップが表示されないか、掲示板そのものが表示されないかのどちらかでした。
「perl」・「初心者」で検索をかけ、あらゆるサイトを見てまわりましたが、
むずかしいですね。「習うより慣れろ」じゃありませんが、本を読むより
実際にスクリプトをいじらないと理解しにくいのかもしれません。
私としては、「このソースをimgboardのココに貼り付けて、後、ココとココと
ココをこのように書き直せ」みたいなレスを期待していたのですが、
どうやらそんな単純なモノではないようですね。
もっとよく勉強して改めて出直します。スレ汚し失礼しました。
0548545
2009/12/13(日) 09:46:05ID:???お前な・・・ダメも何もテンプレすら読まん（と判断された）ヤツが相手にされるわけ無いだろ。
つか期待する内容があるなら最初からそう書けよ。回りくどいことして自滅してどうする。
0549nobodyさん
2010/01/01(金) 18:29:16ID:???既成のCGIの改造でいくらやってもうまくいかなくて困りきっています。
板違いでしたらもうしわけありません（探してみましたがCGI改造板は2001年の代物でした）
いくら改造してもエラーばかりでもう2日悩んでいます。
改造したいものはテルラさんという方のCGI解説の古い本を入手してCGIの勉強を始めました。
昔はサポート掲示板などもあったらしいのですけど今はいくら探してもサポートがありません。
質問もできません。ほんとうにここしか質問ができる場所がなくてもう困っています。
もともとのCGIは
ttp://cgicgi.webdeki-hp.com/1.htm
です。 これを改造したいのです。
したいこと
1 このスクリプトはリロードするたびに（ブラウザで更新を押すたびに）なぜかどんどん
その直前に書き込んだ文章が繰り返してどんどん書き込まれて行きます。
更新ボタンを押してもページの更新を（リフレッシュを）するだけにして、勝手にどんどんその直前の
書き込みが繰り返して書き込まれていくのを辞めたいです。
2 もうひとつは書き込んだ人の名前の下に書き込み者のＩＰやブラウザ名を表示させたい
です。 サンプルは
ttp://cgicgi.webdeki-hp.com/2.htm
です。 この二つ目を改造して使えばいいではないかといわれそうですが、ひとつめの
デザインが好きなのでなんとか一つ目のデザインのまま、2.htmのスクリプトでの書き込み
表示のようになるようにしたいと思っています。
もうこれでまるまる3日目です。完全にわからなくなって発狂寸前です。
板違いかもしれないのですけど、ほんとうに助けてください。
なお、1.htmと2.htmは解決し次第、きちんと削除します。
すみません。ほんとうに助けてください。
(他のKentさんとかのCGIを使え､というレスはなしでお願いします)
0550nobodyさん
2010/01/01(金) 18:30:46ID:???やってみたこと。
ブラウザ名とIPの表示に関しては
&cookie_read;
$agentsoft = $ENV{'HTTP_USER_AGENT'};
$agentsoft =~ s/,/./g;
$hosei = 1;
if ($agentsoft =~ /Mozilla\/4/i && $agentsoft !~ /compatible/i) { $hosei = 0.8; }
$textwidth = 80;
if ($agentsoft =~ /MSIE 3/i) { $textwidth = $textwidth * 1.5; }
および
print "<br><font size=2>$agent</font>";
if ($returnmail eq 'checked') {
print "<input type=hidden name=returntoemail value=$email>\n";
}
を1に移植して1の$date\,などのところに関連すると思われる$agentsoftを追加したりしてみました。
でもエラーばかりでどうしてもうまくいきませんでした。 すみません。 お手上げで困ってます。
お年玉代わりにいろいろとご教唆いただけたらほんとうに嬉しいです。
0552nobodyさん
2010/01/01(金) 21:22:20ID:???お前さぁ、俺「それぞれのスレの>>1読め」って言ったよね？ 読んでないよね？
人の話し聞かないやつに回答する人はいないよ。もう消え失せろ！
0553nobodyさん
2010/01/01(金) 21:33:54ID:???perl初心者なら丸投げいったほうが早いかもねー
0554nobodyさん
2010/01/01(金) 21:58:49ID:???■ このスレッドは過去ログ倉庫に格納されています