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

★三　【スクリプト改造工房 PART 8 】　★三 at PHP

[1からを表示]
50:nobodyさん
04/03/16 20:51
>>48の質問に>>47の回答が来てからでよかったのだが。
私の経験からちょっと一言二言…
●画像アップ数増加
画像は一枚ずつUPするように設計した方が良いと思う。
submit一回で複数枚の画像をUPしたら、タイムアウトって事があった私のスク。

●画像の自動縮小表示
設置するサーバはImage::Magickは使えるの？
使えるなら画像をUPしたときについでにサムネイルを作っておけば、タグで縮小表示することもないよ。

両方ともそんなに難しくないから、教えてくれる香具師はいると思われ。

51:47
04/03/16 20:52
＞48
プログラミング経験は無いですから、自身のある無いは判断しかねます。
どこのスレに質問していいかわからずに、誘導されてここで3スレ目なので、
とりあえず自分の頭にある範囲で、もう少し詳しく書きますので、移動するべきか判断願います。
HTMLのタグなんかは、調べながらでもなんとかなるのですが、多分私の要求だと、Ifで分岐とかさせないと駄目ですよね？
そうなると、perlの知識とかが無いので、辛いわけです。
ですので、何行目にこのソースを組み込めとか、そういったアドバイスがいただければ、とりあえずはなんとかなると思います。

検索エンジンについては、METAタグにNO ROBOTとか、その程度で大丈夫なのか不安なものですから、CGIで何か回避策があるとか、
そういったアドバイスをいただけたらと思ったわけです。

52:47
04/03/16 20:57
＞48
ありがとうございます。
画像アップ数の件については、TRY&ERR繰り返して、現在仮設置でテストした段階ではうまく動作してますので、大丈夫だと思います。

自動縮小の件については、”Image::Magick”というものがわからないので、今夜にでも調べておきます。
一応、絵日記ですので、範囲内の画像はそのままで表示したいというのと、サーバ容量節約の意味もあり、
サムネイルを別に生成するということなら、避けたいかなと現段階では思っております。

53:47
04/03/16 20:58
↑
４８さんじゃなくて、＞５０さんでした。
すんません。

54:nobodyさん
04/03/16 21:14
★三　【スクリプト改造工房 PART 8 】　★三
ｽﾚﾘﾝｸ(php板)l50

【スクリプト改造依頼スレ】(丸投げ)
ｽﾚﾘﾝｸ(php板)l50

上記２つの改造スレの棲み分けについて。

> 何行目にこのソースを組み込めとか、そういったアドバイスがいただければ
これを望んでいるのなら、丸投げスレです。

55:47
04/03/16 21:18
わかりました、4スレ目いってきます・・。(´･ω･`)

56:nobodyさん
04/03/18 14:02 PjZX6E/F
すいません　おしえてください。
掲示板CGIで
print "$data->[4]/$data->[5]\n";
というラインで
ログデータから日付と時刻を取得し表示しているんですが、
この表示結果は
2004/03/18/09:11:57
という表示形式で表示されるのですが、
これを
3/18 09:11
にするにはどうしたら良いのでしょうか？
VBでいう所のFormatみたいな関数があるんでしょうか？

57:nobodyさん
04/03/18 14:12
>>56

>>1

58:nobodyさん
04/03/18 19:45
>>56
全体晒さにゃどうにもならん。
最低でもその前後十行は必要。

59:nobodyさん
04/03/19 10:21
（1/2）こんにちは、質問いたします。
URL転送サービスを利用しようと思っているのですが、リファがうまくとれません。

URL転送サービス　→　フレーム式　URLﾘﾝｸ(www3.to)
アクセス解析　→　有限工房　アクセス解析
URLﾘﾝｸ(yugen.main.jp)

解析を貼る場所に、このjsをはりつけるのですが
<SCRIPT language="JavaScript">

</SCRIPT>

60:nobodyさん
04/03/19 10:23
(2/2) 私のｻｲﾄはトップページ自体がフレームということもあり、
お気楽極楽スクリプト→フレームを利用したページにアクセス解析を設置する
URLﾘﾝｸ(www.bayashi.net)
を参考にして、

<SCRIPT Language="JavaScript">

</SCRIPT>

このようにいたしました。

ところが、いざ動かしてみると「アクセスが拒否されました」と
＞　document.write(buf = escape(parent.document.referrer));
ここで、エラーが出てしまいます。
※URL転送（フレーム式）を使わなければ、エラーが出ずに処理できるのですが。

きちんとリファをとる方法がわかりません。どうぞよろしくおねがいします。

61:nobodyさん
04/03/19 11:57
>>59-60

>>1

62:nobodyさん
04/03/19 15:54 SrVWHGyk
こちらの書き込みでいいのかわからないんですが、質問です。。
ページ内検索で、検索結果の表示を横１列に結果が3つ入るように
┏━┳━┳━┓
┃１┃２┃３┃
┣━╋━╋━┫
┃４┃５┃６┃
┗━┻━┻━┛
こんなかんじで表示させたいと思っています。
検索エンジンcgiや、カゴレジなどの検索結果表示を見ても
横１列に商品が一つなので参考に出来ませんでした。。
KENTにもあったのですが、いろんな機能が追加でなされているので
判断しにくくて・・・。。すいません。

どこか参考になるサイト、またはいい検索用語など
ありませんでしょうか？
どのように検索したらいいか悩んでおります。。
なにかいいアドバイスをお願い致します。

63:nobodyさん
04/03/19 16:05
>>62
<table>って知ってる？

64:62
04/03/19 16:09 SrVWHGyk
>>63
知ってます。
でも、３件で折り返す、という方法が
どうすればいいのかわからないんですが・・

65:nobodyさん
04/03/19 16:18
ここは改造スレなんだが。
自分でやる上でのアドバイスが欲しいなら>>1をよく読め。

66:62
04/03/19 16:48 SrVWHGyk
>>65さん
申し訳ないです。
URLﾘﾝｸ(www.geocities.jp)
にUPしてみましたが、（さらにソースで表示しないとダメみたいです・・）
上記に追加しようと思っています。

完成イメージは
URLﾘﾝｸ(www.geocities.jp)
見たいな感じです。。

適当で申し訳ないです。

67:nobodyさん
04/03/20 04:22 GW6tuM2Y
スイマセン質問させてください。

URLﾘﾝｸ(tackysroom.com)

このCGIのスケジュール帳の、開いた時に表示される月を、当月でなく
他の月（例えば今なら5月とか）にしたいのですが、どこをどう
いじればよろしいでしょうか。

諸先輩方、お教えくださいませ。

68:nobodyさん
04/03/20 11:23
>>67

>>1

69:nobodyさん
04/03/20 12:19
>>62 >>66
#!/usr/local/bin/perl

use strict;
require 'cgi-lib.pl';
my $cgi = "kensaku.cgi";
my $file = "db.csv";
my %in;
&ReadParse(\%in);
print &PrintHeader();
#print &HtmlTop("");

print <<"_HTML_";
<HTML>
<HEAD>
<STYLE type="text/css">

</STYLE>
</HEAD>

70:nobodyさん
04/03/20 12:21
<BODY style="padding-top : 0px;padding-left : 0px;padding-right : 0px;padding-bottom : 0px;margin-top : 0px;margin-left : 0px;margin-right : 0px;margin-bottom : 0px;">
<form action="$cgi" method="post" style="padding-top : 0px;padding-left : 0px;padding-right : 0px;padding-bottom : 0px;margin-top : 0px;margin-left : 0px;margin-right : 0px;margin-bottom : 0px;">
<input type="text" size=15 name="name">
<input type="submit" value="商品検索">
</form>
_HTML_

if ($in{'name'} ne ""){
　my $flag=0;
　my $found=0;
　open (IN,"$file") || &CgiDie ("データファイルが開けません。");
　while (<IN>){
　　chomp;
　　my ($name,$teika,$hanbai,$image) = split(/,/,$_);
　　if ($in{'name'} eq $name){
　　　if ($found == 0){
　　　　print qq(
<BR>
<TABLE border="0" cellpadding="0" cellspacing="0">
<TBODY>
);
　　　}
　　　if ($found % 3 == 0){
　　　　print qq(
<TR>
);
　　　}

71:nobodyさん
04/03/20 12:22
　　　print qq(
<TD>
<TABLE border="0" cellpadding="3" cellspacing="0">
<TBODY>
<TR>
<TD align="center" class="a"><IMG src="image/$image.jpg" border="1"><BR>
<BR>
<B><FONT color="#666666">商品名<BR>
<BR>
</FONT></B>
<TABLE border="0">
<TBODY>
<TR>
<TD align="right">定価：</TD>
<TD>$teika</TD>
</TR>
<TR>
<TD align="right">販売価格：</TD>
<TD><FONT color="#666666">$hanbai</FONT></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
);

72:nobodyさん
04/03/20 12:24
　　　$found++;
　　　if ($found % 3 == 0){
　　　　print qq(
</TR>
);
　　　}
　　　$flag=1;
　　}
　}
　close (IN);
　if ($flag == 1){
　　if ($found % 3 == 1){
　　　print qq(
<TD>
</TD>
<TD>
</TD>
</TR>
);
　　}elsif ($found % 3 == 2){
　　　print qq(
<TD>
</TD>
</TR>
);
　　}

73:nobodyさん
04/03/20 12:24
　　}
print qq(
</TBODY>
</TABLE>
);
　}
　($flag) || print "$in{'name'}はデータファイルにありませんでした。<p>\n";
}
print &HtmlBot();
exit;

74:nobodyさん
04/03/20 12:27
説明よりやったほうが早いから全部書いたけど丸投げスレのほうが良かったかも。

75:67
04/03/20 16:17 GW6tuM2Y
すいません>>67です。
再度質問です。

スクリプトはこれです。

URLﾘﾝｸ(hy-t.hp.infoseek.co.jp)

これだけでいいでしょうか？
よろしくご教授お願いいたします。

76:67
04/03/20 16:25 GW6tuM2Y
あ、これって丸投げ行きなんでしょうか…
ｽﾚ違いなら移動します、すいません。

77:nobodyさん
04/03/21 11:32 J3gw5AMh
６２＞
掲示板みたいに縦一列に吐き出す香具師でも、CSS使えば横に並べ、
指定数で折り返す事もできるよ。

#wrapper{
width: 630px;
}

#box{
float: left;
width: 200px;
margin: 10px 5px 10px 5px;
padding: 0px 0px 0px 0px;
}

<div id="wrapper">
　　<div id="box">
　　　　コンテンツ
　　</div>
</div>

みたいな感じでさ。
ブラウザ選ぶかもしんないけど、漏れの環境（Win IE5 IE 5.5 IE6）
だと思うように表示されたからいいべ。

78:nobodyさん
04/03/22 07:21
皆様初めまして。

URLﾘﾝｸ(mo-mo.vis.ne.jp)
こちらで配布されているチャットで参加者表示の部分を
名前（状態）:名前（状態）
というように状態（ROM等）を表示させたいと思っています。
$nameを参考に$conを作って試行錯誤してみたのですが
自分の入力した状態が他の方の状態にも適用されてしまいます。
名前A（状態A）:名前B（状態B）としたい所が
名前A（状態A）:名前B（状態A）になってしまうといった具合で。

URLﾘﾝｸ(www.lislis.info)
余計な部分まで触ってあるかもですが・・・。
何卒ご教授お願い致します。

79:nobodyさん
04/03/29 16:03
スクリプトを改造しているけどうまくできない場合のヘルプはこちらで。

配布先でアドバイスが得られない場合、ここで聞けば
親切な人が助言してくれるかもしれません。

依頼テンプレ

【.　 CGI名　.】　複数のバージョンがある場合には正確に　　　　　　　（必須）
【配布先URL】　教えてくれる人が参照する場合があるので　　　　　　（必須）
【. 置き場所 .】　配布先が閉鎖の場合、すぐ見られるようtxtなどで
　　　　　　　　　　upした場合、デザインをhtmlで作成した場合など　　（任意）
【ヘルプ内容】　どのように改造したくてどのようにうまくできないか　　（必須）
　　　　　　　　　　機能・動作などを簡潔かつ詳細に

80:nobodyさん
04/03/29 17:00
>>79
改造中のスクも提出した方がいいな。

81:nobodyさん
04/03/31 19:21
【.　CGI名　.】　apeboard plus.cgi　　　　　　
【配布先URL】　URLﾘﾝｸ(www.2apes.com)
【スキン名】　イメージダイアリー　Ver.2
【配布先URL】　URLﾘﾝｸ(www.s-chimp.com)
【. 置き場所 .】　URLﾘﾝｸ(ea.uuhp.com)　(CGI)
　　　　　　　　　　URLﾘﾝｸ(ea.uuhp.com)　(スキン)
【ヘルプ内容】　過去ログを読もうとすると「/back」というファイルに飛ばされてしまい、
　　　　　　　　　　読むことができません。過去ログを読むようにするには
どこを改造すればいいのでしょうか？
　　　　　　　　　　スキンのデザインには多少手を入れましたが、CGIはほとんどいじってません。
　　　　　　　　　　よろしくお願いします。

82:８１
04/04/01 22:05
すいません解決しました…。

83:nobodyさん
04/04/07 23:29 opKZAzOm
こっちは寂れているのぅ

84:未承諾広告※ ◆TWARamEjuA
04/04/08 10:16
ま、ぼちぼちと行けばよいでしょう(^o^) ﾏﾀｰﾘ

85:nobodyさん
04/04/09 22:18 47xZN9AW
【.　 CGI名　.】　SmallPICT
【配布先URL】　URLﾘﾝｸ(hdml.cside.com)
【ヘルプ内容】　spictlog.cgiに書き込む情報を追加したいが、うまく出来ない

pc.plのsub dispForm内に<input type='text' name='kaizou'>を追加し、
smallpict.cgiのsub doWrite内に<>$kaizou<>を追加するなどして動かそうとしたんですが、
投稿画面で入力したkaizouのデータがspictlog.cgiに書き込まれません。

改造漏れがあるんだと思い探し回ってみましたが、見つけることができませんでした。
具体的にやりたいのはPC上でのアイコン表示で、手動でログに<>*.gif<>と書き込んで記事上で表示させる改造はできましたが、投稿画面のデータをうまく渡す改造ができませんでした。

よろしくお願いします。

86:nobodyさん
04/04/09 22:40 ria3nPCP
>>85
ログは<>区切りで書き込むところがあちこちあるようだけど
漏れなく全部に<>$kaizou<>を追加した？
もちろん読み込み時に<>でsplitする部分もあちこちあるから
そこにも受け取る変数を増やさなければならないが。
そういう部分はsmallpict.cgiだけじゃなくいくつものファイル内にあるぞ。

87:85
04/04/09 23:28 47xZN9AW
>>86
レスありがとうございます。

split(/<>/)とid<>で検索を掛け、引っかかった所で書き込みに関係あるところは<>$kaizou<>を追加しました。
投稿画面から投稿してFTPでログを落として書き込まれてるかを確認という方法でいじってるんですが、
$kaizouに上手くデータが渡ってないため、<><>とだけ書き込まれています。
読み込み部分はあっさり改造できたんですけどね・・・orz

88:nobodyさん
04/04/09 23:59
>>87
フォームデコード部で受けた値は$in{'kaizou'}に入るようだが、
それを$kaizouに代入してるのか？

89:85
04/04/10 00:35
sub doWrite内の
$newUpwd = $in{'upwd'};の下に
$newkaizou = $in{'kaizou'};
を書き足し、
# 親記事の場合
# レス記事の場合
の最後を
<>$UNIQUEID<>$newkaizou<>\n");
としてあります。
お手数掛けますですorm

90:nobodyさん
04/04/24 08:05
kentの夢カウンタなんですが、
（URLﾘﾝｸ(www.kent-web.com)）
時計表示という機能も付いてるんですが、
年、月、日、時、分　というデフォルト表示から
年、月、日（曜日）、時、分　に変更したいのですが、
どのようにすればよいでしょうか？
曜日表示は画像でなくてhtml出力でも構いませんので。

91:nobodyさん
04/04/25 18:20
kentのPetitBoardの携帯対応版ってありません？

92:nobodyさん
04/04/25 18:23
　

93:nobodyさん
04/04/26 00:12 WNaDiJfM
URLﾘﾝｸ(www.kent-web.com)

joyful.cgiの投稿画面を別のページにしたいのですが
そこで↓ここで改造版をみつけたのですが、
URLﾘﾝｸ(www.handley2.fsnet.co.uk)
名前欄だけを増やしたいのです。
投稿画面にも名前欄を増やし、ログにも$nameで追加したのですが
かきこまれません。

94:nobodyさん
04/04/26 01:05
>>90
dream.cgiのsub get_timeでlocaltimeを[1..5]だけ受けているから曜日の分も
受け取って使えばいいだけ

95:nobodyさん
04/04/26 01:10
>>93
投稿画面が別のページの改造版ってどれのことだ？
それに改造したコードも晒さずに言われても間違っているか足りないから
としか言いようがない

96:93
04/04/26 01:39
あ。
ここの
URLﾘﾝｸ(www.handley2.fsnet.co.uk)
violet diaryってやつです。

97:nobodyさん
04/04/26 02:00
で、ログに追加する$nameっていうのはどうやって得ているんだ？
sub decodeを見ればわかるがフォームに追加した項目に相当する
$in{'キー'}に入っている値を$nameへ代入しているのか？

98:nobodyさん
04/04/26 02:39
スクリプト：PHPぁぷろだ（シンプル版）
ソース：URLﾘﾝｸ(php.s3.to)
　　　　　up.zip内のupload.php
配布元：URLﾘﾝｸ(php.s3.to)
ヘルプ内容：
元の仕様ではダメ文字（ソや表など）をファイル名に入れると
拡張子より前のファイル名が消えてしまいます。
例：ソース.jpg　→　.jpg

↓ここでは消えてしまいます
URLﾘﾝｸ(php.s1.xrea.com:8080)

しかしながら、このスクリプトを使ってこの問題を回避している
サイトを見つけました。

↓ここでは消えません
URLﾘﾝｸ(cgi.f7.aaacafe.ne.jp)

このように消えないようにするにはどのように改造をすれば良い
のでしょうか。
文字列をいじるのか、エンコード設定をいじるのか・・・イマイチ
良く解っておりません。

よろしくお願いします。

99:nobodyさん
04/04/26 02:44
>>98
配布元に「ﾊﾞｸﾞ報告、要望、その他突っ込みは掲示板へどうぞ」と書いてあるが

100:98
04/04/26 02:45
慌てて微妙にリファ切り抜けてました・・・ﾄﾎﾎ

101:98
04/04/26 02:50
>>99
深夜に即ﾚｽありがとうございます。

配布元で聞いてみます。

102:nobodyさん
04/04/26 17:35
【.　 CGI名　.】　One Line BBS

【配布先URL】　URLﾘﾝｸ(dream.lib.net)

【ヘルプ内容】

ここの一行掲示板、レスが古い順に並ぶようになっているのですが、
これを新しい順に並ぶように改造できませんでしょうか。

103:nobodyさん
04/04/26 17:45
>>102
できますがそれがどうかしましたか？

（´-｀）.｡oO(ここは丸投げスレじゃないからなぁ…)

104:103
04/04/26 17:54
過疎板だからお客さんは大事にしないといけないなと反省。

>>102
ｽﾚﾘﾝｸ(php板:110番)
ここで>>102と同じ依頼をしている香具師がいる。
ｽﾚﾘﾝｸ(php板:111-120番)
あたりを参考にすれ

105:102
04/04/26 18:25
>>103=104
どうもすみません、ありがとうございます。
参考にします。

106:nobodyさん
04/04/27 01:41
(103はいいやつだなあ

107:nobodyさん
04/04/27 23:57
なんか微笑ましいな。。。

108:ken ◆fmJRnC5rvE
04/05/02 11:01 DCaidvkb
配布先:URLﾘﾝｸ(dream.lib.net)に配布されているICHAT
ソース:URLﾘﾝｸ(com.s66.xrea.com)
改造してほしい内容:
参加者表示の部分を
名前（状態）:名前（状態）
というように状態（ROM等）を表示させたいと思っています。

109:nobodyさん
04/05/02 11:08
>>108
ここは自分で改造する人がアドバイスを受けるスレ。

■ 自分で改造できない場合には
【スクリプト改造依頼スレ】(丸投げ)
ｽﾚﾘﾝｸ(php板:324番)（テンプレ）

110:nobodyさん
04/05/08 15:03 jodQmWfe
WebProg初心者から流れてきました。お願いします。
プロフィール登録CGIを探しています。がらくたBOOK(URLﾘﾝｸ(tinkle.cside.com))さんの「すぽっとりんく」に画像アップロード機能が無かったので、
とほほさんのところで配布している「wwwupl2」を組み込んでみようとしたのですがうまく出来ません。

本来ならバナー登録部分に「<INPUT type=\"file\" name=\"AAA\" size=\"40\">」として直接アップさせたかったのですが、うまく動作しませんでした。
そこで、ちょっと方法を変えいくつかの実験をしてみました。
まず、「wwwupl2」を丸々コピーして「spotlink.cgi」内に「sub up{ }」として記入。（もちろん#!/usr/local/bin/perl等は削除）
元々の登録サブルーチン「sub new_entry { }」を「sub new_entry_of_main { }」として退避。
新しく登録サブルーチン「sub new_entry { }」を作り、
print "<FORM method=\"$method\" enctype=\"multipart/form-data\" action=\"$script\"><BR>\n";
print "<input type=hidden name=mode value=\"up\">\n";
print "<INPUT type=\"file\" name=\"AAA\" size=\"40\"><BR>\n";
print "<INPUT type=\"submit\" value=\"送信\"></FORM>\n";
（一部抜粋）を作成。
メインプログラムに「　elsif ($mode eq "up"){&up;}　」を追加。
でも、こうすると、送信を押してもトップ画面（一覧を表示する通常表示画面）に行ってしまいます。
で、何が悪いのかが良くわからなかったため、
<FORM method=\"$method\" enctype=\"multipart/form-data\" action=\"$script\">
これを
<FORM method=\"$method\" action=\"$script\">
こうすると、ファイルはアップされないのですが、「sub up { }」に移動します。（「下記のファイルを受け取りました」だけ表示。）
一体どうしたら良いのでしょうか？
中途半端ですが、ファイルをアップします。
URLﾘﾝｸ(www.geocities.co.jp)
出来るなら、バナー登録部分を「<INPUT type=\"file\" name=\"AAA\" size=\"40\">」として直接アップする方法を教えていただきたいです。
お願いします。

111:nobodyさん
04/05/08 17:50
>>110
multipart/form-data をデコードしていないから。
CGI.pm でも入れてみれば？

(´-`).｡ｏＯ(相変わらずグタグタやねぇ。。。> と)

112:>>110
04/05/09 01:15
>>111
返答ありがとうございます。
>CGI.pm でも入れてみれば？
って事なんですけど、とりあえず、CGI.pmは同じフォルダに入れました。
で、
require './CGI.pm';
として見ましたが状況に変化無しです。
何がいけないのでしょう。
お願いします。

113:nobodyさん
04/05/09 01:47
もじゅーるロードは use を使う。
use CGI;

perldoc -m CGI

114:nobodyさん
04/05/09 04:37
Yomi-Search
モバイル型

115:nobodyさん
04/05/09 04:41
>>114
それがどうかしましたか？

116:nobodyさん
04/05/09 04:58
>>115
丸投げスレじゃないのに丸投げしちゃいました
丸投げスレでもこれじゃあ叩かれますが・・・すいませんでした

117:>>110
04/05/09 11:37
>>113
またまた返答ありがとうございます。
やはり状況に変化無しです。
何か根本的に間違っているのでしょうか…
ファイルアップして置きます。

URLﾘﾝｸ(tool-ya.ddo.jp)

CGI.pmのパーミッションは644でいいですよね?

118:nobodyさん
04/05/09 11:59
>>117
perldoc -m CGI ;

おいおいおーい

119:>>110
04/05/09 12:17
>>118

??
ごめんなさい。まったく意味がわからないのですが、不必要って事なんですか?

120:nobodyさん
04/05/09 12:31
>>119
うむ、
コマンドで打ち込んでごらん、説明が出るから

121:nobodyさん
04/05/09 12:34
perlがインストールされてるマシンで
perldoc -m CGI
で、CGI.pmについての解説が読める。

つまり、それを読んでdecode部とかをmultipart/form-dataを処理するように自分で書き換えましょう、と。
sub decodeで何をやってるか理解できる程度の知識は必要だな。
あ、一応言っておくが、数行追加した程度では無理だぞ。数十行の書き換えが必要。

122:nobodyさん
04/05/09 12:36
それにCGI.pmは標準モジュールぢゃ。
わざわざ>>119がUPする必要も無かろう。

123:nobodyさん
04/05/09 12:42
ついでに
use CGI;
の下に
use CGI::Carp qw(fatalsToBrowser);
と書いておくがよい。
素人には役に立つおまじないぢゃ。

124:>>110
04/05/09 13:04
>>121
何度も回答ありがとうございます。

>sub decodeで何をやってるか理解できる程度の知識は必要だな。
えーと、理解出来てるわけではないので無理だと思います。(T.T)

何度かのやり取りでわかっていただけるかと思いますが、私に出来る事と言えばせいぜい他のCGIから
コピペして帳尻を合わせる程度です。

方法を丸々教えていただくわけには行かないでしょうか?
宜しくお願いします。

125:nobodyさん
04/05/09 13:36
>>124
だから CGI.pm を読みましょうと云っているわけです。
ここはそういう主旨のスレッドですから。

126:>>110
04/05/09 13:55
>>125
では、もう少し努力して見ます('◇';ゞ

>perlがインストールされてるマシンで
>perldoc -m CGI
>で、CGI.pmについての解説が読める。

これは自分のPCでと言う事ですか?それともレンタルサーバでって事でしょうか?
・・・
えーと、バカな事やってるなぁって笑わないでくださいね（;´Д｀）
コマンドプロンプト(XP)からCGI.pmがある場所に移動して「perldoc -m CGI」ってやって見ましたが
だめでした。

借りてるサーバはロリポップです。どこでどうしたら良いのでしょう?
お願いします。

127:nobodyさん
04/05/09 14:10
CGI.pm multipart でググれ

128:nobodyさん
04/05/09 17:04
>>126
おまいはローカルに開発環境が無いのか？
まさか、
ローカルでスクリプトを編集→FTPでUP→500エラー→(◎_◎)　→最初に戻る
してるんじゃないのか？

行き詰ったらこちらへどうぞ。
【スクリプト改造依頼スレ】(丸投げ)
ｽﾚﾘﾝｸ(php板)l50
優しい神様が居られるといいですね♥

129:>>110
04/05/09 22:38
>>128
>ローカルでスクリプトを編集→FTPでUP→500エラー→(◎_◎)　→最初に戻る
その通りです(T^T)

【スクリプト改造依頼スレ】(丸投げ) に逝ってきます。

130:ぷーた
04/05/09 23:44 zdsKN9LG
カウントアップするときに数値を1～9の間でランダムにカウントアップ
させたいのですが、どうすればよいのかわからないのですがだれか教えてくれませんか？

if ($voteflag){
open (IO,"+<$datadir/$id.dat");
eval{flock(IO,2)};
@temp1 = split(/<>/,<IO>);
@temp1 = split(/<>/,&backupload($id)) if $temp1[0] eq "";
if ($temp1[0] ne "datamissing"){
#$temp1[0] = time();
$temp1[11]++;
$temp1[13]++;
$temp1[15]++;
truncate(IO,0);
seek(IO,0,0);
foreach(@temp1){print IO $_."<>";}
close(IO);
}else{
close(IO);
&syslog("AUTO","<font color=purple>データ消失(ID:$id)</font>");
&dataerase($id);
}
}

131:nobodyさん
04/05/09 23:59
$count+= substr('123456789', int(rand(9)), 1);

132:ぷーた
04/05/10 00:20 J17kBtwc
どうもです。　早速やってみます。

133:ぷーた
04/05/10 00:29 J17kBtwc
う～ん上記のスクリプトにどう埋め込んだらよいかわかりません。。
だれか助けて。。

134:nobodyさん
04/05/10 00:42
datのうち、どの部分が「カウント」なのか分からんとどうしようもない。
っつうか、勉強する気がない奴は丸投げスレへ。

135:お願いします
04/05/10 22:25 VaFCZTZV
URLﾘﾝｸ(www.booboo.ne.jp)
にある、BooGetData ver1.00というスクリプトについてアドバイスをお願いします。

このスクリプトは、フォームから受け取ったデータを
CSVファイルに追記保存していくというものです。

このスクリプトに、
・書込むCSVファイルの内容が消えないようなファイルロック機能と、
・管理者へフォームから受け取ったデータをメールで送信する機能を
つけたいと思っています。
flock関数やsendmailの使い方がよくわからないので出来ませんでした。
perlを初めてからまもなく知識には乏しいですが、
頑張って理解していこうと思いますのでお願いします。

ファイルアップしておきます。
URLﾘﾝｸ(tool-ya.ddo.jp)

136:お願いします
04/05/10 23:20
自分でファイルロック処理だけ書いてみたのですが、
112行目からを

sub outputdata{
# 現在の時間を取得
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year += 1900;
$stmp = sprintf("%04d/%02d/%02d-%02d:%02d:%02d",$year,$mon,$day,$hour,$min,$sec);

open (DAT,">>$output");
&body;
flock(DAT,2);
print DAT "$body,$stmp\r\n";
flock(DAT,8);
close (DAT);
}

こうしてみました。これだけでいいのでしょうか？

137:お願いします
04/05/10 23:20
すみません、間違えました…
112行目からじゃなくて102行目からでした。
逝ってきます。

138:nobodyさん
04/05/10 23:31
>>136
＞flock(DAT,8);
これはいらない。

sendmailのサンプルはすぐ見つかるからがんばれ。

139:nobodyさん
04/05/10 23:46
追加書き込み（>>）ならファイルロックしなくても普通は飛ばないけどね。
&bodyはopenの前にしておいた方がいいと思う。
みんなが使うファイルを手に持ったまま関係ない仕事をするのはマナーが悪い。

140:お願いします
04/05/11 00:12
>>138-139
ありがとうございます。flock(DAT,8)を消すのと、
&bodyの位置を変えます。

正直なところ、&bodyがなんなのかすらわかってません(T-T)

141:お願いします
04/05/11 01:44
色々調べつつ下記の様に書いて見たんですが、全然メール来る気配なしです。
何が間違ってるのか全然わかりません。

sub outputdata{
# 現在の時間を取得
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year += 1900;
$stmp = sprintf("%04d/%02d/%02d-%02d:%02d:%02d",$year,$mon,$day,$hour,$min,$sec);

&body;
open (DAT,">>$output");
flock(DAT,2);
print DAT "$body,$stmp\r\n";
close (DAT);

#メール送信
$myaddress = 'xxx@xxxx.com';
open(MAIL,"|$sendmail $myaddress");
print MAIL "Subject: title\n";
print MAIL "$body,$stmp\n";
close(MAIL);
}
これではダメなのでしょうか？

142:nobodyさん
04/05/11 02:44
>>141
sendmail へのパスが設定されていないから？> $sendmail の中身は？
あと、 man sendmail して使用上の注意をよく読んでお使い下さい。

143:nobodyさん
04/05/11 09:29
>140
サブルーチン。調べてみるとひとつレベルが上がると思う。
とりあえずsub bodyでファイル内を検索してみな。

sendmailについては使えない鯖も多い。
どのみちsendmailのパスが分からないと使えないので、ページ置いてる鯖のFAQとかを嫁。

144:お願いします
04/05/11 13:56
$sendmailのパスは上の方に書いてあります…。
今はWIN機で書いているので、
$sendmail

145:nobodyさん
04/05/11 19:44
print MAIL "Subject: title\n";
を
print MAIL "From: $myaddress\n";
print MAIL "To: $myaddress\n";
print MAIL "Subject: title\n\n";
に書き換え、でどうよ。

146:nobodyさん
04/05/11 19:53
いや、
open(MAIL,"|$sendmail $myaddress");
ここが間違ってないか？

とあるスクリプトの該当部分を貼っておく
参考しる

open(MAIL,"| $sendmail -t") or &error("sendmailの起動ミス");

print MAIL "To: $mailto\n";
print MAIL "From: $mailfrom\n";
print MAIL "Subject: $subject\n";
print MAIL "Content-Transfer-Encoding: 7bit\n";
print MAIL "Content-Type: text/plain; charset=iso-2022-jp\n";
print MAIL "\n\n";
print MAIL "$body\n";

close(MAIL) or &error("メールの送信ミス");

147:nobodyさん
04/05/11 19:58
>146
sendmail -t
To: hogehoge@hoge.com
（略
と、
sendmail hogehoge@hoge.com
To: hogehoge@hoge.com
（略
は全く同じ。sendmail -tの"-t"の意味、分かってないだろ。
ま、鯖側で-tオプションをつけて起動する事を義務付けてる可能性も無くはないけどな。

148:146
04/05/11 20:08
>147
意味わかってなかった。ありが㌧

149:お願いします
04/05/14 01:20
色々な助言ありがとうございます。
自分なりにも色々いじってみたんですが、
どうしても出来ませんでした。

今やってたのは「フォームから受け取った
データをCSVに保存するCGIにメール機能をつける」
だったんですが、考え直しまして、
「普通のフォームメールにCSV保存機能をつける」
に方向転換しようかと思います。
こっちの方が簡単なんじゃないかと…

150:nobodyさん
04/05/14 01:31
まあそうしたいならそれでもいいけど。
できなかったでやめていたらいつまでたってもできないぞ。
それに何がどうできなかったか書かなければアドバイスだってしようがない。

151:nobodyさん
04/05/16 08:38
質問させていただきます。
KENTWEBで配布しているYYCHATなんですが、
発言の文中にURLが表記されたときに自動にリンク貼れるように改造したいのですが、

if ($com) { $com ="＜a href=\"$com\" target=\"_blank\">$com＜/a>\n";}　（397行目あたり）

というスクリプトにすると普通の文章までリンクしようとしてしまいます。
URLだけリンク貼れるようにするにはどの辺りを直せばいいのでしょうか？
よろしくお願いします。

152:nobodyさん
04/05/16 09:09
お前面白いな
ネタにマジレス
URLだけならURLを抜き出せ
当たり前だろ

153:nobodyさん
04/05/16 09:13
>>151
ここは丸投げスレじゃないから厳しいぞ。
>>152ほどじゃないがな

どぞ↓
URLﾘﾝｸ(www.google.com)

154:151
04/05/16 10:17
ありがとうございました。
>>153さんのアドのところから調べて無事解決できました。
もっとよく調べてから聞くべきでした(´･ω･｀)

155:nobodyさん
04/05/16 17:51
■ 設置の方法がわからない場合には
ＣＧＩ設置について質問
ｽﾚﾘﾝｸ(php板:15番)（テンプレ）

■ 自分で改造できない場合には
【スクリプト改造依頼スレ】(丸投げ)
ｽﾚﾘﾝｸ(php板:324番)（テンプレ）

■ 自分で改造するアドバイスが欲しい場合には
★三　【スクリプト改造工房 PART 8 】　★三
ｽﾚﾘﾝｸ(php板:79番)（テンプレ）

156:nobodyさん
04/05/17 14:13 HUxEX/E5
KENT WEBのショッピングカートcgi「Shopping Cart」を
設置しました。無事機能してます。

で、新規追加の画面から販売物を追加していくと、トップの販売画面に

□　□
□　□
□　□...

と言うように販売物のテーブルが追加されていくんですが、
これを、2列折り返しでなく、1列にするにはどーすればいいんでしょうか？
単純にどっかに改行タグ入れればいいんだと思うですが....

157:nobodyさん
04/05/17 15:09
505 ：nobodyさん：04/05/14 19:29 ID:AHTH/fbA
KENT WEBのショッピングカートcgi「Shopping Cart」を
設置しました。無事機能してます。

で、新規追加の画面から販売物を追加していくと、トップの販売画面に

□　□
□　□
□　□...

と言うように販売物のテーブルが追加されていくんですが、
これを、2列折り返しでなく、1列にするにはどーすればいいんでしょうか？
単純にどっかに改行タグ入れればいいんだと思うですが....

ｽﾚﾘﾝｸ(php板:505-番)

158:nobodyさん
04/05/17 15:23
506 ：nobodyさん：04/05/14 19:53 ID:???
スレ違い。
というかHTMLすら分からないようであればCGIの改造は到底無理。
素直に諦めるか勉強しろ。

159:156
04/05/17 22:36 UCKt7Cge
誘導されたので来たのですが。。。

160:156
04/05/17 22:37 UCKt7Cge
それじゃ次は丸投げ行きます！（予告）

161:nobodyさん
04/05/17 22:40
誰がどこで誘導したのか知らんが来る場所は間違っていないか？

162:nobodyさん
04/05/17 23:09
URLﾘﾝｸ(www.206.usn.ac)

ここで勉強する！

163:座敷荒氏
04/05/22 19:14
教えてくださいませm(_ _。)m
以下、内容を自分宛にメールで送信する部分です。
「$in{'_email'}」は相手のメアドをFrom：にしないで、
本文のほうに載せたい場合どうしたらいいのでしょうか？
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
if (!open(OUT,"| $sendmail -t")) { &error("異常停止","$!","back"); }

print OUT &jis("X-Processed: $date_now\n");
print OUT "X-SENDER: $REMOTE_HOST\[$REMOTE_ADDR\]\n";
print OUT &jis("X-AGENT: $HTTP_USER_AGENT\n");
print OUT "From: $in{'_email'}\n";
print OUT "To: $mailto_order\n";
print OUT &jis("Subject: $mail_subject [$date_num]\n");
print OUT "Content-Transfer-Encoding: 7bit\n";
print OUT "Content-Type: text/plain; charset=iso-2022-jp\n\n";

print OUT "\n";
foreach (@in) {

s/"/"/g;
s/&/&/g;
s/</</g;
s/>/>/g;

if (/^\.\t(.*)/) { print OUT &jis("$1\n"); }
elsif (/(.*)\t(.*)/) { print OUT &jis("[$1] $2\n"); }
}
print OUT "\n";

print OUT &jis("$sign\n");
close(OUT);
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

164:nobodyさん
04/05/22 21:58
>>163はマルチなので放置

165:座敷荒氏
04/05/22 22:39
放置とかやめた方がいいぞ？

166:nobodyさん
04/05/22 23:14
なんでよ。

167:nobodyさん
04/05/22 23:28
名前からしてまともなやつじゃないとわかるから放置。

168:座敷荒氏
04/05/22 23:44
へんなやつー

169:nobodyさん
04/05/23 23:30
自己分析来た

170:nobodyさん
04/05/28 10:57
phpの掲示板にテキスト広告をランダムに表示させるスクリプトキボンヌです。

171:nobodyさん
04/05/28 11:22
>>170
板違いだハゲ

172:nobodyさん
04/05/28 16:02
丸投げに行った方がいいような初心者ですがちょっと聞いてください。

・スクリプト名：PHP JoyfulNoteのgdバージョンtype2
・配布もと：鏡の国さん（URLﾘﾝｸ(script.s16.xrea.com)）

・いじろうとした事：
　・ｵﾘｼﾞﾅﾙではｱｯﾌﾟされた画像のﾌｧｲﾙ名が「番号.jpg」になるのを
　　「up0001.jpg」のような「ヘッダ+桁揃えされた番号.jpg」に。（成功）
　・ｻﾑﾈｲﾙのファイル名を、ｱｯﾌﾟされた画像のﾌｧｲﾙ名と別にする。（成功）
　・CSSをいじってデザインの変更

・作業手順：テキストエディタで一括置換したりコピペで置換したりしながら
　FTPでアップして確認。PHPは全然知らないのでﾈｯﾄで検索して試行錯誤。

・問題点：スレッドの先頭の投稿で本文が勝手に改行される。そういう処理に関わる所をいじった覚えはないはず。レスの投稿は正常。
改行が生じる場所は本文の長さによって違う。長い文程後の方で改行が生じる。
二文字だと一文字目の後で改行される。

・質問：なぜ問題点のような事が生じたのかわからないのですが、どのへんがどうおかしくなっている可能性があるのか心当たりございましたら教えてください。

173:nobodyさん
04/05/28 17:17
>>172
改行されるタグが入っているからだろ

174:nobodyさん
04/05/28 20:05
どこをどういじったか分からないことには答えようがないよ。
「変にいじった覚えはない」なんて言われても信用できない。

175:nobodyさん
04/05/28 20:06
どこをどういじったか分からないことには答えようがないよ。
「変にいじった覚えはない」なんて言われても信用できない。

176:nobodyさん
04/05/28 20:45
>>174
その通りですね。
パスワードとか消した上でどこかにアップします。

なお、余計なおせっかいですが現在2chが鯖移管の関係？とかで混んでいるらしく、
書き込めていてもタイムアウトエラーになったりして二重書き込みになりやすい状態です。ご注意ください。

177:nobodyさん
04/05/28 21:54
>>176
なぜ改行されてしまったソースを調べない？
HTMLもわからんのか？

178:nobodyさん
04/05/29 01:27
>>177
ヒントありがとうございます。
<br>が勝手に挿入という事はありませんでした。
一度全部の書き込みを削除したら再現されません。
？？？？？

179:nobodyさん
04/05/29 01:33
やっぱり起きました。
しかし別のブラウザで見ると正常です。何だこれ。。

180:172,176,178,179
04/05/29 01:58
細切れの書き込みですいません。<BLOCKQUOTE>が犯人のような気がします。
テーブルとの組み合わせが問題なのかも。
特定ブラウザの問題かな・・。オリジナルのスクリプトにもあった問題かも。
問題の方向が分かったので次は結論を出してから書き込みます。

181:172,176,178,179
04/05/29 03:25
元からあった問題のようだという事でオリジナルのスクリプトと差し替えて試した所やはり同現象が生じました。テーブルとBLOCKQUOTEの組み合わせでレイアウトしてあるために特定のブラウザで問題が生じるという事のようです。
例えば問題の起きた書き込みの部分は下記のようですが、
「ど」の次で改行されて、タテ書きのようになります。四文字でも完全にタテ書くになりました。
この部分のみを<html><body></body></html>で囲んだhtmlファイルを作って該当ブラウザで開いても同じ現象が置きました。テーブルのみ、blockquoteのみでは生じませんでした。
blockquoteを抜いて同じようなレイアウトができないか考える事にします。

</TABLE>
<TABLE border=0 cellpadding=5>
<TR>
<TD><BLOCKQUOTE><FONT color="#000000">どう</FONT></BLOCKQUOTE></TD>
</TR>
</TABLE>

182:nobodyさん
04/05/29 18:43
HTML はその名の通りマークアップするものです。
レイアウトは CSS でおながいいたします。
ちなみに blockquote は長文引用、font は非推奨です。
凡例：
TD.quote { padding: 1.0em 1.0em 1.0em 3.0em; color: #000; background: transparent; white-space: nowrap; }
<TD class="quote">どう</TD>

183:nobodyさん
04/05/29 21:11
スレ違いに優しいスレだな。

184:172,176,178,179
04/05/30 03:29
引っ込むつもりでしたがレス頂いたのでまたのこのこ出てきますた。

>>182
あい。わかりますた。例まで書いて頂いてありがとうございます。

ところでもしTableも使わないとしたらちょっと大変そうですね。
<div></div>だらけになっておこられるかなー。。

185:nobodyさん
04/06/01 00:36
>184
スレ違いだがCSSを侮らない方がいい。
掲示板に要求される程度のレイアウトは余裕でできる。というか実際作った事がある。

tableでのレイアウトをしていないサイトは案外多いぞ。
たとえば「はてなダイアリー」の本文の部分はtableを一切使っていない。

186:京阪マソ ◆0atqBUamHk
04/06/04 01:36 /BQPM3QN
はじめまして、現在アッハン掲示板を利用して
サイトを運営しているのですが、下記のように改造したくて
こちらにうかがわせていただきました。
URLﾘﾝｸ(keihanman.s53.xrea.com)

どのように改造したいかというと現在、大阪府全体を
扱った掲示板になっているのですが、掲示板中ほどに
地域別に分けたリンク集を表示したい、
なおかつそのリンク先に書き込みがあるごとに
所属した地域リンク集の中の一番上に表示されるようにしたいのです。

このようなことは可能でしょうか？

187:nobodyさん
04/06/04 01:38
■ 自分で改造できない場合には
【スクリプト改造依頼スレ】(丸投げ)
ｽﾚﾘﾝｸ(php板:324番)（テンプレ）

■ 自分で改造するアドバイスが欲しい場合には
★三　【スクリプト改造工房 PART 8 】　★三
ｽﾚﾘﾝｸ(php板:79番)（テンプレ）

188:京阪マソ ◆0atqBUamHk
04/06/04 01:54 /BQPM3QN
>>187
申し訳ありません、向こうで依頼してきました。

189:nobodyさん
04/06/05 17:38 ooKajGIS
失礼します。現在THE ROOMの機種別振り分けCGIを使っています。
Mobile Jumper
URLﾘﾝｸ(dream.lib.net)

これをDOCOMOならムーバとFOMA、AUならムーバとWIN、Vodaはパケと非パケ
といった風に分けたいのですが、現在更新も止まっておりサポートも止まっています。

端末別振り分けの項目があるのですが、
そこに機種名を書いてもうまく振り分けてくれません。
よろしくお願い致します。

190:nobodyさん
04/06/05 18:01
>>189
スレ違い

191:nobodyさん
04/06/05 18:06
すぐ上が読めない人には、きっとすぐ下も読めないだろう。

192:nobodyさん
04/06/05 18:11
（´･ω･）

193:nobodyさん
04/06/05 18:12
>>189
お前は

■ 設置の方法がわからない場合には
ＣＧＩ設置について質問
ｽﾚﾘﾝｸ(php板:15番)（テンプレ）

194:グレ
04/06/07 17:59 /GUEYbCQ
THE　ROOMのRanking Link　Ver.1.86携帯端末用
URLﾘﾝｸ(dream.lib.net)

をEZWEB（WIN）にも対応させたいんですが、
WIN端末からOUTはカウントするんですけどINがカウントされません。

ranking.cgiの
106行目以降の変更だと思うのですが、なかなかうまくいきません。
わかる方よろしくです。

195:nobodyさん
04/06/07 19:21
>>194
丸投げへ。

196:nobodyさん
04/06/07 19:36
>>195
>>194はヒントだけ欲しいんじゃないかな？
だったらこのスレでもいいと思うぞ。

197:グレ
04/06/07 20:11 /GUEYbCQ
>>194
×ranking.cgi
○ranklink.cgi　でした。
106行目以降

if ($vote_terminal == 0){$voteflag = 1;}
else{
$a1 = $ENV{'HTTP_USER_AGENT'};
if (($a1 =~ /^DoCoMo\//) ||
($a1 =~ /^J-PHONE\//) ||($a1 =~ /^UP\.Browser/) ||
($a1 =~ /^ASTEL\//) ||($a1 =~ /^
PDXGW\//)){
if ($vote_terminal == 1){$voteflag = 0;}else{$voteflag = 1;}
}
elsif ($vote_terminal == 1){$voteflag = 1;}else{$voteflag = 0;}
}

となっているんですが、
($a1 =~ /^UP\.Browser/)
ではムリなんでしょうか？

どうもEZweb対応にするのが難しくて･･･。

次ページ