【 スクリプト改造工房 PART 7 】
■ このスレッドは過去ログ倉庫に格納されています
0001sage
03/09/17 15:28ID:ZcvVdw5C#================================
# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
過去ログ>>2
0618nobodyさん
03/12/29 18:32ID:???Cookieの取得で日本語文字コードが上手く入ってくれない。（半角文字は大丈夫だった）
クッキー取得は以下の通り。ドコがいけないのかな？
sub get_cookie {
local($key, $val, *ck);
$ck = $ENV{'HTTP_COOKIE'};
foreach (split(/;/, $ck)) {
($key, $val) = split(/=/);
$key =~ s/\s//g;
$ck{$key} = $val;
}
@ck = split(/<>/, $ck{'YY_BBS'});
return (@ck);
}
ちなみに、cookie内にはちゃんとutf-8で文字列が格納されてまつ。
0619nobodyさん
03/12/29 19:15ID:???これに問題があるようでつね。ちと調べなおしてきまつ。
0620nobodyさん
03/12/29 20:37ID:???スレ汚しｽﾝﾏｿ
0621nobodyさん
03/12/29 20:40ID:???0622nobodyさん
03/12/29 21:00ID:4uq0QGbyhttp://www.pine-kz.com/camera/camera.html
ImageMagickでの自動サムネイル作成で、サーバのプロセスサイズから200万画素
という制限（jpegのサイズを色々変えて確認）をができちゃったのですが、なん
か良い回避策ないですかね？
open(IMG3,"$tmp_dir$attc");
$org_sz = newFromJpeg GD::Image(\*IMG3);
@bound = $org_sz->getBounds();
if ($bound[0] > $bound[1]) { $thumW = $img_width;
} else { $thumW = $img_width * $bound[0] / $bound[1];}
print DAT "original width: $bound[0] original height: $bound[1]\n thum: $thumnal $thumW\n";
system("/usr/bin/convert $org_img -scale $thumW -sharpen 80 $thumnal");
$org_sz = "";
close(IMG3);
0623620
03/12/29 22:05ID:???KENTのスクリプ㌧って、Cookieでの文字化けは対応してないのね（「表示」とか）
0625nobodyさん
03/12/30 05:36ID:+KTyzjOj普段 GUIのImageMagickを使っていて、変換後の品質が非常に良いのでこれを
使いたいと思って組込んだんですが、622で質問した後、色々検索してみて、
1)GDでそのままやる
2)PerlMagickを呼ぶ
3)Imagerを呼ぶ
という方法を考えてみました。
メモリー(プロセス)サイズを一番節約できる＝アップロードできる画素サイズ
を大きくできる、という方向ではどれが良いのでしょうか？
（jpegを刻んで変換してから連結するというのは見つかりませんでした）
0626625
03/12/31 05:47ID:Xbx5eY1F-limit memory 1 -limit map 1 を付け加えるとスクリプトエラーを起さずに
ただサムネイルを作ってくれなくなりました。
自分のパソコンだと、/tmp にテンポラリファイルを作成して作業完了すると
ちゃんと消去して終るのです。なんで？
0628622
04/01/04 15:26ID:Wl1FVx2lが少し古くて使えないのだった。
動かない理由は、GDを使って大きなファイルを開いてから更にgetBounds()で
操作しようとした所為だった。関数を呼んだ時点でメモリサイズがサーバの
制限を越えてる。
サーバにインストールされてるソフトを外部コマンドとして呼び出すほうが、
pmベースで操作するより断然有利だ。
・・・Web検索では GDでgetBounds()しか見つからなかったので、その通りに
やってみたのだけど、identifyを呼び出したらメモリ制限で止まらなくなった。
200万画素の制限もなくなりました。（ディスクスペースが大きいといっても
4MBの画像をアップし続けたら100枚足らずだから自粛しないとすぐ終ってしまうが）
0630622
04/01/05 22:07ID:FD26CFrGもっと減らしてどうにかすると、その先にあるのは？
ディスプレイ上で一覧できるサイズであれば可というのは昔ありました。
写真をクローズアップしてなお解像感が維持されることで、空間把握に繋がる
というのを意識してるんだが。
（プリント時のdpiがどうのというのとは別）
ああ、俺が変態なのかもしれんが。
一覧性というのは、構図とか構成とか意匠とかそういうものの評価に繋がって
いるのだけど、そうではなくてマクロ領域で撮影されたものをもっとクローズ
アップして見たくなるとかそういう欲求の話をしているの。
昔のちんけなスパイ映画かSF映画で撮影した画像をどこまでも拡大していくの
があったじゃない。インチキだってのはすぐ解ったけれど、状況は変りつつある。
（デジタル写真の現状をただ肯定しているわけではないが）
0631nobodyさん
04/01/05 22:15ID:???0632&rle;tset
04/01/07 23:18ID:???0633gorigori
04/01/08 01:52ID:???ここのver.2.3.3のスクなんですけど、
このスレッド式掲示板に、htmlタグを使えるようにしたいのですが、
いくらやっても出来ないんです。
ttp://www.civilizer.net/undef/perler/cgisec/502.html
こことかも見てやったんですがさっぱり…
申し訳ありませんがお教えいただけないでしょうか？
0634nobodyさん
04/01/08 04:12ID:???「いくらやっても出来ない」 とは、自分で改造してみたんだけど出来なかったという意味なのかな？
だったらどんな改造を試してみたのかここで報告してくれ。
0635gorigori
04/01/08 12:14ID:???申し訳ありません。
自分で改造してみたんです。でも出来ませんでした。
http://v.isp.2ch.net/up/a99bb3f01517.txt
↑スクリプト
タグ関連はsub form_decodeのところにあったので
$string =~ s/</\e/g;
foreach (@tmparray){
my($a,$b)=split(/=/,$_);
$b =~ tr/+/ /;
$b =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/chr(hex($1))/eg;
$b =~ s/</</g;
$b =~ s/>/>/g;
$string =~ s/\e\/?\s*$tags\s+/<$tags /ig;
$b =~ s/\t/ /g;
$b =~ s/\r//g;
なんて適当に…
ほかにもこんな感じでいろいろ試しました。
perlとか基本的なことくらいしか分からなくて
お手数おかけします。
0636gorigori
04/01/08 12:16ID:???$tagのところも
ttp://www.civilizer.net/undef/perler/cgisec/502.html
を参考にしてやりました。
0637nobodyさん
04/01/08 20:43ID:???foreach (@tmparray){
my($a,$b)=split(/=/,$_);# $aと$bは特殊な変数でuse strict対象外。$aと$bは使用しないほうがよい。
$b =~ tr/+/ /;
$b =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/chr(hex($1))/eg;
$b =~ s/</</g;# 2chでは、< は &lt; って書くといいよ。だけど、この行無意味
$b =~ s/>/>/g;# 2chでは、> は &gt; って書くといいよ。
$b =~ s/\e\/?\s*$tags\s+/<$tags /ig;# 上のほうで\eに置換されて無いので、この行無意味
$b =~ s/\t/ /g;
$b =~ s/\r//g;
しかも、
$b =~ s/\e\/?\s*$tags\s+/<$tags /ig;
は、
foreach $tag ( @allowtags )
{
$b =~ s/\e\/?\s*$tags\s+/<$tags /ig; # 許可タグとその閉じタグは許す
}
$b =~ s/\e/</g; # 許可タグ以外は <にする
0638nobodyさん
04/01/09 12:21ID:???foreach (@tmparray){
my($a,$b)=split(/=/,$_);
$b =~ tr/+/ /;
$b =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/chr(hex($1))/eg;
（削除）
（削除）
（削除）
$b =~ s/\t/ /g;
$b =~ s/\r//g;
要は<や>を＆ｌｔ；や＆ｇｔ；に置換してる部分を丸ごと捨てればいい。
許可したタグ以外は使用不能にしたいなら>637を参考にその方針で頑張れ。
0639nobodyさん
04/01/09 19:00ID:???何をどういじったのか良くわからないのですが、データの削除が出来ません。
本体のみ(txt)
ttp://www.geocities.co.jp/SiliconValley/9193/nc/nc.txt
全ファイル
ttp://www.geocities.co.jp/SiliconValley/9193/nc/nc.lzh
オリジナル
ttp://www.geocities.co.jp/SiliconValley/9193/nc/link.lzh
です。
sub edit{
下のほうでデータの削除が出来るようになっています。
削除チェックボックスにチェックを入れ削除ボタンを押すと
sub del{
に移動します。そこで削除されるようなのですが、どうもうまく行っていないようです。
どこを修正したらいいでしょうか?よろしくお願いします。
0640nobodyさん
04/01/09 22:19ID:???というか、どこをどう修正したか分からなくなるような奴はいじるな。
0641nobodyさん
04/01/09 23:33ID:hZGS3YnQ例えば
カテゴリABC：a-z (cate 0から5)
カテゴリあいう：あ-ん (cate 6から10)
カテゴリイロハ：イ-ン (cate 11から15)
の３カテゴリがあるとします。
本当は一つのサイトを各カテゴリに一つずつ登録させたいのですが、（例：B、か、ユ etc,.）
以下のスクリプトを繰り返しコピペしただけでは３番目のカテゴリのみの登録になってしまいます。
どうすれば、各一つずつ登録できるようになるのでしょうか？
先輩方よろしくお願いします。
<td>カテゴリ</td>
<td><select name="cate">
EOF
foreach (0 .. $#cates) {
if ($in{'cate'} eq "$_") { print qq(<option value="$_" selected>$cates[$_]\n); }
else { print qq(<option value="$_">$cates[$_]\n); }
}
print <<"EOF";
出所は taitai studio の Link & Rank (ver3.1) の regist.cgi です。
0642nobodyさん
04/01/10 00:05ID:???この場合、入力フォームだけではなく、記録部、記録直後の確認画面、表示画面も改造する必要がある。
ざっと見た感じカテゴリごとにフォルダを作ってログを管理してるので、そっちの形式もいじる事になる。
戦艦大和を海から引き上げて宇宙戦艦に改造する程の手間。他のCGIを探す事を薦める。
0643nobodyさん
04/01/10 08:44ID:xCRFiDNpご返答ありがとうございます。
他をあたってみます
お薦めなどがありましたらお知らせいただければありがたいです。
0644nobodyさん
04/01/10 19:46ID:???本文
と入力して、
<p>本文</p>
<p style="margin-top:3（←改行した数）em;">本文</p>
というように出力させるにはどうすればいいのでしょうか？ 現在の掲示板では
# 複数の改行は段落に変換
$value =~ s/(<br \/>){2,}/<\/p><p>/g;
となっています。
0646645
04/01/10 23:57ID:???http://pc2.2ch.net/test/read.cgi/hp/1067286961/
0647nobodyさん
04/01/12 01:32ID:+TyesD9W一枚のｐｈｐで左にメニュー右に検索結果と出るんですが
これをフレームで分割できるように出来るでしょうか？
全ファイル
ttp://junk.s41.xrea.com/test/hysearch.zip
0648nobodyさん
04/01/13 12:41ID:???できるだろ。
そんな糞面倒なこと俺は絶対やらないが。
できるかできないかで聞かれたからそれだけでこたえてみたが、
やり方はきかれても教えるつもりはない。
他の連中も教えるつもりがないから今まで黙っている訳で。
まあ、なんだ。努力する気が見えない奴には知ってる奴も教えたくなくなるってこった。
0649647
04/01/13 20:24ID:???返答有難うございます
やっぱ面倒ですか。。。。
PHPの本片手に色々考えてみたんですが
僕の様なペーペーにはまだ無理ですね
もう少し勉強してきます<m(__)m>
0650nobodyさん
04/01/13 20:33ID:0tJfIYqX0651647
04/01/13 21:01ID:???検索とコピペで何とかなるんですか・・・
一通り調べて分割するところまでは自力で出来たんですが
左メニューのリンクをtargetで右に表示させる方法を何とか探してる最中です。
もう少し頑張ってみますです。
出来上がったらソースを提出するのでダメだしお願いできますか？
0652nobodyさん
04/01/13 23:54ID:???HTMLの理解はCGIをやる上での前提事項だ。
これが一通りできないのであれば、CGIはやるべきではない。
出直してこい。悪いことは言わない。
基礎がないのに応用ができるわけはない。
これは、マジな忠告だ。
0653未承諾広告※ ◆aiY4htt2.2
04/01/14 00:26ID:???もしかしてそのお陰？で、不思議マークアップを吐き出す CGI スクリプト類が氾濫しているのだろうか？
0656nobodyさん
04/01/14 07:03ID:???PHP的な処理で本当にフレーム分割しようとするとかなりの手間。
実はCSSとかJavaScriptでフレームっぽい外見/仕様にするだけなら比較的簡単。
http://www.42ch.net/UploaderSmall/source/1074031258.dat
（表示できない場合拡張子をhtmに）
もう少し練れば美しくできると思う。
ただ、ブラウザによっては小汚くなる。
0657nobodyさん
04/01/14 07:09ID:???で、美しさよりもフレーム分割っぽい外観に似せる事を重視してる。
美しくするにはどうすれば、とか、JavaScriptで実装するには？とかはweb製作板の人間に聞いてくれ。
0659nobodyさん
04/01/14 14:00ID:???サンプル
http://www.kent-web.com/bbs/yybbs/yybbs.cgi
配布URI
http://www.kent-web.com/cgi/down.cgi?down=www.kent-web.com/dload/yybbs.lzh&name=YY-BOARD
プロキシ経由での連続投稿プログラム使用を禁止したいのですが、設定では特定IPしか
弾けないのでどのように改造したら良いでしょうか。
0660nobodyさん
04/01/14 15:19ID:???ページをつくればいいよ。
0662nobodyさん
04/01/14 18:56ID:???所用でＰＣ触る機会がなく今日ようやく時間ができたのでお礼だけ書かせてください。
>>548さん、丁寧な解説感謝です。ずっと「これでいいんだろうか・・・」って引っ掛かっていたものがなくなりました。
まだここを見てくれてるかわかりませんが、本当に助かりました。ありがとうございました。
0663nobodyさん
04/01/14 19:54ID:???proxyとは限らずに、連続投稿自体を制限すればいいんではないのか？
# ここに質問書き込む奴って、そういう仕様部分のツメも甘い気がする。
0665nobodyさん
04/01/15 04:00ID:???0667nobodyさん
04/01/16 04:22ID:???ttp://pc2.2ch.net/test/read.cgi/hp/1067286961/l50
から誘導されてきました。
ttp://specters.net/cgipon/yoyuuha/
の余裕派掲示板なのですが、（cgiのあるところ、ttp://specters.net/cgipon/yoyuuha/yyh_262.zip）
UAの取得がなされていないので、「UAの取得」に関する記述を、どこ（何行目）にどのように差し込んだら取得されるのかがわかりませんでした。
わかる方、お教えくださいますようお願いいたします。
0668667
04/01/16 07:07ID:???同じURIで振り分けを実装してるということは何らかの形でUAは取得しているのでしょうか？
あと、最近のAUはmobile browserなので、振り分けをi-mode用にしたいんです。
0669nobodyさん
04/01/16 18:23ID:???遅くなってすまん、誘導した本人だ。
UAは取得しているよ。
2033行目の
# [ ブラウザのチェック ]
の下でね。
わるいけど、俺はお前が何をしたいのかさっぱりわからん。
0670667
04/01/16 22:32ID:???ありがとうございます。
やりたいのは、
１．UAを掲示板のログファイルに記録して、出力する。
２．AUがPC版を表示するのをi-mode版を表示するようにする。
の二点です。
0671nobodyさん
04/01/17 21:00ID:???248:
$tit,$mes,$adm,$tim,$ipa,$rmh) = split(/,/,$_);
$tit,$mes,$adm,$tim,$ipa,$rmh,$ua) = split(/,/,$_);
328:
<!-- [$ipa($rmh)] -->
<!-- [$ipa($rmh):$ua] -->
390:
$tit,$mes,$adm,$tim,$ipa,$rmh) = split(/,/,$print[0]);
$tit,$mes,$adm,$tim,$ipa,$rmh,$ua) = split(/,/,$print[0]);
410:
$ipa = "<FONT color=$coladm size=-1>[$ipa$rmh]</FONT>";
$ipa = "<FONT color=$coladm size=-1>[$ipa$rmh:$ua]</FONT>";
1413:
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh)
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh,$ip)
2313:
$cipa = $ENV{'REMOTE_ADDR'};
$cipa = $ENV{'REMOTE_ADDR'};$cua = $ENV{'HTTP_USER_AGENT'};
2336:
$input = "$cnam,$cmal,$curl,$cico,$ctit,$cmes,$cadm,$ctim,$cipa,$crmh";
$input = "$cnam,$cmal,$curl,$cico,$ctit,$cmes,$cadm,$ctim,$cipa,$crmh,$cua";
0672nobodyさん
04/01/17 21:01ID:???2371:
$rmh = (split(/,/,$log))[11];
$rmh = (split(/,/,$log))[11];$ip = (split(/,/,$log))[12];
2379:
$log[11] = $rmh;
$log[11] = $rmh;$log[12] = $ip;
2391:
$log[11] = $rmh;
$log[11] = $rmh;$log[12] = $ip;
１．は、これでいいと思う。
２．は、AUのUAがわかんねー
0673nobodyさん
04/01/17 21:03ID:???1413:
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh)
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh,$ua)
0674未承諾広告※ ◆aiY4htt2.2
04/01/17 22:41ID:???0675667
04/01/18 01:03ID:???ありがとうございます。さっそく作業に取り掛かります。
AUのUAはUP.Browserを含んでいると思います。
関係ないですが、AUのUAって回文みたいですね。
0676nobodyさん
04/01/18 05:27ID:???2371:
$rmh = (split(/,/,$log))[11];
$rmh = (split(/,/,$log))[11];$ua = (split(/,/,$log))[12];
2379:
$log[11] = $rmh;
$log[11] = $rmh;$log[12] = $ua;
2391:
$log[11] = $rmh;
$log[11] = $rmh;$log[12] = $ua;
インフルエンザかな？
0677nobodyさん
04/01/18 05:34ID:???> 最近のAUはmobile browserなので、振り分けをi-mode用にしたいんです。
俺携帯に疎いから、よくわかんないけど
未承諾広告※タソ紹介の技術情報を見ると、
> au C3001H であれば、
> 「HTTP_USER_AGENT=KDDI-HI21 UP. Browser/6.0.2.254(GUI) MMP/1.1」と表示されます。
と書いてある。
これだと、2080行目の
elsif ($mob{car} eq 'UP.Browser') {
に引っかからないのがまずいのかな？
elsif ($mob{car} =~ /UP.Browser/) {
これでどうだろうか？
0678667
04/01/18 09:08ID:???ありがとうございます！完璧です。
あとはソースいじくって4.01strictにすれば完成します。ありがとう御座いました。
どうしようもなくて途方にくれてたので心底助かりました。
0679nobodyさん
04/01/18 11:44ID:???喜んでいる所で申し訳ないが･･･
修正 その３ （＾＾；；；
1413:
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh)
($num,$key,$nam,$mal,$url,$ico,$tit,$mes,$adm,$tim,$ipa,$rmh,$ua)
（ま、ここのブロックでは使わないからどうでもいいが･･･）
完全にインフルエンザだな。
病院に逝ったほうがいいな。
0680nobodyさん
04/01/18 11:55ID:???0681nobodyさん
04/01/18 18:07ID:???「○ sec たたないと書けません。（○回目、○ sec しかたっていない。）○」
と言うのを表示させたいのですが、○回目の所を1回表示ごとに1増加することがどうやるか分かりません。
規制に入れるのは考えなくても良いです。
お願いします。
0683681
04/01/18 18:32ID:???(1) どの掲示板スクリプトにも対応
(2) 2chの様に「○ sec たたないと書けません。（○回目、○ sec しかたっていない。）○」と表示させる。
(3) 詳しく考えて、、○回目の所を1回表示ごとに1増加することがどうやるかだけ、分からなかった
これで宜しいでしょうか？
0684nobodyさん
04/01/18 18:43ID:???(1)の条件を満たすためには、スクリプトのかけらそのものではなく考え方を提示するしかない。
なので、そのものずばりを求めているならとっとと帰れ。
やりたいことはなんとなくわかったが、そのためには、アクセスしてきたマシンを一意に特定する必要がある。
この辺は、IPアドレスや、それにユーザーエージェントを併用するのが普通だろう。
これによってユーザーを特定した後、それぞれのユーザー毎に、
「最終書き込み時刻」と「その時刻以降のアクセス回数」を保存するようにすればよい。
アクセスがあった時に、以前のデータを見て表示用テキストをいじり、
現在のデータを新しい数値に変えて保存すると、上記実装が完成するだろう。
データの保存は、ファイルをflockするなり、データベースを使うなり様々な方法があり、
それらの選択はスクリプト作成者の知識と技量に左右される。
オマエの提示した条件ではこれ以上詳しくは無理だ。
さあ、教えてやったんだからとっとと帰れ。
0685681
04/01/18 19:09ID:???おかげでできました
0686nobodyさん
04/01/18 21:09ID:???このCGIなんですが、携帯電話からでも遅れるようにしたいんです。
http://www5a.biglobe.ne.jp/~fnao/cgi_nao/chukyu3.htm
ここにスプリクトがあります。
自分でも試みてみたんですが、
http://members8.tsukaeru.net/tatsuya7bom/cgi-bin/mail.htm
http://members8.tsukaeru.net/tatsuya7bom/cgi-bin/mail.cgi
エラーで設置すらできませんでした。
無知な自分ですが、アドバイスなどよろしくおねがいします。
0687nobodyさん
04/01/18 22:33ID:???設置すらできないものが改造とか抜かすな。
設置できないものの大半は設定ミスだ。
自分の使ってる鯖のPerlのパスとかsendmailのパスとかをよく調べろ。
0688686
04/01/18 23:08ID:???設置しました。しかし携帯から送信しようとすると、
cgi-lib.pl:Unknown Content-type:application/x-www-form-urlencoded;charset=shift_jis
となります。ezwebなのですが、対処法はありますか？
0689nobodyさん
04/01/18 23:32ID:???cgi-lib.pl が文句たれてるんだろ？
携帯の仕様を変更するのは事実上不可能だから、
1.cgi-lib.pl を改造するか
2.cgi-lib.pl を使わないで、他のものを使うように改造するか
だろ？
推測できるお前の実力からして、どっちもオススメはできないが、
しかしこれしかないな。
1.はライブラリの意味がなくなるのでそもそもスマートな方法ではない。
2.が妥当だろうし、代替手段としてCGI.pmもある。しかし、
http://perldoc.jp/docs/modules/CGI.pm-2.89/CGI.pod
これ読もうとする意思があるかどうかが問題になる。
言っておくが、「誰かが解答のスクリプトを提示してくれる」みたいな甘いことは考えるなよ。
0690nobodyさん
04/01/19 00:01ID:???嘘つきのマルチは氏ね
http://pc2.2ch.net/test/read.cgi/php/1011174442/80-
0692667
04/01/19 02:09ID:???ありがとうございます。>>673と同じ内容ですよね？
うまくいきました。
> 完全にインフルエンザだな。
危険ですので早めにいかれた方がいいですよ。ご自愛を。
0693nobodyさん
04/01/19 23:43ID:ueJIFoYfhttp://cuo.press.ne.jp/cgi/b05_1.html
ここで紹介されているユーザー専用アイコンを設定するのを加えたいんですけど
v4.1をベースに改造ポイントが指摘されてるため上手く出来ない状況です
”2.処理を加える”という所で似てるポイントだと思いyyini.cgiの298行目に加えたらエラーが出たりして
この処理をどこに加えたらいいのかわからず困ってます。
ソースですがKENTさんのとこのそのままですが
http://page.freett.com/yataro/yyini.txt
http://page.freett.com/yataro/yybbs.txt
アドバイスよろしくおねがいします。
0694nobodyさん
04/01/20 21:03ID:???……アドバイスったってなあ。
なんでレスつかないか自分で理由わかってる？
まあいいか。
v4.1を手に入れて改造するのはどうかね。一番キミ自身の労力が少ないと思うのだが。
0695nobodyさん
04/01/21 07:26ID:???書き込み処理を行なっているのはyyregi.cgiなので、こっちを改造するのが正解。
sub formCheck内、L.405付近の管理用アイコン直前かね。
多分そのままコピペでいけると思うが、確認はしてない。
wwini.cgiを改造したいならL.375付近だろうけど、wwregiをいじる方をお勧めする。
0696695
04/01/21 07:27ID:???最終行、wwregi→yyregi、wwini→yyini に訂正。
0697693
04/01/21 12:31ID:KLRTDEd/>>696
どうも。yyregiの405行目あたりに加えてみました。
ただ書き込もうとすると500のサーバーエラーが出て加えた文で何が原因かわからない状況です。
すいませんけどわかる方いましたらよろしくお願いします
http://page.freett.com/yataro/yyregi.txt
0698nobodyさん
04/01/21 19:24ID:???な？ 仏心出したっていいことないって、こんな手合いにはさ。
>>697
いいところ教えるから、もう二度と他人の手を無用にわずらわせるなよ？
http://www.kawa.net/xp/index-j.html
KCatchだ。しっかり使えよ。
0699nobodyさん
04/01/21 19:56ID:???0700インド人プログラマ
04/01/21 20:10ID:???0701nobodyさん
04/01/21 20:45ID:???500エラーくらい対処できるスキルが無いと困るよ。
君のPCにPerl は入ってないの？
まさかローカルでテストせずに、共有サーバでテストしてるんじゃないだろうな。
それはいかんぞ。
Perl入れてりゃ、perl -cw yyregi.cgi って打ち込めば、エラーを表示してくれるだろうに…
また、3行目に
use CGI::Carp qw(fatalsToBrowser) ;
って入れてエラーをブラウザに表示汁って手もあるがな。
それとさ、エディタはどんなエディタ使ってる？
全角スペースが見えるエディタを使いなよ。
http://page.freett.com/yataro/yyregi.txt には変な所に全角スペースが入ってる。
スクリプトを詳細に見てないが（KENTは見る気が起こらない）
ま、そこが原因かな？
0702nobodyさん
04/01/23 13:58ID:meUkJhrG２ちゃんねるのように半角かなだけの投稿にも文字化けを起こさずに対処させるにはどうすればいいでしょうか。
元々半角かなは一切使えない掲示板だったのですが、ゼロちゃんスクリプトを参考に自分なりに改造してみた結果以下のようなデコード処理に行き着きました。
ttp://www.geocities.co.jp//HeartLand-Cosmos/9800/de.txt
拙い文章で申し訳ありませんがご教授の程よろしくお願いします。
0703702
04/01/23 14:35ID:meUkJhrGおもっきり過去ログに出てました・・・＿l￣l○
http://pc2.2ch.net/php/kako/1047/10478/1047806915.html
の149さんからの流れを参考にjcodeg.plを取り入れてみたところＰＣ閲覧においては解決しました。
ただ、携帯電話で見た場合にスクリプトエラーが発生してしまったので、携帯のコード処理部
jcode::z2h_sjis(\$message);
をコメントアウトしたところとりあえず大丈夫みたいです。
ただこの場合、メインのデコード部の
&jcode'convert(\$val,'sjis');
&jcode'convert(\$nam,'sjis');
を削っても表示自体はされるようなのですが、閲覧者さんの各環境を考慮する場合この処理は消さずに残しておいた方がいいんでしょうか・・・
質問ばっかりですみませんがよろしくお願いします。
0704nobodyさん
04/01/23 18:33ID:???残しておいて問題はない。漏れなら残しておく。
日に数千の書き込みがあって、負荷が問題になってるとかなら話は別だけど。
削ると、極めて昔（Windows3.1とかの時代）のMac/Unix環境で化けるかもしれない。
気にしたいなら構わないけど、そこまで行くと趣味の領域になってくると思う。
0705702
04/01/24 00:21ID:???返事が遅れて申し訳ありませんでした。
＞動いているコードに手を触れるなという格言がある。
これ、すごく胸に響くものがありました。
正直、レスがないままだったらたぶん消してたと思うのですがそのまま残しておくことにします。
御助言ありがとうございました。
0706nobodyさん
04/01/24 02:13ID:E5Iw/RSh携帯用ページで、投稿された写真に返信があったとき
返信ありのリンクの横に何件レスがあるか数字を表示させたいです。
scriptをどう改造すればいいかお知恵貸してくださいm(_ _)m
http://goa.k1.xrea.com/j.php?id=2&page=
↓返信ありの表示部分？
$rescom = "";
$path=dirname("http://".$SERVER_NAME.$PHP_SELF);
$fd2=fopen($res,"r");
while (!feof($fd2)) {
$buffer = fgets($fd2, 4096);
$data = explode("<>", $buffer);
if($data[0]==$id) $rescom = "<br>>> <a href=\"$path/chtml.php?res=$id&page=$page\">返信あり</a>";
}
fclose($fd2);
↓res.logの中身
1<>1074872857<>てすと<>てすと<>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
1<>1074873090<>あいうえ<>あかさた<>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
1<>1074875789<>どうですか？<>そうですか<>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
2<>1074876582<>?<>ぉぉぉﾃｽﾄ<br><>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
2<>1074877568<>いごっそ<>いごっそ<>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
2<>1074877795<>くるぶし<>ぺやんぐ<>pc<>211.6.49.226<>Mozilla/4.0 (compatible; MSIE 6.0; Windows 98; (R1 1.3))
宜しくお願いしますm(_ _)m
0707nobodyさん
04/01/24 18:51ID:yESrv3M6シンプルなBBSの改造をしたいんだけど
改造初心者なので誰か助けてくらさい
http://www.rescue.ne.jp/cgi/bbs/
１ 題名をなくしたい（「題名」フォームの部分を消したら「題名を入力してください」とエラー）
２ 削除キーをなくしたい
３ 記事が入力通りに改行されるようにしたい
４ 出力文字サイズを変えたい
最近配布を始めたCGIらしいのでサポートとか少なくて、
改造されたものもあんま配布されてないみたいだったんで…
誰か助けて
設置は無事出来ました
0709nobodyさん
04/01/24 19:13ID:???0711nobodyさん
04/01/24 19:53ID:???0712nobodyさん
04/01/24 21:17ID:???どこがだろ？
0714nobodyさん
04/01/25 01:46ID:???これだけデータ構造とかがわかってて、どうしてできないのかむしろそっちが不思議。
関係のある書き込みの数をカウントすればいいだけの話だろう？
0715706
04/01/25 02:14ID:9zQH+F4Mなんとなーくココかな？って部分は予想できるんですけど、
スクリプトの記述はまったくわからないです…
流れは、参照したres.logの先頭の1とか2のid番号をカウントして、
それを表示させるんですよね。
投稿されたログに連番を付ける箇所にすごいヒントがあるような…
でもどう書いてやればいいのか(; ;)?
$lines = file($log);
$st = (!$_GET['page']) ? 0 : $_GET['page'];
for ($i=$st; $i<$st+$page_def; $i++) {
if ($lines[$i] == "") break;
$imgsrc = $body = $subject = "";
list($id, $ptime, $subject, $from, $body, $att,) = explode("<>", $lines[$i]);
助言くださいm(_ _)m
0716nobodyさん
04/01/25 04:01ID:A2CJsmcEPerlでユーザーを追加するスクリプトをｺｰﾃﾞｨﾝｸﾞしているんですが、
パスワードの作成で躓いています。
シェルの内容は以下の通りです。
#!/usr/bin/perl
open(IN, "userlist.txt");
while($user=<IN>){
@user=split(/,/,$user);
`useradd $user[0]`;
`passwd $user[1]`;
}
でuserkist.txtの内容は、
user,pass
user1,pass2
です。
パスワードの設定がどうしてもうまくいきません。
どなたかご教授お願いします。
0717nobodyさん
04/01/25 04:38ID:???0718nobodyさん
04/01/25 13:00ID:A2CJsmcEてゆうか、分からないだけでしょ。
■ このスレッドは過去ログ倉庫に格納されています