★三　【 スクリプト改造工房 PART 9 】　★三

1 名前：nobodyさん [2006/03/32(土) 04:52:20 ID:WJnup8Dd] #================================ # スレッドの説明 #================================ 「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。 質問するときは以下の点に注意して書いて下さい (1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い) (2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し) (3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い ※答えてくれないからといって逆ギレする厨はお断り 297 名前：nobodyさん mailto:sage [2008/03/03(月) 18:28:58 ID:???] それ本当に自分で作ったの？ 298 名前：nobodyさん [2008/03/03(月) 21:58:38 ID:ztXniNQN] >>297 色んなサイトを参考にして作りました。 299 名前：nobodyさん [2008/03/04(火) 23:01:12 ID:8AwOHZTZ] 【 CGI&PHP名 】 簡易コメント　ver1.0 【 配布先URL 】 nurupo.biz 【 依頼期限 】　１週間以内 【 依頼内容 】 >>1みたいにアンカー機能を付けて頂きたいです 75行目 my $max = @DATA; 76行目 my $res_no = undef; 96行目と97行目の間に追加 $res_no = $max - $i + 1; 97行目　print "[$date] $res_no. $text\n"; を追加でレス番号が付くのはわかったんですけど 正規表現が分からないので、調べられません(ToT) 300 名前：nobodyさん mailto:sage [2008/03/04(火) 23:10:44 ID:???] 正規表現のどの辺が分からんって？ 301 名前：nobodyさん mailto:sage [2008/03/05(水) 06:31:08 ID:???] >>294 日本語で失礼。 投稿内容をログファイルに書く前に、直前のログを取り出す。 そのログにある数字を取り出して、+１したものを最新記事のナンバーとする そのナンバー+投稿内容としてログファイルに追記 ただの更新履歴ならコレで問題ない・・・・と思う コードはあなた以上の初心者なので勘弁。 302 名前：nobodyさん [2008/03/05(水) 20:35:19 ID:Wm0WO3jS] >>300 アンカーの構造から分かりません(∋_∈) 303 名前：nobodyさん mailto:sage [2008/03/05(水) 22:26:38 ID:???] どこまでは考えた？ 304 名前：nobodyさん [2008/03/06(木) 00:39:31 ID:UOTbbi+N] えっと、全然発想すら分からないので >>数字 @DATA[数字] それでｻﾌﾞﾙｰﾁﾝで取り出して表記する？という事だけです･･･ 305 名前：292 mailto:sage [2008/03/10(月) 06:53:01 ID:???] >>293 お礼が遅くなってしまいすみません。 方法がさっぱりだったのでぐだぐだになってしまってました。 お答えくださりありがとうございました。 306 名前：nobodyさん mailto:sage [2008/03/16(日) 17:23:34 ID:???] ari-sin3.hp.infoseek.co.jp/arisin5.html このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので ここで質問させてもらいます。 ・一日にアップロード可能な容量を制限したい。 ・日付や件数で削除するのではなく設定した日付を 　オーバーしたらファイルを削除するようにしたい。 この二つです。 307 名前：訂正 mailto:sage [2008/03/16(日) 17:26:49 ID:???] ari-sin3.hp.infoseek.co.jp/arisin5.html このアップローダを以下の様に改造したいのですがサイト等を参考にしてもよくわからなかったので ここで質問させてもらいます。 ・一日にアップロード可能な容量を制限したい ・指定した容量になると古いファイルから削除 308 名前：nobodyさん [2008/04/14(月) 00:14:52 ID:sAfeJoyW] 【.　 CGI名 　.】　p++BBS 2006/03/02版　　【配布先URL】　php.s3.to/ 【ヘルプ内容】www.cj-c.com/にあるChildTreeと同様の記事リストで、レスの更新時間を読んでUP!と表示させたいです。 自作の下記の処理だと親記事の更新時間しか読めてないため、レスがついてもNew!表示時間が延長されません。 レスの更新時間も読みにいく処理がうまく書けませんでした。お助け頂けたら嬉しいです。 素人のクソな処理なので効率化の突っ込みも大歓迎です。よろしくお願いします。 改行が多いと怒られたのでまとめてます… function Kijilist(){ global $SCRIPT_NAME,$log; array_shift($log); //要素1個目に非ログがあるので削除 foreach($log as $l){ list($ano,$no,) = split(',',$l); $carray[] = $no; } $cdata = array_count_values($carray); /*要素数数えて格納*/ $tim = time(); $tgcnt = 0; /*別機能用*/ $page = $_GET['page']; /*別機能用*/ foreach($cdata as $key=>$val){ foreach($log as $l){ list($ano,$no,$res,$now,$name,$email,$sub,$com,$url,$ho,,$pco,$pk,$cnt,$uid) =split(',',$l); if($res==0 && $no == $key) { $val = $val-1;//親記事もカウントしてたのを除外 if($tim-$pk<NEWTIME * 3600) { //NEWTIMEを宣言しないとエラー if($page <= 0 && $tgcnt<PAGEVIEW){ //PAGEVIEWを宣言しないとエラー echo "<a href=\"#$no\">".NEWIMG."{$sub}($val)</a> | ";$tgcnt++; //NEWIMGを宣言しないとエラー } else { echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">".NEWIMG."{$sub}($val)</a> | ";$page--; } } else { if($page <= 0 && $tgcnt<PAGEVIEW){ echo "<a href=\"#$no\">$sub($val)</a> | ";$tgcnt++; } else { echo "<a href=\"$SCRIPT_NAME?mode=all&no=$no\">$sub($val)</a> | ";$page--; }}}}}} 309 名前：308 mailto:sage [2008/04/14(月) 12:41:15 ID:???] クソな処理なのは変わりませんが、自己解決できました。 310 名前：nobodyさん mailto:sage [2008/04/24(木) 21:25:50 ID:???] 【.　 CGI名 　.】　UpdaterRSS 【配布先URL】　php.s3.to/simple/ 【. 置き場所 .】　php.s3.to/simple/source.php?updaterss.php 【ヘルプ内容】　ping送信機能を組み込みたい。 よろしくお願いします。 311 名前：nobodyさん mailto:sage [2008/05/02(金) 23:36:35 ID:???] 【.　 CGI名 　.】　Miniりすと 【配布先URL】　www.minicgi.net/ 【. 置き場所 .】　www.minicgi.net/cgi2/list.html （サンプルあり） 【ヘルプ内容】 新規登録/編集でcheckbox（inputタグ）を使えるようにして、複数の項目を選択できるようにしたい IDにカテゴリ付けをして、カテゴリ別に表示したい（だけど全表示してくれるページもあると有り難い） この二つの機能を使えるようにしたいんですが どうにもチンプンカンプンで自力では難しいので投稿しました 知恵をお貸しください。よろしくお願いします 312 名前：nobodyさん mailto:sage [2008/05/08(木) 10:00:49 ID:???] 【CGI名】　スレッド天国 ver.1.10 【配布先URL】cgipon.specters.net/ 【置き場所】cgipon.specters.net/tengoku/download.html 【ヘルプ内容】ログのスレ上げをなくしたいです。　 （親スレに子レスが付くと、その親スレごと一番上にあがるやつです） あげ荒らしが猛威をふるってるんで急ぎでお願いしたいです。 3060行位からそれらしい部分があるようにもみえるのですけど perl素人すぎるのか、もの凄く複雑そうに見えちゃって どこいじればいいのか かいもく検討がつきません。 どこいじればいいのか教えて下さい。（ぺこり 313 名前：nobodyさん [2008/05/14(水) 17:55:06 ID:1VhcNHK7] 【.　 CGI名 　.】　phpexit ver.1.1.4 【配布先URL】　chibinowa.net/ 【. 置き場所 .】　chibinowa.net/webapp/phpexit.html 【ヘルプ内容】 　項目の追加をお願いします。 　配布先にスクリーンショット画面がありますが、 　一覧部分の「webplog>perl」の部分（カテゴリの部分）の上部に、2件の項目を追加したく思っています。 　追加項目の内容は、1件はテキストエリア、2件目はコメント欄と同じくらいの文章です。 　個人で、テキストエリアの追加は出来たのですが、肝心の一覧にその部分が表示されず、行き詰っています。 　lib/cmd/edit.php、item.php　などを弄ってあります。 　ご助言お願い致します。 314 名前：nobodyさん [2008/05/16(金) 23:46:50 ID:oqDS1N2X] 313です。自己解決しました。 315 名前：nobodyさん [2008/05/17(土) 02:10:38 ID:Td8Jyj+I] 【.　 CGI名 　.】　Photo Memo 【配布先URL】　www.sa-k.jp/memo/cgi/p_memo.htm 【. 置き場所 .】　www.sa-k.jp/memo/cgi/p_memo/p_memo.cgi 【ヘルプ内容】 10枚までの同時アップロードなのですが、20枚までに増やせないでしょうか。 ファイルを開いて1〜10まである項目を無理矢理20まで増やしてみたのですが、 途中でエラーが出てしまい、どこをどういじったのかもわからず… たくさんあって半日くらいかかっていじってみたのですが、結局わかりませんでした。 よろしくおねがいします。 316 名前：nobodyさん mailto:sage [2008/05/17(土) 04:44:29 ID:???] foreach (@lines) { ($noa,$Yeara,$Montha,$Daya,$suba,$tail1a,$W1a,$H1a,$com1a,$tail2a,$W2a,$H2a,$com2a,$tail3a,$W3a,$H3a,$com3a, $tail4a,$W4a,$H4a,$com4a,$tail5a,$W5a,$H5a,$com5a,$tail6a,$W6a,$H6a,$com6a,$tail7a,$W7a,$H7a,$com7a, $tail8a,$W8a,$H8a,$com8a,$tail9a,$W9a,$H9a,$com9a,$tail10a,$W10a,$H10a,$com10a,$hosta) = split(/<>/); ひどい処理だな｡ 一応html部から全て項目を増やせば動作するはず｡ あるいは１件１行として全体的にリビルドしてしまうか｡ 317 名前：nobodyさん mailto:sage [2008/05/24(土) 20:37:38 ID:???] 【.　 CGI名 　.】　SN Uploader　　【配布先URL】　sugachan.dip.jp/obsolete/snup/ 【ヘルプ内容】 拡張子とMIMEが合わなくてもアップロードできてしまいます。 ログには拡張子合わずと記録されてるので簡単に改造できるかなと思いましたら 知識が全然足りずに改造しても動きませんでした。 何方か知識をお貸しください。 318 名前：nobodyさん mailto:sage [2008/05/24(土) 20:47:10 ID:???] まず拡張子合わずと記録する部分を見つけるんだ そしたらそこの条件を見るんだ そしたらそこでbreakするなりexitするなりしてアップロードできないようにするんだ 319 名前：nobodyさん mailto:sage [2008/05/25(日) 07:43:08 ID:???] sub error{ my ($no,$note) = @_; if (length($note) > 64) { $note = substr($note,0,64).'...'; } $note =~ s/&/&/g; $note =~ s/\"/"/g; $note =~ s/</</g; $note =~ s/>/>/g; $note =~ s/\r//g; $note =~ s/\n//g; $note =~ s/\t//g; $note =~ s/\0//g; my ($message,$dispmsg,$flag); if($no == 98){ $message = ""; } elsif($no == 99){ $message = "UpFileなし"; } elsif($no == 101){ $message = "投稿禁止HOST"; } 　　　　　　　　　（略） # elsif($no == 108){ $flag = 1; $message = "POSTデータ不完全"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTデータが不完全です</td></tr>';} elsif($no == 109){ $flag = 1; $message = "POSTKey不一致"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>POSTKeyが一致しません</td></tr>';} elsif($no == 202){ $flag = 1; $message = "拡張子合わず"; $dispmsg = '<tr><td>ファイルをアップロードできませんでした</td></tr><tr><td>投稿できる拡張子は'.$set{'up_ext'}.'です</td></tr>';} 見つけたけどわからない・・・orz 320 名前：nobodyさん mailto:sage [2008/05/25(日) 15:57:11 ID:???] エラーナンバー202を記録してるとこ探せばいいだろｗ 321 名前：nobodyさん mailto:sage [2008/05/25(日) 18:41:41 ID:???] {#メイン処理 if(!$in{'upfile'}){ &error(99); } if($set{'post_flag'} && !check_postkey($in{'postkey'})){ error(109); } if($set{'dlkey'} == 2 && !$in{'dlkey'}){ unlink("$in{'tmpfile2'}"); &error(61); } open(IN,$set{'log_file'})||&error(303); my @log = <IN>; close(IN); my ($no,$lastip,$lasttime) = split(/<>/,$log[0]); if($set{'interval'} && $set{'interval'} && $in{'time'} <= ($lasttime + $set{'interval'}) && $in{'addr'} eq $lastip){ &error(203);} $in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); } my $orgname; if(split(/\//,$in{'orgname'}) > split(/\\/,$in{'orgname'})){ my @name = split(/\//,$in{'orgname'}); $orgname = $name[$#name]; } else{ my @name = split(/\\/,$in{'orgname'}); $orgname = $name[$#name];} ここぐらいしか 202 ってところないけど・・・ 322 名前：nobodyさん mailto:sage [2008/05/25(日) 19:14:47 ID:???] もしかしてperlのソース読めないんですか？ 323 名前：nobodyさん mailto:sage [2008/05/25(日) 19:16:16 ID:???] >>322 $in{'ext'} = extfind($in{'orgname'}); if(!$in{'ext'} && $in{'upfile'}){ &error(202); } この行をどうにかすればいけるぐらいしかわからん 324 名前：nobodyさん [2008/05/29(木) 19:57:45 ID:Ql0N4gMP] 上げてもよかったのでしょうか… 【.　 CGI名 　.】　Link ＆ Rank 【配布先URL】　taitaistudio.com/ 【. 置き場所 .】　taitaistudio.com/cgi/linkrank.html 【ヘルプ内容】 ユーザーエディット(sub mente)で、サイト名やサイトURLなどに追加して、 新しい変数($kisyu)を追加して、登録者が対応機種を選択出来る 新しい選択欄を追加したいのですが、どうしてもログに追加されません。 挙げ句の果てにはズレてIPが表示されてしまいます。 配布元は改造のサポートは行っていないとの事なので、完全にいきずまってしまいました。 どなたか、御教授よろしくお願い致します。 325 名前：nobodyさん mailto:sage [2008/05/30(金) 03:14:29 ID:???] もっと詳しくかつ明瞭に。 326 名前：324 [2008/05/30(金) 19:04:03 ID:mgybmJwP] ちょっと説明しづらいのですが、 デフォルトでランキングの登録者がサイト名やサイトURL、バナーURL、キーワード、サイト紹介文を決められるのに追加して、 例えば、『サイト詳細』などの新しい項目を作りたいです。 しかし、何度やってもログに記録されずにログから呼び出すことも出来ません。 わかりにくい説明かとは思いますがよろしくお願い致します。 327 名前：nobodyさん mailto:sage [2008/05/30(金) 21:07:56 ID:???] 「何をどうやった」のかを「具体的に」説明してくれないと こっちもアドバイスのしようがないんだが 328 名前：nobodyさん [2008/05/30(金) 21:26:46 ID:mgybmJwP] 全てに新しい変数を追加しました。 329 名前：nobodyさん mailto:sage [2008/06/01(日) 16:00:47 ID:???] ┓(￣∇￣;)┏ 330 名前：nobodyさん mailto:sage [2008/06/14(土) 03:25:31 ID:???] 置いてある場所 www.cj-c.com/cgi_s/cbbs.htm 新規投稿時（親記事）の入力項目（セレクトフォーム）を増やすしたいです。 設定でセレクトフォームをつけれるのですが１つだけで、もう１つ増やしたいのです。 宜しくお願いします。 331 名前：nobodyさん mailto:sage [2008/06/16(月) 05:57:41 ID:???] １．設定で現在の書き方を参考に新しい変数を作ってデータを入れる ２．メインcgiのhtml出力しているところを見つけて同じように書く ３．メインcgiの書き込み、読み出ししてるところを見つけて同じように書く 以上 332 名前：nobodyさん mailto:sage [2008/07/25(金) 03:17:16 ID:???] 【CGI名】 DiaryCGI nicky! 【配布先URL】 www.din.or.jp/~raelian/ReadMeNicky.html 【ヘルプ内容】コメント記入時に、メールが送信されるように設定した場合、 通知メール内容にコメント文も載せるようにしたい。 nicky.CGIの2725行にどのような記述をいれれば本文に入るのでしょうか？ 宜しくお願いします。 333 名前：nobodyさん mailto:sage [2008/07/25(金) 04:48:36 ID:???] >>332 2725行？入れるところはそこじゃないと思うよ。 from : $ENV{REMOTE_HOST}($ENV{REMOTE_ADDR}) agent : $ENV{HTTP_USER_AGENT} という行の下に以下を追加する name : $CommentName message : $CommentMsg 文字化けで読めなかったら $CommentName $CommentMsg をjcodeでjisコードに変換する文をsub SendMailRcvNotice{の下の行に追加 334 名前：nobodyさん mailto:sage [2008/07/25(金) 22:21:13 ID:???] >>333 ありがとうございました！ ちゃんとできました！ 335 名前：nobodyさん [2008/08/07(木) 13:46:25 ID:qpI1q2Ei] 【CGI名】 PRTC BBS 【配布先URL】 一般に配布されていません 【ヘルプ内容】暗号化をしたいです www.rescue.ne.jp/cgi/htpasswd/makepwd-des/ このサイトのような感じで(もっと簡素でも構いません) とにかく出力をしたいんです 下記のソースでcgiを動かしたいのですが、初心者でわかりません 知識不足なのはわかっているのですがどうしてもやりたいです よろしくお願いします sub enc_string{ my ($key, $string) = @_; my @map = (('A' ... 'Z'), ('a' ... 'z'), ('0' ... '9'), '+', '&'); my @key = unpack('C*', $key); my $str = ''; my @x = map { int(rand(200)) } (0 ... 2); @key = map {$x[$_] ^ $key[$_]} (0 ... 2); while($string ne ''){ my $n = substr($string, 0, 3, ''); my @n = unpack('C3', $n); map{$n[$_] ^= ($key[$_])} (0 ... 2); 336 名前：335 mailto:sage [2008/08/07(木) 13:47:25 ID:???] @key = unpack('C3', $n); @key = map {$x[$_] ^ $key[$_]} (0 ... 2); my $a = $n[0] >> 2; my $b = (($n[0] & 3) << 4) | ($n[1] >> 4); my $c = (($n[1] & 15) << 2) | ($n[2] >> 6); my $d = $n[2] & 63; $str .= $map[$a] . $map[$b] . $map[$c] . $map[$d]; } my $a = $x[0] >> 2; my $b = (($x[0] & 3) << 4) | ($x[1] >> 4); my $c = (($x[1] & 15) << 2) | ($x[2] >> 6); my $d = $x[2] & 63; return $str.'<>'.$map[$a].$map[$b].$map[$c].$map[$d]; } 337 名前：nobodyさん [2008/08/09(土) 03:15:31 ID:pVYfvjSg] 【盗聴】web-up.cside.biz【個人情報詐取】 pc11.2ch.net/test/read.cgi/php/1218216303/l50 338 名前：nobodyさん mailto:sage [2008/08/18(月) 18:39:47 ID:???] >>335 それは暗号化キーと暗号化対象文字列を引数に取り、暗号化後の文字列二種を '<>' 区切りで返すサブルーチンです。 あとはそのサブルーチンを適切な引数で呼出し、返値を受取って表示するだけです。 この場合、引数は基本的に任意ですから、必要なものを与えてください。 値の与え方が分からない場合は暗号化アルゴリズムについて調べてください。 ルーチンの呼出し方、または返値の受取り方が分からない場合は、Perl のサブルーチン呼出しについて調べて下さい。 プログラムでの値の受取り方、または値の表示の仕方が分からない場合は、CGI の基礎を学ばれるべきだと思います。 339 名前：nobodyさん [2008/08/22(金) 12:34:43 ID:HAxZZ1Pz] △▲　WebProg 初心者の質問 Part17　▼▽ pc11.2ch.net/test/read.cgi/php/1204462146/l50 （スレ違いしみませんでした）） から来ましたm(__)m CGI掲示板スクリプト、ウェブパティオの記事表示順の変更について教えてください。 bbs.capture-game.com/cgi/mobile.html （バージョンは3.19です） のウェブパティオについて質問なのですが 携帯のレス表示画面で単純に新しいレス記事を上から表示するには 何処を変更したらいいでしょうか？ 初心者の質問スレではreverseを使う所まで教えて頂いたのですが、 何分初心者ですので何卒お願い致します。 340 名前：nobodyさん mailto:sage [2008/08/22(金) 12:37:00 ID:???] >(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い 341 名前：nobodyさん [2008/08/22(金) 12:58:25 ID:HAxZZ1Pz] >>340 すいません。ご指摘ありがとうございます。 補足です。 【.　 CGI名 　.】　携帯対応ウェブパティオv3.19 【配布先URL】　ttp://www.capture-game.com/modules/wfdownloads/singlefile.php?cid=1&lid=2 【. 置き場所 .】　ttp://www.capture-game.com/modules/wfdownloads/visit.php?cid=1&lid=2 【ヘルプ内容】　携帯電話表示でレス表示画面の並び順を通常12345と並んでいるのを54321という風に新しい書き込みからに並び替えたいです。 lib/phone/read.plをいろいろやってみましたがPerlの知識が乏しいため駄目です。初心者の質問スレではreverseを教えていただきましたが、 どの様なプログラムを何処に入れたらいいか解りません。教えて下さい。何行目を（）しなさいみたいに言っていただけたら幸いです。 なにとぞお願い致します。 342 名前：nobodyさん mailto:sage [2008/08/22(金) 12:59:30 ID:???] >少しは自分で考えること 343 名前：nobodyさん mailto:sage [2008/08/22(金) 13:38:02 ID:???] >>342 もしかして # 投稿順にソート @new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; regist.plのここですかね？^^; 344 名前：nobodyさん mailto:sage [2008/08/22(金) 17:08:31 ID:???] >>343 で、やってみたか？ 345 名前：nobodyさん mailto:sage [2008/08/22(金) 17:49:49 ID:???] >>344 やってみました＾＾ これと @new = @new[reverse sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; これを @new = reverse(@new); @new = @new[sort {$sort[$b] <=> $sort[$a]} 0 .. $#sort]; 試しましたが無理でしたorz 346 名前：nobodyさん mailto:sage [2008/08/22(金) 23:20:22 ID:???] >>345 reverse() までたどり着いてんならあともう一歩だ。がんばれ。 347 名前：nobodyさん mailto:sage [2008/08/23(土) 01:26:37 ID:???] lib/phone/read.plの２２０行目 while (<IN>) { 　　　　↓ for (reverse <IN>){ ってな感じじゃないかな 348 名前：nobodyさん mailto:sage [2008/08/23(土) 01:32:40 ID:???] >>347 while と for では $_ のスコープに関する扱いに違いがある点に注意。 また逐行処理前提で書かれたループ内のコードが適切でない可能性があるよ。 読んでないからどう影響するかはわからんけど応援してみる。 349 名前：nobodyさん mailto:sage [2008/08/23(土) 01:48:47 ID:???] >>346 >>348 ありがとうございます(^o^) >>347 解りやすくありがとうございます＾＾ 出来た！と思ったのですが（ひっくり返りました（感動）） １ページ表示数以上のレスが付くと一番新しいレスが２ページ目に行ってしまいます（涙） 350 名前：nobodyさん mailto:sage [2008/08/23(土) 03:58:22 ID:???] @new = @new[sort {$sort[$a] <=> $sort[$b]} 0 .. $#sort]; でどうだ？ 351 名前：nobodyさん mailto:sage [2008/08/23(土) 09:27:40 ID:???] >>350 ２カ所とも試してみましたが変わりませんでした(;.;) ありがとうございました。 352 名前：347 mailto:sage [2008/08/23(土) 09:49:35 ID:???] >>349 あとは表示するレスの抽出だけみたいだから $i = 0; while (<IN>) { $i++; if ($i <= $from) { next; } if ($i > $to) { last; } chop; ↑の部分（read.pl２２０行目辺り）を $i= 0; my @line; while (<IN>){ $i++; if ($i <= $from) { next; } if ($i > $to) { last; } push(@line, $_); } for (reverse @line){ chop; ってな感じじゃないかな 353 名前：nobodyさん mailto:sage [2008/08/23(土) 16:32:22 ID:???] >>352 見事に出来ました(T.T) 非常に解りやすく教えて頂き本当に感謝致します。 ありがとうございましたm(__)m 354 名前：nobodyさん [2008/08/24(日) 20:26:26 ID:8OT0ZHuq] 【.　 CGI名 　.】　HiLink ver1.12（サンプルAバージョン） 【配布先URL】　www.e-hws.net/ 【. 置き場所 .】　www.e-hws.net/hilink.html 【ヘルプ内容】 リンク登録時に特定のカテゴリーを選択したとき、表示部のテーブル背景色を変更したいです。 hilink.cgiの「表示データ作成」部分に以下のように追加し if ($category eq 'ああああ' ){$cate_clr="red";} elsif ($category eq 'いいいい ){$cate_clr="blue";} else {$cate_clr="#999999";} スキンのmain.htmlで、テーブルタグにbgcolor="$cate_clr"と入れてみましたが うまくいきませんでした。 なにぶん手探りで、何かおかしなことをやらかしているかもしれないのですが なんとかご教授いただけると嬉しいです。 どうかよろしくお願いします。 355 名前：nobodyさん [2008/08/24(日) 20:38:01 ID:ZUYvYMes] 【.　 CGI名 　.】　へっどらいん 【配布先URL】　php.s3.to/ 【. 置き場所 .】　php.s3.to/net/#amezo 【ヘルプ内容】 このへっどらいんで出力させる場合に<script>コードを無効にしてほしいです ないサイトなら問題ないのですがある場合は気になります よろしくお願いします 356 名前：nobodyさん mailto:sage [2008/08/28(木) 12:17:05 ID:???] >>355 headline.phpの144〜146行目 144:　for($j=7; $j<count($files); $j++){//残りはHTMLデータ 145:　　$line.= $files[$j]; 146:　} の下に、以下の行を加える。 $line = preg_replace('/<script[^>]*>.*<\/script>/','',$line); 表示時だけでなくデータ取り込みの際にも<script>を除去したければ、85行目の上にも同じものを入れる。 84:　if($start || !$head[start]){ 85:　　　$new.= $line; 検証してないけど。 357 名前：nobodyさん [2008/09/02(火) 17:46:02 ID:ikXIt5qG] 【　 CGI名 　】配布用web拍手CGI 【配布先URL】www.webclap.com/ web拍手CGI公式サイトさんのところで無料配布のスクリプトをもらってきたのですが、 ファビコンがプロバイダ側のへんてこファビコンなので変えたいのです！ 自サイトのhtmlページでは自作のファビコンで被せてあるのですが、CGIでファビコンを つけるのはどこをどういじったら良いですか？ clapinit.txt (cgi)　このファイルがあやしかったので、 #-------------- # HTMLヘッダー #-------------- sub header{ print "Content-type: text/html\n\n"; print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">',"\n"; print '<html lang="ja"><head>',"\n"; print "<title>$title</title>\n"; print "</head>\n"; この内に print "<link rel="shortcut icon" href="favicon.ico">\n"; ↑これを加えてみたのですがダメですた。 他にもいじらないとダメだったりするのでしょうか。 もしかして根本的に間違ってたりするのでしょうか…。 どなたかお助けください。 スクリプトダウンロード先は www.webclap.com/etc/download.html←ここです。 358 名前：nobodyさん mailto:sage [2008/09/02(火) 18:03:23 ID:???] print qq|<link rel="shortcut icon" href="favicon.ico">\n|; 書くならエスケープしないと 359 名前：357 [2008/09/02(火) 18:21:23 ID:ikXIt5qG] 358さん、ありがとうっ！ できました。ヽ(　　´　　∇　　｀　　)ノ エスケープてなんのことかさっぱりですが、助かりました！ ありがとうございましたー。 360 名前：WIvuwbtzwfKUbeCY mailto:unprdk@urrwey.com [2008/09/04(木) 04:46:54 ID:???] 8BjBoM <a href="ywnlxptotivr.com/">ywnlxptotivr</a>, [url=rteiyeyfadlo.com/]rteiyeyfadlo[/url], [link=ogppqltwqlls.com/]ogppqltwqlls[/link], qkrzooqzbhel.com/ 361 名前：nobodyさん mailto:sage [2008/09/04(木) 06:55:50 ID:???] PHP限定で改造やります 改造したものはHPで公衆発信します まず以下の情報を書いてレスよろ [スクリプト名]名前は正確に！！ [配布先URL]二次配布できるかできないか確認するためです。うｐローダに置いてあったらスルー [改造内容]何をどのように改造したいのか詳しく。あいまいな内容は基本的にスルー 362 名前：nobodyさん mailto:sage [2008/09/04(木) 20:31:18 ID:???] >>361 スレの趣旨から反するから改造丸投げはNG 363 名前：nobodyさん mailto:sage [2008/09/04(木) 20:58:58 ID:???] 一部も丸投げもどっちでもいいよ 364 名前：nobodyさん mailto:sage [2008/09/04(木) 23:19:35 ID:???] 関連スレ 【 スクリプト改造依頼スレ 】(丸投げ) part7再 pc11.2ch.net/test/read.cgi/php/1220469709/ 365 名前：RZWXbJawD mailto:epezJffuuGpds [2008/09/15(月) 12:13:38 ID:???] map+1409.txt;50;60 366 名前：nobodyさん mailto:sage [2008/09/20(土) 18:44:46 ID:???] www.dotup.org/uploda/www.dotup.org2048.zip.html ゲームの得点ランキングを作ろうと思い、 名前・得点・コメントを入力してランキングに登録するといった形のものを作りたかったのですが、 値を入力し、送信してもうまく表示されません。 logのファイルに書き込みはできてるみたいですが、正しくかけていないように思えます。 どうすればランキングを表示できるでしょうか？ もうどこが間違ってるのか分からなくなってしまいましたので、アップロードさせていただきました。 どなたか修正・ご指導よろしくお願いします。 www.cgi-web.net/download-top.html様の quizというCGIを元に改造してみたものです。 こちらに誘導されました。よろしくお願いします。 367 名前：nobodyさん mailto:sage [2008/09/21(日) 01:27:40 ID:???] >>366 配布元の制限を読むと、あなたが配布元に連絡していない場合、 今回のアップロードは「スクリプトの無断再配布」に当たり、 同サイトの提示するライセンスに抵触する可能性があります。 権利関係を再確認してください。 368 名前：nobodyさん [2008/09/26(金) 20:08:56 ID:ze4UkUPR] 【.　 CGI名 　.】toshinariスクリプト(Perl) 【配布先URL】www.toshinari.net/ 【ヘルプ内容】 としなり掲示板にリモートホスト、IPを取得できるように改造してください。 できれば/BBSID/log/00000.cgi みたいに掲示板IDディレクトリに新しくlogディレクトリを作成してcgiファイルで保存するようにして それでレス削除画面にリモートホスト、IPを表示させるようにしてくれるといいです。 あと、ここからは希望ですが リモートホスト(IP)規制機能と透明あぼーん機能をつけてください。 報酬はリモートホスト、IP取得が500P リモートホスト(IP)規制機能、透明あぼーんまで追加してくださったら+500P払います 369 名前：nobodyさん mailto:sage [2008/09/26(金) 20:33:39 ID:???] Pって何やねん 370 名前：368 [2008/09/26(金) 20:35:04 ID:ze4UkUPR] >>368 すいません、書き忘れてました ウェブマネーのことです。 371 名前：368 [2008/09/26(金) 20:36:50 ID:ze4UkUPR] 安価ミス・・・ >>368じゃなくて>>369 372 名前：nobodyさん mailto:sage [2008/09/26(金) 20:52:29 ID:???] ケチくさいにもほどがあるな 373 名前：nobodyさん mailto:sage [2008/09/27(土) 00:18:26 ID:???] >>368 「ここからは希望」ってあるがじゃあその前は何なんだ 374 名前：nobodyさん mailto:sage [2008/09/27(土) 04:01:31 ID:???] ま、>>1嫁 375 名前：368 [2008/09/27(土) 07:15:06 ID:DmLoG2K4] すいません。書き直します ダウンロード場所：cgi.toshinari.net/wiki.cgi スクリプト名：toshinariスクリプト どんな風に改造するか： としなり掲示板にリモートホスト、IPを取得できるように改造してください。 /BBSID/log/00000.cgiという感じにlogディレクトリにcgiファイルで保存するようにしてほしいです。 報酬はWM1000Pです。 これからは希望ですが ＩＰ規制と透明あぼーんもつけてもらえれば幸いです。 376 名前：nobodyさん mailto:sage [2008/09/27(土) 07:49:04 ID:???] >>375 で、どこまでやったのさ？ 自分で全然やる気ないなら丸投げスレへ行け 377 名前：368 [2008/09/27(土) 16:52:29 ID:DmLoG2K4] >>376 どこまでやったというと？ がんばってもできないから改造依頼したんですが・・・ あと、dat落ちしていない丸投げスレのURL教えてください。 378 名前：nobodyさん mailto:sage [2008/09/27(土) 16:53:18 ID:???] これはひどい 379 名前：368 [2008/09/27(土) 19:14:47 ID:DmLoG2K4] なんとか自分でできそうです 380 名前：368 [2008/09/27(土) 19:25:04 ID:DmLoG2K4] なんとかできました 381 名前：nobodyさん mailto:sage [2008/09/29(月) 07:51:32 ID:???] >>380 自分で出来んならくんなよ 382 名前：nobodyさん mailto:sage [2008/09/29(月) 08:50:14 ID:???] 関連スレ 【 スクリプト改造依頼スレ】(丸投げ) part7再々 pc11.2ch.net/test/read.cgi/php/1222645553/ 383 名前：nobodyさん mailto:sage [2008/09/29(月) 09:02:12 ID:???] 丸投げスレがまた即死したので立てときました。 こっち（工房）にまとめようという意見もあるようですが、一種の隔離スレみたいな 意味合いもあると思うので、やっぱあった方がいいかと…… 384 名前：YwSCdaoYJixVIpCijR mailto:ConstandinosGokasi87@gmail.com [2008/10/03(金) 04:13:35 ID:???] hi, you have super site., 385 名前：nobodyさん mailto:sage [2008/10/04(土) 02:06:40 ID:???] 【.　 CGI名 　.】　ショッピングカート WebCart 2.3x 【配布先URL】　www.cgis.biz/script_web_cart/ 【ヘルプ内容】　 サンプルを見ていただくとわかると思いますが、商品の並び順が新しい番号が 上にくるようになっています。 これをＮＯ．１から表示するようにしたいのですが、どこを改造すればよいか ご教授ください。 私が見た中で、ここかな？と思ったのは、view.phpの153〜154行目と思ってい ますが、どうでしょうか。 386 名前：nobodyさん mailto:sage [2008/10/04(土) 02:07:50 ID:???] じゃやれよ 387 名前：nobodyさん mailto:sage [2008/10/04(土) 02:16:49 ID:???] >>386 じゃやれよって言われても…どう変えればいいのかわからないから聞いているの ですが？ 自分でできそうだったらすでにやってますが、場所が見当ついても、何を変えれ ばいいのかわからず、作者さんもお忙しいとお聞きしましたので、ここで聞いて みたのですが…。 388 名前：nobodyさん mailto:sage [2008/10/04(土) 02:24:39 ID:???] 分からないなりに当たりつけてやってみなよ まさか100%何も見当付かないってことはあるめえ？ 389 名前：nobodyさん mailto:sage [2008/10/04(土) 04:39:31 ID:???] 言語がわからんってことなら丸投げいけば？ 390 名前：385 mailto:sage [2008/10/05(日) 11:16:52 ID:???] 丸投げスレにて教えてもらいました。 誘導ありがとうございましたm(_ _)m 391 名前：nobodyさん mailto:sage [2008/10/05(日) 18:39:28 ID:???] 回答もらってからこっちを終わらせるとかほんと悪質だなｗ 392 名前：nobodyさん [2008/10/07(火) 23:59:17 ID:Zxtb1+eC] >>899 ありがとうございます 393 名前：nobodyさん [2008/10/27(月) 20:40:50 ID:vjLKC+JQ] 【CGI名】スレ天 【場所】cgipon.specters.net/tengoku/download.html 【ヘルプ】トリップつけれるようにしたい ググったらそれらしいのはなんぼかみつかったけど 入れる場所とかわかりません。 ご教授よろしくおねがいします。 ★ ワンポイント 2chのトリップ生成方法は以下のようになっています。 ($name, $tripkey) = split(/\#(.+)/, $form{'name'}); if($tripkey){ $salt = substr($tripkey.'H.', 1, 2); $salt =~ tr/\x3A-\x40\x5B-\x60\x00-\x2D\x7B-\xFF/A-Ga-f./; $salt =~ s/[^\.\/0-9A-Za-z]/\./g; $trip = '◆'. substr(crypt($tripkey, $salt), -10); } print "$name$trip"; 394 名前：nobodyさん [2008/10/27(月) 20:42:05 ID:vjLKC+JQ] 書き込み処理直前、クッキー発行後 ＜ここから＞ #トリップ機能 $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); 395 名前：nobodyさん [2008/11/29(土) 15:46:24 ID:kT4OjumG] 【.　 CGI名 　.】　RNA pre2.0b2 (build 051225) 【配布先URL】　web.archive.org/web/20080207152240/http://foaf.jp/~msano/rnanightly_with_extlib.tar.gz　（少し重いですが、DLできます。783kbです。） 【ドキュメント】web.archive.org/web/20070217110104/www.semblog.org/wiki/index.cgi?RNA%c0%e2%cc%c0%bd%f1(nightly%c8%c7) 【ヘルプ内容】 # スクリプト紹介 ・RNA は、Webサーバ上で動作する、RSSアグリゲータの一種です。 　Perl/CGI で実装されています。 　Web上のいろいろなサイトの更新情報を収集するアンテナとしての機能が主です。 ・www.semblog.org/wiki/?rnaで配布されてるスクリプトの開発版です。 ・開発はストップしてます ・isnot.jp/?p=RNA%A5%E1%A5%E2 にも、スクリプトの処理の流れが書いてあります。 　（Perlがわかるかたにはスクリプトを見たほうが早いかもしれませんが） # したいこと ・楽天ブログのRSS等、RSS内に入ってる広告を除去したいです 　具体的には、"PR:"で始まってるitemを除去したいです 396 名前：395 mailto:sage [2008/11/29(土) 15:48:00 ID:???] # やってみたこと、考えたこと ・lib/RNA.pmの800行目付近、cacheしたサイトのデータをStoreして、sortする前あたりで 　除去したらいいのかなと思ってます $self->__cache_sites($new_cache_data); $self->{SiteList}->{RSSArray} = \@rss_array; unless($config->{DateControl}->{AllowFutureEntries}) { $self->remove_future_entries; } $self->remove_ads; # この辺り？ 397 名前：395 mailto:sage [2008/11/29(土) 15:48:35 ID:???] ・lib/RNA/RSS.pmの remove_future_itemsを参考に見よう見まねで書いてみたりもしましたが、 　「titleが "PR:" で始まってるitemを除去する」という書き方がわかりませんでした sub remove_ads { my $self = shift; my %arg = @_; my @new_items = (); foreach my $item (@{$self->{items}}) { if (index($item->{title}, "PR:") < 0) { push(@new_items, $item); } } $self->{items} = \@new_items; } ・処理するタイミングも間違ってるかもしれません ・できれば今後のために、除去するitemの指定方法に汎用性を持たせていただけるとなお嬉しいです 以上よろしくお願いします 398 名前：nobodyさん [2008/12/12(金) 23:58:00 ID:A0lF4mOo] 【 スクリプト改造依頼スレ】(丸投げ)のほうで投稿したのですが、 投稿した後にこちらのスレで質問したほうがいいという書き込みを見つけたので 同じ内容のものを投稿します。 【 CGI&PHP名 】 CSS Yomi-Search（Yomi-Search改造版） 【 配布先URL 】 ttp://www.w-art.org/ 【 依頼内容 】　マーク順設定で検索したとき、ログの並び順を更新日の新しい順にしたい 現在ログをマーク順で表示させています。 デフォルトではＩＤの新しい順で並ぶようになっていますが、 ↓の方法で更新日の新しい順に並ぶようにしました。 web.archive.org/web/20041222074129/yomi.pekori.to/bbs2/wwwlng.cgi?print+200205/02050051.txt しかし、検索した時にログの表示が変になってしまいます。 上記のアドレス先にも検索した時の表示の対処法が書いてあるのですが、 その通りにやってみると並び順はきちんとなるのですが、同じログが２つ表示されてしまいます。 よろしくお願いします。 399 名前：nobodyさん mailto:sage [2008/12/13(土) 00:13:50 ID:???] で、向こうは書きっぱなしで放置逃亡ですか ならマルチは死ねとしか 400 名前：nobodyさん [2008/12/13(土) 00:28:02 ID:fT/e8zoW] 398です。 すいません。 何度か書き込みをしたことはあるのですが、 削除はしたことがなかったのでその辺を何も考えてませんでした。 えと、削除依頼を出せばいいのかな・・ガイドライン読んできます。 401 名前：nobodyさん mailto:sage [2008/12/13(土) 04:59:44 ID:???] >>400 削除依頼じゃなくてさ、このｽﾚに移動しますって書けばおｋ 402 名前：nobodyさん [2008/12/13(土) 09:48:56 ID:fT/e8zoW] >>401 教えて下さってありがとうございます。 向こうのスレに書き込んできました。 以後気をつけます。 403 名前：nobodyさん mailto:sage [2008/12/13(土) 20:10:29 ID:???] >>402 で、このｽﾚは丸投げじゃないんだから自分で出来るところまでやるってのが第一歩。 404 名前：nobodyさん [2009/01/30(金) 15:25:22 ID:Mp+dTJwq] 【.　 CGI名 　.】　phpexit ver.1.1.4 【配布先URL】　chibinowa.net/ 【. 置き場所 .】　chibinowa.net/webapp/phpexit.html 【ヘルプ内容】 　項目の追加をお願いします。 　配布先にスクリーンショット画面がありますが、 　一覧部分の「webplog>perl」の部分（カテゴリの部分）の上部に、2件の項目を追加したく思っています。 　追加項目の内容は、1件はテキストエリア、2件目はコメント欄と同じくらいの文章です。 　個人で、テキストエリアの追加は出来たのですが、肝心の一覧にその部分が表示されず、行き詰っています。 　lib/cmd/edit.php、item.php　などを弄ってあります。 色々修正してみたり、記述を変えてみましたが、増やした項目部分を登録すると増やしたコメント欄とテキストエリアが同じ内容になってしまったりします。 　1度自己解決したのですが、上記問題が出てしまいましたので、どうかご助言お願い致します。 405 名前：nobodyさん mailto:sage [2009/01/30(金) 23:11:27 ID:???] コメント欄とテキストエリアで出力している変数を別にすればいいのでわ？ 406 名前：nobodyさん mailto:sage [2009/02/04(水) 05:16:41 ID:???] 【.　 CGI名 　.】　0chスクリプト 【配布先URL】　0ch.mine.nu/public/scripts/　0chのtest060227.zip 【ヘルプ内容】 0chのtest060227.zipを使用して掲示板を運営しています。 スレッド一覧（ ./subback.html ）にもmeta.txtの内容を書き込もうと思い いろいろ弄ってなんとか形になりました。※meta.txtは掲示板を作って自分で書き込めます。 しかし、これでよいのかどうか自信がもてないため質問します。 varda.plの191 sub CreateSubback{　} 内に require('./module/legolas.pl'); $Caption = new LEGOLAS; META($this,$Index,$Caption); 151# HTMLヘッダの出力 $Caption->Print($Page,undef); 他に sub META{ 　my ($this,$Page,$Caption) = @_; 　my ($title,$link,$image,$code); 　$Caption->Load($this->{'SYS'},'META'); } ミスはないでしょうか？ 407 名前：nobodyさん mailto:sage [2009/02/04(水) 19:33:07 ID:???] レンタル鯖にてメール送信CGIを設置したくPerlで継ぎはぎしてやってみたんですが、 メールは送信されるのですが、件名とメアドまで本文の方に来てしまって、 件名が（無題）で送信者がanonymousになってしまいます。 どうやったら件名とメアドを認識してくれるのでしょうか？ HTMLの入力フォームは、名前、メアド、件名、本文の４つだけです。 408 名前：404 [2009/02/04(水) 19:36:06 ID:KFPddoVr] >>405 解答ありがとうございました。頑張ってみます！ 409 名前：nobodyさん mailto:sage [2009/02/04(水) 19:36:17 ID:???] ソースをさらせばいい ↓そのソースじゃねーＹＯ！ 410 名前：nobodyさん mailto:sage [2009/02/04(水) 20:04:10 ID:???] >>409 ｿｰｽさらします。Perl知らないんでこれが限界っす･･･。 #!/usr/bin/perl $mailprog = '/usr/sbin/sendmail'; require 'jcode.pl'; #Get the input read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); #Split the name-value pairs @pairs = split (/&/,$buffer); foreach $pair(@pairs) { ($name, $value) = split(/=/, $pair); #Un-Webify plus signs and %-encoding $value=~tr/+/ /; $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $FORM{$name} = $value; if ( $name ne "to" ) { push (@fields, $name) unless (grep(/^$name$/, @fields)); } } # set recipient address if form is blank $to = $FORM{'to'}; 411 名前：nobodyさん mailto:sage [2009/02/04(水) 20:04:56 ID:???] 続きです。 ### 送信フォーマット $mail_msg = ""; foreach $field (@fields) { $mail_msg = "$mail_msg-----------------------------------------------\n"; $mail_msg = "$mail_msg($field) $FORM{$field}\n"; } ### ShiftJis to Jis &jcode'convert(*mail_msg, 'jis'); open(MAIL,"| $mailprog $FORM{'to'}")|| die "Can't open $mailprog!\n"; print MAIL $mail_msg; close(MAIL); 412 名前：nobodyさん mailto:sage [2009/02/04(水) 20:12:33 ID:???] メールヘッダがないではないか？ 413 名前：nobodyさん mailto:sage [2009/02/04(水) 23:10:20 ID:???] >>410 まず、スクリプトの先頭に use strict; use warnings; と書いて。 414 名前：nobodyさん [2009/02/05(木) 15:06:41 ID:0clwaODI] 【. CGI名 .】美しい画像掲示板 【配布先URL】ttp://w1.nirai.ne.jp/freeze/appli/file06.html 【ヘルプ内容】 ・ファイルサイズを800000にしたい if($filesize <= 100000){ ここを変更するだけでは下記の行がエラーで上手く表示されません $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); ・画像がない場合の表示 行に画像が1枠しかない場合、残り4枠に'image.jpg' の画像が 表示されるはずが1枠にしか表示されません どうか力を貸して下さい 415 名前：nobodyさん mailto:sage [2009/02/05(木) 15:17:02 ID:???] エラーでメッセージが出ずに行がそのまま出るの？ 416 名前：414 mailto:sage [2009/02/05(木) 16:05:49 ID:???] >>415 ファイル名　oo.jpg アップロード成功！ Warning: Division by zero in bbs.php on line 197 と出て、その行（表示させるテーブル）が凝縮されて画像は表示されません。 417 名前：nobodyさん mailto:sage [2009/02/06(金) 02:28:34 ID:???] じゃもう問題分かったようなもんじゃん 418 名前：414 mailto:sage [2009/02/06(金) 22:45:19 ID:???] >>417 if($filesize <= 100000)をif($filesize <= 800000)に変えるとなぜ $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); がエラーを起こすのか理解できていないので解決できません 419 名前：nobodyさん mailto:sage [2009/02/06(金) 22:45:51 ID:???] いや検証して理解すれよ 420 名前：nobodyさん mailto:sage [2009/02/06(金) 23:33:26 ID:???] 糞スクリプト過ぎるな。 とりあえずその行の直前ででも関係する変数を適当に出力してみれ。 ゼロ除算なのだから、割る数のうちいずれかが0になっている。 値がおかしい変数が見つかったら、その変数に値を設定している部分を全部洗い出して、どういう風に値が変わっていくか調べろ。 421 名前：420 mailto:sage [2009/02/07(土) 01:08:19 ID:???] 配布CGIが糞なのは今に始まった事じゃないから諦めて整理しつつ読んだ。 問題はその変更じゃないな。変な画像が混ざってるんじゃねぇか？ データはそのままで改造前のスクリプトを設置したらちゃんと動くのか？ 422 名前：414 mailto:sage [2009/02/07(土) 13:19:00 ID:???] >>421 アップして表示するのに関しては正常に動きます 画像がない場合の表示はダメです 理想　　　　　　現実 ■□□□□　　　■×××× ■アップした画像 □画像がない場合に表示する画像 ×イメージがない 423 名前：nobodyさん mailto:sage [2009/02/07(土) 13:42:18 ID:???] 表示してみなよ $a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h); の直前に print "Content-type: text/plain\n\n$a_num = $size_w/($a_w+$b_w*$a_h/$b_h+$c_w*$a_h/$c_h+$d_w*$a_h/$d_h+$e_w*$a_h/$e_h);\n"; exit; みたいに書いてさ・・ 424 名前：414 mailto:sage [2009/02/07(土) 14:58:22 ID:???] >>423 ありがとう。テーブルの幅を変えているからダメなんでしょうか？ 何かやればやるほど色んな不具合が見つかり心が折れそうです これは止めておいた方がいいスクリプトですかね（ ＾ω＾） 425 名前：nobodyさん mailto:sage [2009/02/07(土) 17:41:10 ID:???] いや言われたことやれよ・・・ 426 名前：nobodyさん mailto:sage [2009/02/07(土) 18:01:23 ID:???] まあ、問題の切り分けをしようとも考えない>414にはお似合いのレベルだけどな。 image.jpgがスクリプトと同じディレクトリに無いだけ、に一票。 どう見えるかなんざ枝葉末節の問題に過ぎないんだから、HTMLソースどうなってるのか確認しろよ。 427 名前：nobodyさん mailto:sage [2009/02/07(土) 18:40:53 ID:???] 設置することが最終目標の人たちに対して、 デバッグの仕方教えても仕方ないような気がしてきた。 428 名前：nobodyさん mailto:sage [2009/02/07(土) 18:44:15 ID:???] じゃ改造スレじゃなくて丸投げスレ行けと 429 名前：414 mailto:sage [2009/02/07(土) 19:01:15 ID:???] >>425 テーブル幅・ファイルサイズを変えて色々試しました ファイルサイズが関係無い事はわかったのですが 何がいけないかわからなかったです >>426 422の現実は下記の間違いでした ■□××× 430 名前：nobodyさん mailto:sage [2009/02/07(土) 19:47:38 ID:???] >423 >表示してみなよ >表示してみなよ >表示してみなよ >426 >HTMLソースどうなってるのか確認しろよ。 >HTMLソースどうなってるのか確認しろよ。 >HTMLソースどうなってるのか確認しろよ。 （日本語が分からないようなので3回言いました） 431 名前：nobodyさん mailto:sage [2009/02/07(土) 20:07:27 ID:???] >>428 丸投げスレとかあるのかｗ 432 名前：414 mailto:sage [2009/02/07(土) 21:09:57 ID:???] >>430 表示された式をレスすれば解決してくれるの？ ソースを確認と言われても414のサイトにあるソースの ファイルサイズとテーブル幅以外は変更してないので 確認して貰えれば助かるのですが？ 433 名前：nobodyさん mailto:sage [2009/02/07(土) 21:11:49 ID:???] >>432 こちらのスレでどうぞ pc11.2ch.net/test/read.cgi/php/1158647441/ 434 名前：nobodyさん mailto:sage [2009/02/08(日) 07:11:28 ID:???] $bosyu の値が1ならば、登録フォームを表示させる。 0ならば、登録フォームを表示させない。 1か0かは、管理人用ページから設定することができる。　という感じでPerlを組みたいのですが、 まだまだ初心者でよく分かりません。 一応、 <input type=radio name=bosyu value=1>表示する <input type=radio name=bosyu value=0>表示しない というフォームを作り、登録フォームの表示部分に、 if ( $bosyu == 1 ){ 　#登録フォーム } else {} というようにしました。 しかし、管理人画面から1にしようが0にしようが、登録フォームはどのみち消えてしまいました。 この場合、どうしたらよいのでしょう？ もしよろしければ、 www.77c.org/d.php?f=nk5918.lzh に本体をアップロードしましたので、修正箇所など教えていただけますと助かります。 私自身が追加しましたのは、行381,行382,行678,行683,行684　になります。 435 名前：nobodyさん mailto:sage [2009/02/08(日) 07:13:19 ID:???] ごめんなさい、忘れていました。 【.　 CGI名 　.】　Annevote　Ver0.791 【配布先URL】　tackysroom.com/ 【. 置き場所 .】　tackysroom.com/cgi_annevote.htm 【ヘルプ内容】 >>434 436 名前：nobodyさん mailto:sage [2009/02/08(日) 09:39:47 ID:???] >>434 ｽｸﾘﾌﾟﾄを全部見る気はないんで間違っているかもしれんが 684行     else {} →不要 678行     if ( bosyu == 1 ){ →if ( $FORM{'bosyu'} == 1 ){ 437 名前：436 mailto:sage [2009/02/08(日) 10:47:01 ID:???] あはｗ >>436は間違ってるわｗ 設定を別ファイルとかに記録しておかないとダメ!! ゛o(≧◇≦*)oo(*≧◇≦)o″ダメ!!じゃんｗ 考え方としては &decode ;の後に $FORM{'bosyu'}の値が「表示しない」なら別ファイルとかに表示しないという記録をして $FORM{'bosyu'}の値が｢表示する｣なら別ファイルとかに表示するという記録をする 678行目のif文では、別ファイルとかに表示するという記録があるかないかで分岐させればいい 438 名前：nobodyさん mailto:sage [2009/02/08(日) 11:47:45 ID:???] >>437　さん ありがとうございます。 大体構造は理解できました。 if文で変数に値を入力する為には、「記録する」という別の処理が必要なのですね。 まことにお恥ずかしい話ですが、記録させるソースの書き方が分かりません・・・ 例として、記録させるためのソースを教えていただけませんか？ （プログラム内容に沿っていなくても構いません。全体的に「どんな感じ」で書けばいいのか掴めれば幸いです。） 439 名前：nobodyさん mailto:sage [2009/02/08(日) 15:15:31 ID:???] >>438 考え方は排他制御を参考にすればいい $FORM{'bosyu'}の値が「表示しない」ならロックファイルみたいなものを作成し、 $FORM{'bosyu'}の値が｢表示する｣ならロックファイルみたいなものを削除する if文はロックファイルみたいなものが存在していなかったらブロックを実行すればよい annevote.cgiにもロックファイルが使われているからソースをよく読んで自分考えれ 440 名前：nobodyさん [2009/02/12(木) 16:19:46 ID:KnJ40Ap9] 【.　 CGI名 　.】　favicon.cgi 【配布先URL】　blog.dtpwiki.jp/dtp/2009/02/favicon-api-api.html 【ヘルプ内容】　O_SHLOCKとO_EXLOCKが使えないサーバでロック処理をしたい 上記スクリプトをcoreserverに設置し、 MYDOMAIN.com/test/favicon.cgi/http://www.yahoo.co.jp/ などとして呼び出した結果、 Software error: Your vendor has not defined Fcntl macro O_SHLOCK, used at /virtual/MYDOMAIN/public_html/test/favicon.cgi line 97. とエラーが出ます。 O_SHLOCKを削除してテストを続行すると、次はO_EXLOCKが使えないとのエラー。 coreserverのOSがLinuxなので使えないようです。 www.coreserver.jp/help/index.php/spec/ エラーが出る部分を、Linuxで使えるロック処理にするにはどうすればいいのか、 どうぞご教示ください。 441 名前：440 mailto:sage [2009/02/13(金) 10:24:19 ID:???] >>440の件、 flockでなんとか動きました。 ありがとうございました。 442 名前：nobodyさん [2009/04/02(木) 18:02:40 ID:q5b3212c] 【 CGI&PHP名 】 改造ｻﾑﾈｲﾙｶｯﾀｰVer2.3 sam.php 【 配布先URL 】 siokara.que.jp/siokara_accessories.html 【 依頼期限 】　一週間くらい 【 依頼内容 】 1、サムネイル作成元（$img_dir）フォルダーを、複数（7つくらい）指定できるようにしてほしい どうぞよろしくお願いします<m(__)m> 【 スクリプト改造依頼スレ】(丸投げ) part7再々 pc11.2ch.net/test/read.cgi/php/1222645553/ こちらでも依頼しましたが反応がありませんでした 443 名前：nobodyさん mailto:sage [2009/04/02(木) 19:45:21 ID:???] >>442 ここは丸投げｽﾚじゃないんだよ。 自分で改造してわからないことを質問するｽﾚなんだよ。 444 名前：442 mailto:sage [2009/04/02(木) 21:27:22 ID:???] すいません(´；ω；｀)ｳｯ… 445 名前：nobodyさん [2009/04/03(金) 23:39:45 ID:oy8/1v1D] 【.　 CGI名 　.】　もっと書き込み隊2 【配布先URL】　tackysroom.com/page_cgi2.htm 【ヘルプ内容】 外部のテンプレートファイルを読み込んで表示させたいのですが、うまくいきません。 772行目あたりの「ヘッダー上部書き出し」のところに open (FT,"/navi.tmp");　#navi.tmpはテンプレートファイルです。 @navi = <FT>; close (FT); と書き、表示させたいところに print @navi; と書いてみたのですが、表示されません。 解決策ありましたらどうかご教示下さい。 446 名前：nobodyさん mailto:sage [2009/04/03(金) 23:50:12 ID:???] テンプレートに書いてもしょうがないだろ 447 名前：nobodyさん mailto:sage [2009/04/29(水) 09:42:28 ID:???] フリー配布のcgiの改造ヘルプってここでいいのかな…。 【.　 CGI名 　.】arseno-l-0.5 【配布先URL】　ttp://www.geocities.jp/fla774/arseno/ 【ヘルプ内容】　単語の新規登録時に既に登録済みの単語（例えば雨があるのに雨はng。飴ならok）はエラーにする方法が知りたい やってみたことはdl.cgiの中にあるregist_entryで 「新しい単語を配列に書き込む」って処理があったから、その直前に 新しい単語と配列の単語を比較して、一致したら既に登録済みってことでエラーにしようと思いました。 &catch_continuation( "index", $word, $Ip ); &lock_file; &get_index_array( \@index ) or &error( 'open_index', __LINE__, 1 ); $newkey = 0; （追加↓） foreach( @index ){ &error( 'double_word', __LINE__ ) if @index[1] == $word; } （追加ここまで↑） 実際に試してみると、重複して登録できてしまいました。何が原因なんでしょうか。 448 名前：nobodyさん mailto:sage [2009/04/29(水) 09:58:24 ID:???] foreach( @index ){ &error( 'double_word', __LINE__ ) if $_ eq $word; } 449 名前：447 mailto:sage [2009/04/29(水) 10:29:59 ID:???] ありがとうございます。 構文ミスってことでしょうか？ 試してみましたが、やっぱり重複しても登録できてしまいました。 もしかして入れる場所間違ってるんでしょうか…。 450 名前：nobodyさん mailto:sage [2009/04/29(水) 10:48:19 ID:???] &get_index_array内部処理では末尾の改行付いたままだからな 451 名前：447 mailto:sage [2009/04/29(水) 14:48:50 ID:???] つまり &get_index_arrayの単語と比較する前に「改行を除く」か 改行の手前までを比較対象にするようにすればいい、ってことですかね。 やってみます。 452 名前：nobodyさん mailto:sage [2009/04/29(水) 18:30:42 ID:???] foreach( @index ){ &error( 'double_word', __LINE__ ) if $_ eq "$word\n"; } ちと頭悪いがsjisじゃなければこれで良くね？ 453 名前：447 mailto:sage [2009/04/29(水) 21:36:31 ID:???] 試行錯誤してますが、どうもうまくいかないです…。 foreach my $var ( @index ){ my $var == @index; my $var =~ s/\n//; &error( 'double_word', __LINE__ ) if my $var_ eq "$word\n"; } 変数作って一旦配列の単語をコピーし、\nを置換で削って比較、と思ったのですが 既存の単語が消えて、新しい単語に置き換わる、という結果になってしまいました。 （雨、宝物、てすと、の３つがあった時、新たにとんかちを追加すると直前のてすとがとんかちに変わる） >>452 ありがとうございます。試してみましたが、やはり重複登録できてしまいました。 454 名前：nobodyさん mailto:sage [2009/04/29(水) 22:42:25 ID:???] >>453 なんか構文が色々おかしいぞｗ foreach my $var ( @index ){ chomp($var); &error( 'double_word', __LINE__ ) if $var eq $word; } 455 名前：nobodyさん mailto:sage [2009/04/29(水) 22:46:53 ID:???] myの意味も知らんと色々やらかしちゃってるっぽいな 456 名前：447 mailto:sage [2009/04/29(水) 23:30:00 ID:???] >>454-455 ローカル変数にはmyつけるってperlのサイトに出てましたが…違うんですかorz >>454の方法を試すと あめ、山、海の順で登録すると海を追加した後に山が消え、あめがあ行の前に移動して 海があ行先頭にきてしまいました。 どうもchomp命令で改行外すと、索引ファイルが改行なしになって表示が狂うようです。 >>454のmy $varをやめてchomp( @index)としても同様の結果に。 改行を外すのではなく見ないようにする方がいいんでしょうか。（末尾無視するとか） 457 名前：nobodyさん mailto:sage [2009/04/30(木) 00:25:58 ID:???] >>456 うーん、思ったよりおまいさんのperl知識が乏し過ぎてちょと話がしにくいな。 判定方法は>>454のでいいはずだけど、他にもいじっちゃったでしょ。そこがたぶん全然合って無い。 頑張る気持ちは大切にしてあげたいけど、先にもう少しperlの勉強しないと厳しいかも。 急ぎなら丸投げおいで。 458 名前：447 mailto:sage [2009/04/30(木) 21:19:55 ID:???] 言うとおり、改造前に基本から勉強してきます。 付け焼刃の知識じゃどうにもなんないみたいだし…。 とはいえ自分で中身わかってないと、何かあっても対処できないし 急ぎでもないので丸投げ依頼も今はやめておきます。 ありがとうございます。 459 名前：nobodyさん mailto:sage [2009/05/11(月) 18:46:32 ID:???] CGIゲームの中で、javaスクリプトをつかうには、何が必要ですか？ 460 名前：nobodyさん mailto:sage [2009/05/11(月) 19:31:18 ID:???] 別に何も？ 461 名前：nobodyさん mailto:sage [2009/05/11(月) 20:50:00 ID:???] あえて言うならjavascriptが動作するブラウザ 462 名前：nobodyさん mailto:sage [2009/05/16(土) 15:01:23 ID:???] あれ、そうなんですか？ なんで動かないのだろう・・・？ 463 名前：nobodyさん [2009/05/21(木) 07:04:12 ID:5BoMPyL5] 【.　 CGI名 　.】　i-imageBBS v1.25 【配布先URL】　www.chama.ne.jp/index.htm 【. 置き場所 .】　www.chama.ne.jp/download/bbs/iimgbbs/index.htm 　　　　　　　　　　 【ヘルプ内容】　強制ID表示　２ちゃんねると同じトリップ利用可 まだ勉強し始めの超初心者です よろしくお願いします。 464 名前：nobodyさん mailto:sage [2009/05/21(木) 07:35:18 ID:???] いや、そこで終わられると丸投げも同然なんだがｗ どこまでやってどこでつっかえてるんだ？ 465 名前：643 mailto:sage [2009/05/21(木) 20:45:43 ID:???] 初めからさっぱりです。 参考になるようなサイトを紹介してもらえればと思ったのですが、丸投げスレの方が妥当なのでそちらに行ってみます。 466 名前：nobodyさん [2009/05/26(火) 00:43:47 ID:hNbwwEvZ] 【　 CGI名 　】　アクセスカウンター（01） 【配布先URL】　ttp://plus-code.net/cgi-flash-counter/accesscounter01/ 【ヘルプ内容】 このCGIは、flashでカウンターを表示しているのですが、 カウンターをクリックすると、配布URLのトップページに飛ぶようになっています。 flash(swf)自体にリンクが設定されているのですが、なんとかこれを無効にする 方法はないでしょうか？ リンクの無効が無理なら、リンクが同窓で開くため、最低限別窓で開くようにしたいです。 タグでa hrefのtargetを指定してもNGでした。 467 名前：nobodyさん mailto:sage [2009/05/26(火) 01:26:02 ID:???] >>466 swfに埋め込まれてる動作だから無理。 作者に要望出すしかない。っていうか本来そっちが先。 468 名前：nobodyさん mailto:sage [2009/06/05(金) 17:00:12 ID:???] 【.　 CGI名 　.】　Mail Carrier v1.0726　　　　　 【配布先URL】　現在配布先は閉鎖しているようです 【. 置き場所 .】　ttp://www.kent-web.com/pubc/book/test/uploader/uploader.cgi pass 3210 【ヘルプ内容】　このメールフォームcgiに日本語が含まれない場合の送信を防ぐ 機能を付けたいのですが、どうしても自分では無理です。 どうかよろしくお願いします。 469 名前：468 mailto:sage [2009/06/05(金) 17:12:47 ID:???] 失礼しました、置き場所のファイルNoは2087です。 470 名前：nobodyさん mailto:sage [2009/06/05(金) 17:21:31 ID:???] 一ヵ所どう見ても</form>で閉じてない糞スクリプトだなｗ 471 名前：470 mailto:sage [2009/06/05(金) 17:35:10 ID:???] 答えるにはこのＣＧＩに送信しているメールフォームの本文書く欄のtextareaのnameが判ったほうが やり易い 472 名前：468 mailto:sage [2009/06/05(金) 19:39:42 ID:???] <form action="./mcarrier.cgi" method="post" id="form"> <textarea name="message" cols="20" rows="5" ></textarea> <br> <input name="submit" type="submit" value=" 送 信 " id="sousin"/> </form> htmにはこのように記述しています >>470 自分でカスタマイズするうちにおかしくいじってしまったのかもしれません、 どこの部分を閉じていないかもわかっていないのですがご指摘ありがとうございます 473 名前：468 mailto:sage [2009/06/05(金) 19:43:34 ID:???] ttp://swanbay-web.hp.infoseek.co.jp/modify.html#JPN ここを参考にして if ($in{'comment'} !~ /(\x82[\x9F-\xF2])|(\x83[\x40-\x96])/) { &error("日本語を書いてください。"); } を付け加えようとしたのですが、日本語の文を投稿してもエラーになってしまいました。 根本的な所がわかっていないようです 474 名前：470 mailto:sage [2009/06/05(金) 20:06:16 ID:???] １５０行目に↓を加えると大丈夫だと思うけど>>473みたいに「かなカナ」以外の日本語でもエラーにしたいなら $in{'comment'}を$in{'message'}にすればいい。あと、荒らしに対してエラー文で"日本語を書いてください。"ってヒント与えるのはいただけない if ($in{'message'}!~/(?:[\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC]|[\xA1-\xDF]){2}/){ &error("Busy now!"); } 475 名前：nobodyさん mailto:sage [2009/06/05(金) 22:01:44 ID:???] >>474 回答ありがとうございます。 早速150行目に上記の文を書き加えると、思った通りの動作をしてくれました。 一日中考えて調べてわからなかったので本当に感謝です。 神様（∩´∀｀）∩ 476 名前：475 mailto:sage [2009/06/08(月) 19:03:02 ID:???] CGIのことをちゃんと勉強したいので初心者向けの書籍を探していますが 近所の書店には自分に合いそうなものがありません。 御薦めの本を知っている方いますか？ スレ違いすみません 477 名前：nobodyさん mailto:sage [2009/06/08(月) 21:02:02 ID:???] スレ違いってわかってんなら移動しようぜ・・・ 478 名前：476 mailto:sage [2009/06/09(火) 06:40:19 ID:???] >>477 移動します 479 名前：nobodyさん [2009/06/13(土) 16:33:54 ID:FybrAREw] 【.　 CGI名 　.】　プチ☆ボード 【配布先URL】　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 で呼び出したフォームから、書き込みが出来るようにしたい。 投稿内容がメチャクチャ多くなる予定なので、別ページでフォームを作りたいのです。 480 名前：nobodyさん mailto:sage [2009/06/13(土) 17:07:25 ID:???] >479 プログラムにする必要すらなく、そのHTMLソースを丸ごとHTMLとして保存して設置すれば、とりあえず投稿はできるはず。 あとはCGIのほうからフォームを書き出してる箇所を削ってリンクでも置いておけばいい。 481 名前：nobodyさん mailto:sage [2009/06/13(土) 17:35:09 ID:???] ありがとうございます！目からウロコでした。 これをやって思い出したのですが、投稿項目を凄く(少なくとも30個以上)にしたいのです。 たとえば、初期状態だと ・お名前 ・Eメール ・タイトル ・コメント ・URL ですよね。 たとえば、これに新しく ・出身地 という項目を追加するとして、フォームを書きます。 name属性をsyussinとします。 これをスクリプトのどの辺にスカラー変数として追加したら出来るのか？がわからないのです。 どうやらログファイルに追加はできたようなのですが、掲示板上には表示がされていません。。。 482 名前：nobodyさん mailto:sage [2009/06/13(土) 18:11:47 ID:???] >>481 そういう用途には向かないCGIだね。 WEBフォームとかアンケートで別なもの探したほうがいい。 483 名前：nobodyさん [2009/06/13(土) 18:20:46 ID: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'}<>〜 と追加しています。 私の頭以外ではどこが抜けているのでしょうか？ 484 名前：nobodyさん mailto:sage [2009/06/13(土) 18:23:37 ID:???] >>482 すみません、あくまでも例えでして。 アンケートではなくて、レスのできる掲示板で作る必要があるのです。 昔はとあるゲストブックで項目を追加したりしていたので、簡単にできるかな？と思ったのですが、難しいですね。 485 名前：nobodyさん mailto:sage [2009/06/13(土) 18:31:26 ID:???] >>483 考え方はそれで合ってるし、実際いま俺がやってみてもそれで普通に表示されてる。 本当にログファイルに追加できてる？ 「どうやら」とかじゃなくてちゃんと確かめた？ 486 名前：nobodyさん mailto:sage [2009/06/13(土) 19:02:09 ID:???] >>485 たびたびすみません。 ログファイルを覗くと、出身地に入れたはずの「地球」が残っているので、 ログへの書き込みはできていると判断しています。 しかし、コメントのすぐ右に表示されるはずの「地球」の文字はないです。 www1.axfc.net/uploader/Sc/so/8786.zip せっかくなので、うｐってみました。 どこを間違えているのでしょうか？ 487 名前：nobodyさん mailto:sage [2009/06/13(土) 19:19:11 ID:???] 君が書いた517行目の順番と364行目の項目の順番をよーく見てごらん 488 名前：nobodyさん mailto:sage [2009/06/13(土) 19:31:38 ID:???] ・・・理解しました。(恥 一回吊ってから目的のスクリプト作成にむけてがんばります！ ありがとうございました！ 489 名前：nobodyさん [2009/06/18(木) 03:54:24 ID:O7fG+jDb] 【.　 CGI名 　.】　Hello-UP　　　 【配布先URL】　idol.nm.land.to/ 【ヘルプ内容】　アップロードフォームの編集&削除パスをクッキーで記憶させたい どうぞよろしくお願いします<m(__)m> 490 名前：nobodyさん mailto:sage [2009/06/18(木) 06:43:06 ID:???] >>489 どこまでできてて、どこでつまづいてるのさ？ 491 名前：489 mailto:sage [2009/06/18(木) 14:13:06 ID:???] クッキー関係は全く分かりません 492 名前：nobodyさん mailto:sage [2009/06/18(木) 15:28:25 ID:???] じゃ基礎から学べよ 493 名前：489 mailto:sage [2009/06/18(木) 16:05:19 ID:???] 分からないのでここで質問しています。 分かる方いらっしゃいましたらどうぞよろしくお願いします<m(__)m> 494 名前：nobodyさん mailto:sage [2009/06/18(木) 16:21:56 ID:???] 丸投げなら丸投げスレでやれ 495 名前：nobodyさん mailto:sage [2009/06/18(木) 17:11:51 ID:???] とりあえず１７行目に↓を追加すれば記憶できると思うが setcookie("pass", $_POST['pass'], time()+60*60*24*30 ); setcookie("downpass", $_POST['downpass'], time()+60*60*24*30 ); 496 名前：489 mailto:sage [2009/06/19(金) 05:38:58 ID:???] >>495 できました！！ありがとう！！！ 497 名前：ぶぅ子 ◆0cRRT9dSGg [2009/08/16(日) 01:42:29 ID:M5z+7f3F] こんばんは。 【スクリプト改造依頼スレ】（丸投げ）part7再々で投稿したら、 こちらへ誘導されたので投稿します。 よろしくお願いします。 【 CGI&PHP名 】 余裕派掲示板ver2.62 【 配布先URL 】 cgipon.specters.net/ 【 ヘルプ内容 】 WAP2.0対応にしたいです。 お世話になっているお店のサイトの掲示板で運用されているのですが、 配布されている状態のままだと、auの携帯からの表示、投稿が出来ません。 実際にサイトを作成した人は消息不明で困っている店主さんから相談を受けました。 現状はgoogleなどで検索をし、 USER_AGENTの記述を変更すれば良いのかと認識していたのですが、 やっぱりこれだけでは足りないのでしょうか？ 例えば[yoyuuha.cgi]を開き、 $mob{car} = 'UP.BROWSER'; の部分を $mob{car} =~ m/^KDDI/ に変更という具合に。 本を読んだり、ネット検索などをしていますが自分の理解が追いつかない状態です。 すみませんがよろしくお願いします。 498 名前：nobodyさん mailto:sage [2009/08/16(日) 02:24:46 ID:???] で、それでダメだったの？ 流石に他人のためにパケ代使って確認する気にはなれないぜ？ 499 名前：nobodyさん mailto:sage [2009/08/16(日) 02:34:24 ID:???] >>497 というかできないならできないってちゃんと言った方が良いんじゃないのか？ 今後ことあるごとに頼まれるパターンだぞそれ。その度にここ来るのかよ。 500 名前：ぶぅ子 ◆0cRRT9dSGg [2009/08/16(日) 22:44:37 ID:M5z+7f3F] こんばんは。 >498 失礼しました。肝心の結果ですが、497に書いた内容を試した所、 auの携帯（W63K）では既に投稿されている内容の閲覧だけは 出来るようになってます。 でも、他キャリアの携帯でアクセスした時のように 投稿フォームやボタンなどの表示は無く、ただテキスト表示のみです。 >499 相談を受けた段階では、出来るor出来ないの即答はしませんでした。 本やネットで調べて出来そうなら試してみます、という返答のみです。 今回の相談内容だと有料でプロの方にお願いするような内容となるのでしょうか？ 他のスクリプトへ変更するように提案した方が良いのかなぁ。 501 名前：nobodyさん mailto:sage [2009/08/17(月) 07:01:39 ID:???] >>500 プロに依頼するレベルかどうかはともかく、あんたが出来ないんだから まずはその事を伝えるべきだろう。 他の物に変えるか、金払って対応するかどうかを決めるのはその店主とやらの仕事。 502 名前：nobodyさん mailto:sage [2009/09/18(金) 21:50:14 ID:???] どなたかご教授下されば幸いです。 get-flash-videos -Google Code code.google.com/p/get-flash-videos/ 数々の動画サイトからコマンドラインで動画を取得するツールなのですが、 ニコニコ動画にてダウンロードするファイルが恐らくswfだった場合、下記エラーメッセージが表示されダウンロードに失敗します。 -------------------------- Using method 'nicovideo' for 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結果を頂けないでしょうか… よろしくお願い致します。 503 名前：nobodyさん mailto:sage [2009/09/18(金) 21:54:18 ID:???] >>502 板違い 504 名前：nobodyさん mailto:sage [2009/09/19(土) 00:47:27 ID:???] 大好きだったら自分で調べろよと 505 名前：nobodyさん mailto:sage [2009/09/24(木) 20:19:04 ID:???] >>504 大好きです＞＜ 506 名前：nobodyさん mailto:sage [2009/09/25(金) 12:17:24 ID:???] >>504 僕も大好きです＞＜ 507 名前：nobodyさん mailto:sage [2009/09/26(土) 14:29:57 ID:???] >>504 浮気者！絶対別れないからっ！ 508 名前：nobodyさん mailto:sage [2009/09/27(日) 13:11:10 ID:???] >>502 もう見てないかもしれんし, 板違いかもしれんけど, ソース見るついでに 弄ったら一応落ちてきたので, せっかくだから貼っておきます. indent の空白が全角になるかもしれんから, 適当に手パッチした方が無難かも. 1番目のは smXXX 以外を弾く仕様になってたので, nmXXX も許すようにしただけ. 2番目のは問答無用で suffix が flv になるのようなので, 動画形式に合わせた suffix にするようにした. なくても nmXXX は落ちてくる. 3番目のは取得したデータが動画かどうかチェックするルーチンが swf に 対応してないようなので対応させた. 先頭 3bytes が "CWS" らしいが,  いい加減に調べただけなので, なんかあっても知らんがな. 509 名前：508 mailto:sage [2009/09/27(日) 13:13:22 ID:???] --- get_flash_videos-1.15.orig　2009-09-27 11:48:37.000000000 +0900 +++ 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 = "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; 510 名前：502 mailto:sage [2009/09/27(日) 17:37:37 ID:???] >>508>>509 ありがとうございます！ 実は毎日見てたよこのスレ… ずっと色々試してたけど上手く行かなかった… 助かりました。本当にありがとう！ 511 名前：nobodyさん mailto:sage [2009/09/30(水) 22:50:07 ID:???] 【.　 CGI名 　.】　nicky.cgi 【配布先URL】　www.din.or.jp/~raelian/ReadMeNicky.html 【 ヘルプ内容 】　 コメントに、スパム　フィルターがついているみたいなんですが、 オフにしたいのですけど、どうしたらいいでしょうか？ 一人で日記に使うので、誰か他の人が書き込むことはないので。 よろしくお願いします。 512 名前：nobodyさん mailto:sage [2009/10/07(水) 09:41:18 ID:???] >>511 スパムフィルタっつーか「日本語が入ってないとスパム扱い」の処理なら入ってるけどそれのこと？ だったら2717行目をコメントアウト。 513 名前：nobodyさん mailto:sage [2009/10/09(金) 07:07:29 ID:???] スクリプトを自動で全部作ってくれるスクリプトってある？ 514 名前：nobodyさん mailto:sage [2009/10/09(金) 11:24:14 ID:???] あるよ 515 名前：CUCYMNzIrxbzJeUL mailto:pjm4d3dkk7.@gmail.com [2009/10/22(木) 23:25:26 ID:???] And this is the only construction which is consonant with the manifest intention of the grant and with the rule of interpreting such grants as laid down by the foremost publicists and jurists. , 516 名前：dLYuGbiTKgcOt mailto:6l8b8n21.@gmail.com [2009/10/23(金) 21:29:22 ID:???] A parent w 4 kids, one special needs baby, and unwed teen w an infant should probably have her hands full with her brood. , 517 名前：nobodyさん mailto:sage [2009/10/24(土) 22:30:25 ID:???] 【.　 CGI名 　.】　Dojin-OrderDX - Version 6.91 【配布先URL】　www.gnbnet.com/cgi/?mode=dojin 【ヘルプ内容】 在庫が一定以下で販売中というアイコンを残部少のアイコンに、 また、在庫が0になったら完売のアイコンという風に自動変更できるようにしたいです。 一つ前のバージョンでは www.gnbnet.com/bbs/index.cgi?mode=view&seq=521 のようにアイコンを自動変更するようにできるみたいなんですが、 最新のVersion 6.91で試したところ、できませんでした。 どうかよろしくお願いします。 518 名前：nobodyさん mailto:sage [2009/11/03(火) 17:26:39 ID:???] それは作者へバグ報告するべきもんじゃないのか 519 名前：nobodyさん mailto:sage [2009/11/05(木) 12:38:44 ID:???] 【.　 CGI名 　.】　CSS Yomi-Search（Yomi-Search改造版） ver 2.01 　　　　　　　　　　（テンプレは配布先のサンプル版と同じ「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から消え、不具合もないのですが スクリプト改造として、これで間違ってないですか？ 520 名前：nobodyさん mailto:sage [2009/11/06(金) 12:50:52 ID:???] >>519 そら「カスタマイズの問い合わせするな」という所に改造の問い合わせしたんだから 返事こなくて当たり前だろ。作者さんのせいにするもんじゃないよ。 521 名前：nobodyさん mailto:sage [2009/11/06(金) 14:28:03 ID:???] >>520 修正前のver２．０だと、top.htrml頁のソースの一番上に --------------------------------------------　 #↓設定↓ #カテゴリ・テーブル横のセル数 $table = '2'; #サブカテゴリを横に並べる数 $subcat = '2'; #↑ここまで↑ -------------------------------------------- と書いてあったんです。 なので値をどちらも'3'に変えたんですが、表示は相変わらず２列だったので 製作者へ問い合わせたら しばらくして、top.htrmlなどを修正したver２．０1の配布がはじまり 上記の設定項目が削られてしまってたんですけど・・・・。 あと、記憶違いでなければ 私が問いあわせたときに、あの注意書きはなかったと思うんです。 ・・・・・・・・私のせいだろうな、注意書き足されたの。 猛省してきます。 522 名前：nobodyさん mailto:sage [2009/11/06(金) 21:30:04 ID:???] >>521 どんだけ失礼なメールしたんだお前ｗ 523 名前：nobodyさん mailto:sage [2009/11/12(木) 08:59:59 ID:???] 【.　 CGI名 　.】toshinariPerlパージョン 【配布先URL】cgi.toshinari.net/wiki.cgi 【ヘルプ内容】 IEでは名前を打ち込んだ場合、ちゃんと記憶されて入力された状態なのですが firefox等では名前を入力しても記憶されません。 これをfirefoxでも入力された状態になるように改造の方をお願いします。 524 名前：nobodyさん mailto:sage [2009/11/12(木) 15:01:07 ID:???] cookie保存しない設定になってんじゃないの？ 525 名前：nobodyさん mailto:sage [2009/11/12(木) 17:17:48 ID:???] >>524 google等ではちゃんとクッキー情報が保存されてるので、それはないかと思います。 526 名前：nobodyさん mailto:sage [2009/11/12(木) 17:30:38 ID:???] サポート掲示板で聞いてみたら？ 527 名前：nobodyさん mailto:sage [2009/11/12(木) 17:34:29 ID:???] >>526 サポート掲示板は過疎なので・・・ 聞いても誰も答えてくれないかと思いここに来ました。 528 名前：nobodyさん mailto:sage [2009/11/12(木) 17:38:22 ID:???] cookies.sqliteを削除すると直るらしいよ 529 名前：nobodyさん mailto:sage [2009/11/12(木) 17:43:21 ID:???] >>528 FireFoxというのは例で上げています。 operaでも同じ現象です。 ブラウザが悪いとは思えません。 どうやらクッキーはちゃんと取得してるようですが、ちゃんと名前欄に表示されないみたいです。 530 名前：nobodyさん mailto:sage [2009/11/12(木) 18:50:30 ID:???] クッキーがちゃんと書き込まれて、取得もできてるなら、 スクリプト側の問題ではないんでない？名前を代入してHTMLを返してるだけなんだから 531 名前：nobodyさん mailto:sage [2009/11/12(木) 18:53:37 ID:???] >>530 けど名前欄には表示されないんですよね・・・ IEではちゃんと表示されるんですが・・・ 532 名前：nobodyさん mailto:sage [2009/11/12(木) 19:07:19 ID:???] じゃちょっとこっちでも試してみるよ 533 名前：nobodyさん mailto:sage [2009/11/12(木) 20:23:28 ID:???] >>532 お願いします。 534 名前：nobodyさん mailto:sage [2009/11/12(木) 20:41:41 ID:???] 分かったぞい bbs.cgiのSetCookieサブルーチン内のクッキー発行文の、path=/の後にセミコロンを付ければおｋ ちなみに2つ発行してる意味は分からん 535 名前：nobodyさん mailto:sage [2009/11/12(木) 20:50:57 ID:???] >>534 おぉ！ありがとうございます。 ちゃんと表示されるようになりました！ ですが日本語名だと文字化けしますね；； エンコードに問題があるのかな・・・ 536 名前：nobodyさん mailto:sage [2009/11/12(木) 21:51:51 ID:???] javahiyori.bake-neko.net/idea/js/encodecookie.html escapeかけるといいらしい 537 名前：nobodyさん mailto:sage [2009/11/14(土) 21:59:33 ID:???] >>536 自分なりにググったりして調べてやってみましたができませんでした；； bbs.cgiのクッキー発行の部分にescapeをかけて、makeindex.plのクッキーを読み込むところにunescapeを使うんですよね・・・ 538 名前：nobodyさん mailto:sage [2009/11/16(月) 11:35:54 ID:???] アクセスして表示されるのは makeindex.plで生成されて当該ディレクトリに置かれるindex.htmlってことはおｋ？ 539 名前：nobodyさん mailto:sage [2009/11/16(月) 17:50:42 ID:???] >>538 それは把握してます。 540 名前：わ mailto:info@merutomo55.net [2009/11/26(木) 17:55:54 ID:???] 募集掲示板 よろしくお願いします。無料です。　pokpok.org/

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef