【 スクリプト改造工房 PART 6 】
■ このスレッドは過去ログ倉庫に格納されています
00011
03/03/16 18:28ID:vOOsWTxU# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
#================================
# 過去のスレッド
#================================
【PART1】行方不明
【PART2】http://pc.2ch.net/test/read.cgi/perl/986986227/
【PART3】http://pc.2ch.net/php/kako/988/988808396.html (HTML化済み)
0709697
03/07/27 04:19ID:???> 削除の仕組みを見れば、すぐにわかるだろ。
> ゆいちゃっとの仕組みも理解できないようなら、改造なんかするな。
えと、>>704はperlそのものを理解できないみたいだから、改造などしていない。
> どうせ、そうやって次から次へと質問してくんだろ？
違う。質問じゃない。
次から次へとお願いしるんだ。
ハッキリ言って>>704に仏心を出した漏れがバカだった。
この手の輩には諸先輩がしているようにスルーすべきだった。
>>704
悪い事言わないから、perlの勉強しなさい。
この板の住人は、『わからないなりに努力している質問者』にはとても優しい。
けど、君のように高飛車で、努力の片鱗も見せない輩にはとても厳しい。
最後に一つだけ。
}elsif ($out) {#退室処理
を二回記述している。
どちらか一方を消す事！
0710nobodyさん
03/07/27 09:05ID:???0712nobodyさん
03/07/29 20:16ID:???最近、割れ2003鯖評価版を手に入れたらしい（ｗ
といいつつまだ赤帽がどうのこうのとほざいているもよぅ。
詳しくは最悪板へ。
0713山崎 渉
03/08/02 02:24ID:???（ ＾＾ ）＜ ぬるぽ（＾＾）
0714ぼるじょあ ◆ySd1dMH5Gk
03/08/02 04:52ID:???ﾋﾟｭ.ｰ （ ・３・） ( ＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
＝〔~∪￣￣￣∪￣￣〕
＝ ◎――――――◎ 山崎渉&ぼるじょあ
0715nobodyさん
03/08/02 08:52ID:8YthZhjq0716nobodyさん
03/08/03 00:08ID:jF0CfXErこれを投稿したファイルをクリックすると、ダウンロードしますか？
と表示して、ダウンロードする仕組みに変えたいのです。
そうすることによって、パソコンからだけでなく携帯からでもダウンロード
出来るようにしたいのです。教えて下さい。
ずるぼんアップローダーのソース↓
http://zurubon.strange-x.com/upload.txt
0717716
03/08/03 02:46ID:jF0CfXEr0718_
03/08/03 03:03ID:???0719nobodyさん
03/08/04 15:50ID:EmHDiAGs前週より順位変動あったか、順位、チーム名、試合数、勝ち点、勝利数、引き分け数、敗戦数、得点
失点、得失点差
(前週より順位変動あったかは、青色↑と、緑色→、赤色↓で表したい)
が試合結果(チーム名と何対何だったか)を入力することで
表示できるようにしたい。
イメージとしては
http://www3.mahoroba.ne.jp/~masayosi/cgi-labo/flt_r/index.html
が、かなり近く
勝ち点というのは、１回の勝利が勝ち点３、１回の引き分けが勝ち点１
敗戦は勝ち点０として計算します。
得失点差というのは、総得点から総失点をひいたもので、マイナスも
あります。
順位をつける時の優先順位が
１．勝ち点が多い
２．勝ち点が同じ場合は得失点差の多い(プラス)方
３．２の条件が同じ場合は、総得点が多い方
４．当該チーム同士の対戦成績
となっているんですが
各国によって若干ルールが違うので、ON/OFFで設定できると
最高なんですが。
↑のスクリプトに足りないのは
前週からの順位変動と、順位表示だけなんです
そこを、どう書き加えれば良いのかご教授ください。
0720_
03/08/04 15:57ID:???0722nobodyさん
03/08/05 09:03ID:???jcode.perlを弄ればいいんですか？それともcgiファイル本体の修正も必要なんでしょうか
0723nobodyさん
03/08/05 09:37ID:???jcode.perl じゃなくて、jcode.plな。
アルファベット数文字の区別もつかないようじゃ、プログラムをいじるのは無理かと。
0724nobodyさん
03/08/05 10:46ID:???0725nobodyさん
03/08/07 00:08ID:???CGI.pm等のモジュールは使えないみたいなんです。
そういったものを使わなくてもアップロード機能付けることは
可能でしょうか？
0726nobodyさん
03/08/07 00:52ID:???0727nobodyさん
03/08/07 19:16ID:NMR2TNAwおまえにそれだけの勉強をする気があるなら、可能。
0728nobodyさん
03/08/07 22:20ID:zQuj7rgg・管理人がパスを入力した時でけスレを建てれる。
・名無しでの書きこみは不可。
・削除キーの排除
に改造していただきたいのですが。
よろしくおねがいします！
スクリプトの配布元
ttp://www2j.biglobe.ne.jp/~tatuta/_MENU.htm
0729nobodyさん
03/08/07 22:27ID:???0730nobodyさん
03/08/07 22:28ID:???0732nobodyさん
03/08/08 00:26ID:???0733nobodyさん
03/08/08 00:45ID:???0735nobodyさん
03/08/08 01:49ID:???・・・
0737nobodyさん
03/08/08 02:53ID:???ぼつぼつ改造してみたら？
なかなか見づらいソースだけど、そんなにはいじるところも無さそうだし、余分なルーティンも削れそうだし。
0738731 ◆EI.FLujnXI
03/08/08 12:40ID:???ので。
http://up.isp.2ch.net/up/315f29020bc2.zip
取り敢えず動作チェックもしてみました。
ついでにトリップ回路も入れておきました。
現状の不具合。
・久喜が化ける。
→ JavaScript で久喜を拾っているから。＠放置しときます。
・不思議 HTML 。＠これも放置。
重篤な不具合が出るようでしたら修正に応じます。
ただし元からある部分は放置しております。
0739731 ◆aiY4htt2.2
03/08/08 12:41ID:???0741nobodyさん
03/08/08 14:03ID:???改造する為のお手伝いをするｽﾚ。
教 え て 君 な ら ま だ し も や っ と い て ち ゃ ん は 稲！！
0742nobodyさん
03/08/08 19:55ID:???0744nobodyさん
03/08/09 04:50ID:???0745nobodyさん
03/08/09 12:42ID:???（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
（をぃ）
どこのﾘｱ厨だよ (´,_ゝ｀)ﾌﾟｸｽ
0746nobodyさん
03/08/09 13:24ID:???0747nobodyさん
03/08/09 22:13ID:???よりはマシ？
0748nobodyさん
03/08/12 17:45ID:???でも厨は来て欲しくない。
0750nobodyさん
03/08/13 00:30ID:Po7RAil5このアップローダー↓ずるぼんアップローダーです。
http://zurubon.strange-x.com/upload.txt
をEZweb端末からでもダウンロード出来るようなCGIは無いですか？って聞いたら
ずるぼんアップローダーにこれ↓ez.cgiです。
http://www5b.biglobe.ne.jp/~eye6/cgi-bin/source/au1358.txt
をかけ合わせれば出来るよって言われて、後はここで聞いてね〜って言われ
ましたが、両方のソースコードを見てもさっぱり分かりません。
具体的にずるぼんアップローダーのどの部分にez.cgiのどの部分を掛け合せれば
出来るようになるのですか？
0751無料動画直リン
03/08/13 00:37ID:Vl5Tt60f0752nobodyさん
03/08/13 01:14ID:???> ずるぼんアップローダーにこれ↓ez.cgiです。
> http://www5b.biglobe.ne.jp/~eye6/cgi-bin/source/au1358.txt
> をかけ合わせれば出来るよって言われて、後はここで聞いてね〜って言われ
> ましたが、
・・・単体だと普通のｱﾌﾟﾛﾀﾞな気がするけど？
>>1 もちゃんと読んでね。
0753750
03/08/13 01:26ID:Po7RAil5ちょっと説明不足でしたけど、ずるぼんのアップローダーの
機能（PCからでも音楽試聴、画像閲覧可能。データ一覧を表示する機能）
をそのままにEZwebにも対応してるのが欲しいって他の所で質問したら
こういう答えが返ってきたのです。ez.cgiはデータ一覧機能とかない
みたいですし。じゃあ一応自分でちょっと単体でez.cgiを設置してみます。
それでダメポだったら、またお願いしにくるかもです。
0754お気に入り集 ☆http://beauty.h.fc2.com/
03/08/13 13:41ID:i4AJ4Yw2http://beauty.h.fc2.com/
0755nobodyさん
03/08/14 18:31ID:???スクリプト改造工房 Part4
http://pc.2ch.net/php/kako/1012/10128/1012839651.html
【 スクリプト改造工房 PART 5 】
http://pc2.2ch.net/php/kako/1028/10281/1028193595.html
0756nobodyさん
03/08/15 01:34ID:S4ncUgdE極端なものじゃないもので結構有効じゃんというのは、どの程度でしょうか？
HTTP_PRAGMAがあるものも、弾いちゃってもいいですかね。
0757新宿歌舞伎町裏DVD本舗
03/08/15 11:50ID:2mbTnFQt☆★ 無修正ＤＶＤ★☆なら 新宿歌舞伎町直送 ☆★
人気爆発新作ベスト９入荷
堤さやか引退特集 憂木瞳 プロジェクトX No８ ベイビーフェイスをやっちまえ
白石ひより・愛葉るび SNAPSHOT 地下映像陵辱援交 すぎはら美里痴女教師
店頭販売の売れ筋のみ厳選してみました 安心の後払い
http://book-i.net/moromoro/
白石ひとみ 小森詩 山田まり 長瀬愛
＠＠ 及川奈央 レジェンド ＠＠ 堤さやか 東京バーチャル 依然大好評
サンプル画像充実 見る価値あり 最高画質
▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼
0758ライン
03/08/15 12:49ID:???http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
http://ip.tosp.co.jp/i.asp?i=1396e
0759画像集！http://www.sexpixbox.com/pleasant/dx/index.html
03/08/15 18:53ID:zH9218Tlhttp://www.sexpixbox.com/pleasant/dx/index.html
0760山崎 渉
03/08/15 22:27ID:???│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
0761nobodyさん
03/08/15 23:06ID:xCPhTU0dアドヴァイスくれるなんて超親切な人がいないか期待して質問です。
Web Patio ：http://kent-web.com/bbs/patio.html
（サンプル）http://kent-web.com/bbs/patio/patio.cgi
スレッド内ページの記事の表示順を下記のように変えたいのですが・・
■標準（表示件数 $t_max = 2件）
Page: [1] ・・・ ( No.2 )( No.3 )
Page: [2] ・・・ ( No.1 )
■変更後（表示件数 $t_max = 2件）
Page: [1] ・・・ ( No.1 )( No.2 )
Page: [2] ・・・ ( No.3 )
どこをどーいじるかわからないのです。
せめて【どこ】だけでもわかれば何とか・・・
どなたかヒントお願いできませんか。
0762nobodyさん
03/08/15 23:50ID:???リンクや省略処理に困ってます。
リンク処理ですが、
<A HREF=http://www.ueno-mori.org/kobo/shizen16/pic/tsutsumi.html>;ueno-mori.</A>
このように変換したいのですが、上手く変換できません…全くのお手上げです(;´Д`)
後,省略処理で、2chでは省16などと省略された行を表示させたいのですが
どこかのコピペで、しかも内容が難しすぎて理解できません…
どなたかお助け下さい。
0763nobodyさん
03/08/15 23:50ID:???sub cut {
my $string = shift;
my $key = shift;
my $no = shift;
return if (!$cellomis or length($$string) < $cellomis);
$$string = substr($$string,0,$cellomis);
my ($i,$byte);
for ($i=$cellomis-1;$i>=0;$i--){
my $c = ord(substr($$string, $i, 1));
if (($c <= 0x7F) or ((0xA0 <= $c) and ($c <= 0xDF))){ last; }
$byte ^= 1;
}
chop $$string if ($byte);
$$string =~ s/&[#a-zA-Z0-9]*$//;
my $r1 = rindex($$string,'<');
my $r2 = rindex($$string,'>');
if ($r1 > $r2) {
$$string = substr($$string,0,$r1);
}
$$string .= '...<br><br><a href="'.$script.'?/'.$key.'/'.$no.''.$get.'">全文表\示</a>';
}
0764nobodyさん
03/08/16 11:35ID:mv+dlsfN検索部分を改良したい。
英語の半角、全角をともに検索するには
どうしたらいいのでしょうか？
初心者的に考えると、
英文をすべて半角に変換してものを検索してから、
次に全角にした文を検索するというように
２度やるのでしょうか？
0765無料動画直リン
03/08/16 11:37ID:tOysTLUA0766nobodyさん
03/08/16 12:35ID:???0767nobodyさん
03/08/16 15:47ID:???0768nobodyさん
03/08/16 15:47ID:???0769761
03/08/16 17:53ID:j2+puat/761ですが、762-763は他人です。
CGI設置できるURLが無いんでKent-webの掲示板に聞けません・・・
引き続き懇願。
0770761
03/08/16 17:56ID:j2+puat/0771762-763
03/08/16 18:04ID:zhP3+P6A別にKENTのじゃなくていいんです。
2chｽｸﾘﾌﾟﾄみたいなﾘﾝｸの変換と、省略した行を数えたいんですが…
0772762-763
03/08/16 18:07ID:???ﾛｸﾞを出力するときに、printしないでpushで配列に入れる
その後、sortするかforachで回して出力したらいいんじゃないの?
0773762-763
03/08/16 18:14ID:???while (<IN>) {
my ($no,$sub,$nam,$com) = split(/<>/);
if($chk) {
$chk='';
print "$nam - $com<hr>";
} else {
unshift(@txt,"$nam - $com<hr>");
}
}
close(IN);
foreach (@txt) {
print;
}
こんな漢字で改造すれば?これじゃ動かんけど。
0774762-763
03/08/16 18:16ID:???ここじゃKENTは禁句なんだっけ?
0775nobodyさん
03/08/16 20:21ID:???だったら2chスクリプト手に入れて解析すれば？
検索すれば出てこないかい？
0776761
03/08/16 20:37ID:???バカなので時間がかかりました。
0779761
03/08/17 00:06ID:???patio.cgiの
# 表示範囲を定義
$from = $res - ($t_max * $p);
$to = $from + $t_max;
を
$from = ($t_max * $p) - $t_max;
$to = $t_max * $p;
こう変えた。
0780nobodyさん
03/08/17 01:15ID:eglXJ59U0781nobodyさん
03/08/17 01:34ID:Uf0TPnbi◎満足しました！！（＾０＾）最高です！！◎
07827
03/08/17 10:57ID:/KPUdsqe☆★ 無修正ＤＶＤ★☆なら 新宿歌舞伎町直送 ☆★
人気爆発新作ベスト９入荷
堤さやか引退特集 憂木瞳 プロジェクトX No８ ベイビーフェイスをやっちまえ
白石ひより・愛葉るび SNAPSHOT 地下映像陵辱援交 すぎはら美里痴女教師
店頭販売の売れ筋のみ厳選してみました 安心の後払い
http://book-i.net/moromoro/
白石ひとみ 小森詩 山田まり 長瀬愛
＠＠ 及川奈央 レジェンド ＠＠ 堤さやか 東京バーチャル 依然大好評
サンプル画像充実 見る価値あり 最高画質
▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼ ▼
0783nobodyさん
03/08/17 11:26ID:HfUElgR+英文半角全角の検索
ｋｅｎｔ以外のスクリプトで参考になるやつないか、教えてください。
0784無料動画直リン
03/08/17 11:37ID:ZhaL0YfR0785>>２ちゃんねらーの皆さん
03/08/17 12:06ID:???川o・-・）ノ ＜先生！こんなのがありました！
http://www.hokekyoji.com/
http://members.tripod.co.jp/hossyoji/index/
http://www.honmonji.or.jp/
http://www.maap.com/tanjoh-ji/
http://www.kuonji.jp/
http://www.butsuzou.com/jiten/sanmen.html
http://www.butsuzou.com/list1/sanmen2.html
http://www.butsuzou.com/list1/sanmen3.html
http://www.butsuzou.com/keitai/sanmen-kz.html
0787nobodyさん
03/08/17 19:57ID:HfUElgR+ソース見ても、さっぱりわからん。
コピペでいける、いいスクリプト紹介してよ。
0788nobodyさん
03/08/17 20:03ID:???0789nobodyさん
03/08/17 20:19ID:HfUElgR+わからないんだろ。
0791nobodyさん
03/08/17 20:58ID:???0793nobodyさん
03/08/18 01:18ID:???0794nobodyさん
03/08/18 12:35ID:k3ByntgP被検索文章も半角に変換して、
でもって検索する
という手順でいいのでしょうか。
とりあえずはできたんだけど、
とっても馬鹿っぽいのですが…
0795nobodyさん
03/08/18 13:04ID:???登録時に全てを半角にしてしまって、検索時は検索ワードを半角にして検索。
上の半角を全角にしたもの。
登録時の半角・全角は任意に、検索時に検索ワードを半角・全角で検索。
「君が」どうやりたいかによって決まる。
つーか、>>1くらい読め
0796nobodyさん
03/08/18 13:42ID:k3ByntgPとしたいのですが、その場合、
検索ワードを半角・全角の２回検索するということでしょうか。
一致するとフラッグが出るようになっていますが、
どこに２回目のＪコード変換を入れたらいいのかよくわからない。
0797nobodyさん
03/08/18 13:45ID:k3ByntgPforeach $pair (@pairs) {
if (index($line,$pair) >= 0) {
$flag = 1;
if ($cond eq 'or') { last; }
} else {
if ($cond eq 'and') { $flag=0; last; }
}
}
0798nobodyさん
03/08/18 13:53ID:???正解。
そのスクリプトを見てないけど、検索する部分は
[ループ(全登録データを見終わるまで)]
判定
[ループ終了]
になってるはずだから、
ループ前に $search_word_hankaku $search_word_zenkaku のように検索ワードを用意、
判定の部分で この両方を検索判定する。
結果一覧のようなのを、データのID番号か文字そのもので配列とかに突っ込んでるだろうから、
両方の検索判定の結果をその中に含めるようにする。
# 当然、検索ワード自体が半角・全角の2パターンあるので、
# 検索ワードの用意のときにうまく処理しておく必要がある
0799nobodyさん
03/08/18 18:34ID:k3ByntgP検索ワードをforeachに入れるところが、
なぜか、できない。
foreachに入らない。不思議だな。
0801nobodyさん
03/08/18 19:03ID:k3ByntgP２つずれて、ｃｄｅになっちゃう。
0802nobodyさん
03/08/18 19:32ID:k3ByntgPすんません。解決。自己レス。
0803nobodyさん
03/08/18 19:37ID:k3ByntgP# 入力内容を整理
$word_han = $FORM{'word'};
$word_zen = $FORM{'word'};
# 入力内容を半角英数に変換しておく
&jcode'tr(*word_han,'０１２３４５６７８９ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ','0-9A-Za-z');
$word_han =~ s/ / /g;
$word_han =~ s/\t/ /g;
@pairs_han = split(/\s+/, $word_han);
# 入力内容を全角英数に変換しておく
&jcode'tr(*word_zen,'0-9A-Za-z','０１２３４５６７８９ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ');
$word_zen =~ s/ / /g;
$word_zen =~ s/\t/ /g;
@pairs_zen = split(/\s+/, $word_zen);
0804nobodyさん
03/08/18 22:33ID:???0805nobodyさん
03/08/18 22:47ID:jGPgGxSp広告の張替えはSSIの本体ファイルを更新するだけでOK
みたいな目論見で書いてみたわけですが、うまくいきません。
ファイル名 : ****.pl
--------------------
#! /usr/local/bin/perl
$banner = '<!-- 広告タグ -->';
print $banner;
exit;
--------------------
shtmlファイルの中に
<!--#exec cmd="****.pl"-->
いや、マジでネタじゃないんですが
これじゃ間違ってますか？どなたかご教授していただけませんか・・
もちろんSSI使用可能な鯖でやってます。
0806nobodyさん
03/08/18 22:53ID:???わざわざplにしなくったってtxtでもhtmlでも
ttp://tohoho.wakusei.ne.jp/wwwssi.htm
0807805
03/08/18 22:58ID:???サンクスコ。正直スマンかった。逝ってきます。
0809803
03/08/19 19:19ID:x1TuweNX変換したあとがマズイと思うのですが…
foreachできない
■ このスレッドは過去ログ倉庫に格納されています