△▲　WebProg 初心者の質問 Part8　▼▽

**nobodyさん** · 04/03/06 19:25

２ちゃんねるは初めて。
WebProg 板は初めて。
質問したいけど、どうしたら良いか分からない。

そんなときは、ここに書き込んでください。
板の住人や、その他が、けなしながら、厳しく教えてくれるかも。

質問する前に、まずはここを読んでね。

2ch 総合ガイド
http://www.2ch.net/guide/
前スレ
△▲　WebProg 初心者の質問 Part7　▼▽
http://pc2.2ch.net/test/read.cgi/php/1073460282/
△▲　WebProg 初心者の質問 Part6　▼▽
http://pc2.2ch.net/test/read.cgi/php/1066318233/
△▲　WebProg 初心者の質問 Part5　▼▽
http://pc2.2ch.net/php/kako/1060/10602/1060263267.html
△▲　WebProg 初心者の質問 Part4　▼▽
http://pc2.2ch.net/php/kako/1056/10560/1056078605.html
WebProg 初心者の質問 Part3
http://pc2.2ch.net/php/kako/1045/10450/1045091733.html
△▲　WebProg 初心者の質問 Part2　▼▽
http://pc2.2ch.net/php/kako/1037/10372/1037222063.html
△▲　WebProg　初心者の質問　▼▽
http://pc.2ch.net/php/kako/1030/10301/1030151932.html

お願い。
適切な、板、スレ、を発見した場合、誘導してあげましょう。
スレの性質上 age 進行でお願いします。

**nobodyさん** · 04/05/10 22:28

>>623氏ね

**nobodyさん** · 04/05/10 22:32

while (<FH>) {
eval "print \"$_\"";
}

**nobodyさん** · 04/05/10 22:37

んー、、、じゃあ

while(<FH>){
$_ =~ s/\$x/$x/g;
print;
}

**621** · 04/05/10 22:54

うお！！

・・・・・俺って馬鹿だね>>624も合わせて軽く鬱。

Template-Toolkitって説明みるの面倒だからHTML部分はShift_JISでテキストファイルに別に書こうと
とか思ってたけど、俺の脳みそで思いついたそのやり方じゃどうせゴミみたいなもんなんだろな・・・

ていうかeval位知ってろよと・・・・

**621** · 04/05/10 23:13

とりあえずPerl限定なんだけどさ・・・

こんな機能を実現するためのコードを書け！！（中級レベル）
っていう感じ頼むよ。

馬鹿な漏れに問題をだしておくれ。

**nobodyさん** · 04/05/10 23:23

問題集スレみたいなのか。
それはそれでおもしろいかもな。

**nobodyさん** · 04/05/10 23:25

>>628
Web注文システム。セッション管理を使用したカートによる注文システム。
Webベース、またCSVフォーマットファイルでの商品・顧客管理。

**621** · 04/05/10 23:43

>>630
おまい長い

**nobodyさん** · 04/05/10 23:48

>>628
%itemと%maneyの同じキー同志を掛け算して%pricetotalっていうハッシュを作れ

**621** · 04/05/10 23:54

>>632
キー？値じゃなくて？多分値の間違いと思うけど、漏れ的馬鹿回答↓

@key = keys %item;
for($i = 0 ; $i < $#name ; $i++){
$pricetotal{@name[$i]} = $item{@name[$i]} + $money{@name[$i]};
}

**nobodyさん** · 04/05/10 23:56

>>633
掲示板を作るから、フォームに入力された文字列を無害化したいんだけどそれ

**621** · 04/05/11 00:03

>>633
>@key = keys %item;
これ
@name = keys %item;
の間違い。

**nobodyさん** · 04/05/11 00:04

%pricetotal = map { ($_, $item{$_} * $maney{$_}) } keys %item;

%maney (･∀･)ﾆﾔﾆﾔ

**621** · 04/05/11 00:48

>>636
やっぱり漏れってゴミなのね・・・

>>634
難しいから明日やるよ。今日はご飯食べて寝まつ。

**nobodyさん** · 04/05/11 02:38

質問です、すいません。
The RoomのRanking Link Ver.1.86という
ランキングCGIを設置してるんですけど、
登録されるURLの記述が
http://
じゃなく
http%3a%2f%2fwww%2e
のように記号が文字化けします。
このままだとrl_out.cgiをかまないと相手先に飛べません。
記号の文字化けを無くす方法わかる方お願いいたします。

**nobodyさん** · 04/05/11 02:41

文字化け？してないよ。

**nobodyさん** · 04/05/11 02:42

茶化しつつも文句言われたらコードで答える。
ｶｺｲｲな。

**nobodyさん** · 04/05/11 02:49

>>638
同梱のマニュアルをちゃんと読め。
そもそもスレ違い。

**636** · 04/05/11 05:13

>>637
なにをもって「ゴミ」なのかよーわからん。

**nobodyさん** · 04/05/11 08:03

クローラーってPHPで作れますか？
どっかスクリプトあったら、教えてください。
英語でもOK！！！！！
ロボット型価格比較サイト作りたくて？

え？
価格コム＝YAHOOっぽい
わがサイト＝GOOGLEっぽくしたくてね。

**nobodyさん** · 04/05/11 08:24

>>643
ここは作る人の板だ。
クレクレは他に池

**621** · 04/05/11 09:08

>>634
<漏れ的馬鹿回答>
require "jcode.pl";
read(STDIN,$x,$ENV{'CONTENT_LENGTH'});
jcode::convert(\$x,"euc");
$x =~ s/[\x21-\x2f\x3a-\x40\x5b-\x60\x7b-\x7e]//g;
jcode::convert(\$x,"sjis");
print "Content-type:text/html\n\n";

print $x;

ってこれ記号系を排除しただけなやつだから的外れかも・・・
的外れな上、相手がJISで送って来たものをEUCに変換すると「紗」とかが文字化けして
タグになっちゃうとかいう辺りの対策をどうやればいいかもわかんないから書けなかったよ。

っていうかJISをEUC変換すると文字化けするとかってどっかで読んだけど意味をイマイチ理解できてない漏れ＿|￣|○

**nobodyさん** · 04/05/11 09:23

$maney = 0;
$okozukai = 0.001;
for (1..10000) { $maney += $okozukai }
print $maney;

正しく貯金する方法を教えてくださいm(_ _)m

**621** · 04/05/11 09:30

>>645
>>jcode::convert(\$x,"euc");
の前に
$x =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;

**621** · 04/05/11 10:09

>>646
おまい難しいこというね。1052回くらいからおかしくなっていくみたいだけど・・・・

もうちょっと頑張ってみるよ。

**nobodyさん** · 04/05/11 16:36

>>647
リファレンス全部読め。
$x =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack("H2", $1 )/eg;

**nobodyさん** · 04/05/11 16:43

ファイルのDLカウンターについて質問があるのですが
ファイルへのリンクをクリックした後ファイルのダウンロードをキャンセルしてもカウントされてしまうのではないですか?

**nobodyさん** · 04/05/11 16:44

されるんじゃないの？

**nobodyさん** · 04/05/11 16:46

カウントの仕方にもよるよな。途中できれてrange指定で
やり直しなんてのもあるし、あまりマジメに数えようとすると
ハゲそうだが。

**nobodyさん** · 04/05/11 18:05

situmonndesu
Perlで出来なくてJavaやASP.netとか他の言語でしか出来ない事って
あるんですか？（個人でＨＰを作るにあたって）

**nobodyさん** · 04/05/11 18:07

>>653
Perl使いをいじめることぐらいかなぁ。。

**nobodyさん** · 04/05/11 18:10

>>654はどの言語使ってるんですか？？

**nobodyさん** · 04/05/11 18:12

PerlやASPに出来なくてJAVAに出来ることはいっぱいいっぱいあるぞ!

ま、そういうときのJAVAは板違いかもしれんが

**nobodyさん** · 04/05/11 18:19

では皆さんがサーバーサイドとしてお勧め"しない"言語はありますか？
出来れば理由も教えて頂けますか？

**nobodyさん** · 04/05/11 18:37

おまいさん、なんか忙しいねー＾＾；
そんなスピードの速い板・スレじゃないんだから、もう少しレス待ちゃいいのに。

どんな言語でも目的があって存在してるんだから、無条件で「お勧めできない」もの
なんてないよ
もうちょっと条件絞られるなら向き不向きが出てくるだろうけど。
どうしてもスピードが欲しいならCとか、初心者なのでサンプルが豊富に欲しいなら
Perlだとか。

それより個人のHPなら、サーバー自前で立てるわけじゃなし、言語にそんなに選択肢
ないんじゃないの?
その中で目的や自分のスキルにあった言語を選べばよろしいかと。

遙皇 ◆HEHARUKAoo · 04/05/11 21:59

>>657
ROM-BASIC
理由は訊かないでくれ

**nobodyさん** · 04/05/11 22:53

>>657
入力→処理→出力な流れだから、
LOGOやprologのような対話型の言語は向かない(使えない)と思う。
処理系にも依存しそうだけど。

**nobodyさん** · 04/05/11 22:57

PL/IやCOBOLは、お勧め"しない"。

**nobodyさん** · 04/05/12 00:22

掲示板で名前の後ろに#（文字列）を付けるとトリップ可能な方法を教えてください。

**nobodyさん** · 04/05/12 00:29

クラブ行って売人からEってのを買って服用するといいよ。トリップ可能です。

**621** · 04/05/12 11:35

>>646
漏れにはわかんね。もっと簡単なやつがいい。

>>649
ありがと

誰か漏れを育てておくれ。自分のＨＰの作成の途中にまたくるよ

**nobodyさん** · 04/05/12 12:42

クライアント側でurlエンコードする方法ってありますか？
getで、送信してもらうときに、日本語文字列がはいっててうまく
受信できないときがあるので。
フォームを使わず、リンクでやってるのでpost使えという案は
ナシで。

受信側はservletです。

**nobodyさん** · 04/05/12 13:13

質問です。
XMLスタイルシートに
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
と記述した場合はXMLとXSLTから画面が表示されるのですが
<xsl:stylesheet xmlns:xsl="http://www.w3.org/XSL/Transform/1.0">
と記述した場合はスタイルシート中の「xsl:～」がそのままブラウザで表示されてしまいま
す。

なぜでしょうか？教えてください。

**621** · 04/05/12 15:33

foreach(keys %item){
jcode::convert(\$item{$_},"sjis");
}

自分だけのモジュール作ってるんだけど、terapad使って初め間違えてShift_JIS
で書いちゃったから全文コピーしてEUCで新規に空けたとこにペタリ。

その直後からエラーになってuseが成功しない・・・３～４時間かけて実は上から２行目の文法が原因であると気づく。
いやでもおかしくないはずなのに・・・色々試すと、何故か他のフォルダでやると問題なし・・・？？？？

そしてやっと気づいた、jcode.plのバージョンが古かったことに・・・・エラーがでたのは
requireしたjcode.plが17kb位で、問題なくいくとこのは21kbくらいだった。

３時間もこんなことに使うなんて・・・・・

**nobodyさん** · 04/05/12 15:46

>>665
JavaScript。

>>667
日記は夢板へ。

**nobodyさん** · 04/05/12 15:49

>>666
Web制作板へどうぞ

**nobodyさん** · 04/05/12 15:50

>>667
そんなもん　/home/hoge/lib にでも置いて　use lib '/home/hoge/lib'; して
いろんなとこからrequre　でも　use　でもすべき。

**nobodyさん** · 04/05/12 17:05

>>668
JavaScriptでurlエンコードしたものをサーブレットで
もどせんの？
エンコード方法が同じなのかよくわからん

**nobodyさん** · 04/05/12 17:39

初歩的な質問なんですが、教えて頂ければ幸いです。

Postgresql7.3からINT型を読み込むときに空文字列を入れると
エラーが出るようになったために以下のメッセージが出ます。
pg_atoi: zero-length string in /opt/apache/htdocs/public_html/keijiban.php

原因は理解できるのですが、どうやって解決してよいものかわかりません。
どうか、アドバイスを...
↓PHPのソース
#error_reporting(0);
require('./include/init.inc');
$admin_pass = '12345678';
$limit = 10;
$max = 100;
$R = pg_query("select title,body from bbs_title_table where bbs_id='$bbs_id'");
$rows = pg_num_rows($R);

環境：PostgreSQL 7.3.5
PHP 4.3.6
Apache 1.3.29
OS : Red hat Linux 9

**636** · 04/05/12 17:40

>>671
RFC 嫁ってことで FA

↓次の方ﾄﾞｿﾞｰ

**nobodyさん** · 04/05/12 17:42

>>672
鰓を読んで如し。
空文字列チェックするがよろし。

**672** · 04/05/12 18:26

PSQLのテーブルか、
PHPを修正してエラーが出ないようにしたいのですが＞＿＜

見当違いなこと言ってたらすいません...

**nobodyさん** · 04/05/12 18:39

>>675
>>674の意味がわからんの？
クエリ結果を判定したらいいじゃんってことでそ？

**672** · 04/05/12 18:47

PSQLは、テーブルを定義しただけで
テーブルの中にはまだデータ入ってないんです...
だから検索しても何にもでてこないです＋＋

また見当違いなこと言ってたらすいません

**nobodyさん** · 04/05/12 18:51

>>672
空文字列だった時にどう処理したいのかをスクリプト内に書く。
データが入ってない時にどう処理したいのかをスクリプト内に書く。
それがプログラマさんのお仕事れす。

**nobodyさん** · 04/05/12 18:52

いいかげんウゼェ！
専用スレがあるんだからそっちでやれや！

PHP + PostgreSQL
http://pc5.2ch.net/test/read.cgi/php/983128806/

**nobodyさん** · 04/05/12 19:37

質問～。
xrea鯖でC言語CGI使えるってんで、やってみようと思い、
ローカルで動作確認してageてみたら動きません。
何か設定とか必要でつか？

**nobodyさん** · 04/05/12 19:54

>>680
コンパイルしてからうｐしたか？

**nobodyさん** · 04/05/12 20:46

してからウｐしますたけれど・・・。
駄目ぽ？

**nobodyさん** · 04/05/12 20:48

動きませんなんて言ってるやつは放置しとけ

**680** · 04/05/12 20:53

じゃ、放置しといてください。

**nobodyさん** · 04/05/12 21:02

どうした？
気が付いて恥ずかしくなったか？ｗ

**nobodyさん** · 04/05/12 21:07

xreaのサポート掲示板で聞けばいいのになんでここで聞くのだろうね？
しかも何をどのようにやったかも書かずに、ただ「動きません」だもんな。
鯖が厨に使わせると危険と判断して拒否したのかもなｗ

**nobodyさん** · 04/05/13 06:27

「bccとかでコンパイルした」に一票。

**nobodyさん** · 04/05/13 07:53

Linuxでgcc使ってコンパイルしる
xreaって鯖でコンパイル可だったっけ
昔トクトクでコンパイルしてxreaで動かしたって話を聞いたことがある。

**nobodyさん** · 04/05/13 09:56

perlのforeachとmap・・・・・・

mapの方が処理が早いらしいね・・・・foreachって・・・・

**nobodyさん** · 04/05/13 10:32

>>688
サーバ上でできるよ。
一番手軽なのはPerlのsystem関数でgccを実行する方法。

**nobodyさん** · 04/05/13 10:55

>>689
へーと思ってちょっと試してみたが逆の結果が。
ダマサレタ...

use Benchmark qw(:all);

@a = (1..1000);

timethese(100000, {
sum_foreach => sub {
my $sum;
for (@a) { $sum += $_ }
},
sum_map => sub {
my $sum;
map { $sum += $_ } @a;
},
});

を実行すると

Benchmark: timing 100000 iterations of sum_foreach, sum_map...
sum_foreach: 44 wallclock secs (44.29 usr + 0.00 sys = 44.29 CPU) @ 2257.85/s (n=100000)
sum_map: 47 wallclock secs (46.58 usr + 0.00 sys = 46.58 CPU) @ 2146.84/s (n=100000)

**nobodyさん** · 04/05/13 10:55

と思ったのだが、最後の式がサブルーチンの値になってしまうので
mapの値はいらないことが処理系にわかるように少し直して

use Benchmark qw(:all);

@a = (1..1000);

timethese(100000, {
sum_foreach => sub {
my $sum;
for (@a) { $sum += $_ }
$sum
},
sum_map => sub {
my $sum;
map { $sum += $_ } @a;
　　　　$sum;
},
});

とすれば

Benchmark: timing 100000 iterations of sum_foreach, sum_map...
sum_foreach: 45 wallclock secs (44.25 usr + 0.00 sys = 44.25 CPU) @ 2259.89/s (n=100000)
sum_map: 43 wallclock secs (42.00 usr + 0.01 sys = 42.01 CPU) @ 2380.39/s (n=100000)

疑って悪かった。ごめんよ。

**nobodyさん** · 04/05/13 13:35

ハテナ　アンテナみたいに
PINGなしの通常サイトの更新を教えてくれるサービス教えてチョ

**nobodyさん** · 04/05/13 16:24

foreachの生きる意味をみんなで考えてみよう・・・

**nobodyさん** · 04/05/13 16:50

簡単にP3Pを導入する方法教えて～

自鯖のページにてクッキーを挿入
↓
別鯖に飛んで指定のページをめくったら
イメージタグで自鯖のCGIを呼び出す
↓
前に入れておいたクッキー情報を(識別用の文字列と時間の２つだけでつ)
テキストファイルに吐き出す

IEのセキュリティの設定を変えないと上手くいかない～

**nobodyさん** · 04/05/13 22:25

>>695
鏡の前で「あぽぅ」って馬場さんのマネしてみ

**nobodyさん** · 04/05/13 22:38

activeperlインスコしたいんだけどさ、何故かうまくいかんのよね。
win98:ie6で容量も空いてるんだけどね。

とりあえずよくあるactiveperlインスコ講座みたいなサイトは見尽くしたんだけどさ、
インストーラ入れてmsiファイルを落として。インストーラsetupして、

そしてmsiファイルのactiveperl5.6をダブルクリック!!

って言ってもファイルの関連付けができてないから、アプリ選択になるのよね。一体どのアプリで起動させるのかわからんち。

PERLの質問板ってもうどこも廃墟っぽいだけど、どこに行くのが一番いいかな

**nobodyさん** · 04/05/13 22:45

>>697
Win98の場合、まず Windows Installer というのを入れないとだめぽ。
http://support.microsoft.com/default.aspx?scid=kb;ja;292539

**697** · 04/05/13 23:35

>>698
ちゃんといれてあるぽ。

今、msiファイルってのがなんなのか説明読んでたら、もしや！？と思って落としたactiveperl5.613の
ファイルの関連付けを、その他から選んでインストーラ（InstMsiA.exe）にしてみたよ！

そしたら
Command line option syntax error. Type Command/?for HELP.
訳）ライン・オプション・シンタックス・エラーを抑制してください。Command/?for HELPをタイプしてください。

だってさ。とりあえずこのエラーの意味を調べる事にしたよ。

**nobodyさん** · 04/05/13 23:45

>>699
InstMsiA.exeはアーカイブファイルじゃねぇか。
そんなものに関連付けて動くわけないだろ。
Windows Installerを正しくインストールすればmsiファイルは関連付けされて
ダブルクリックでインストールできる。

**nobodyさん** · 04/05/14 00:07

まさかInstMsiA.exeをダウンロードした時点で
インストールできたと勘違いしてるわけじゃないよね。

**697** · 04/05/14 00:13

正しくインスコできてないってことかぁ・・・正しくインスコできれば関連付けは自動。
自動でなんていうアプリケーションに関連付けられるてるんだろ。

インスコが失敗ってアンインスコのやり方もわからんちだしな。アプリケーションの追加と削除の中にもないんだよね。

って書きながらも色々試してたら、msiexecとかいうやつを見つけたからそれに関連づけてみたけど失敗。

お腹空いたぽ

**697** · 04/05/14 01:03

できたぽ

c:\windows\systemフォルダの中にあるmsiexecってやつを恐る恐る削除してインスコもう一度
やってみたら、正常にインスコを完了できた。PERLのインスコまで完了。

・・・できてみるとあっけない。でも５時間も掛かった・・・・ありがとう

**nobodyさん** · 04/05/14 07:06

>>694
use Benchmark;
my @aa = 1..10;
my @bb = 10..20;
timethese(-1, {
'foreach' => sub {
foreach my $xx (@aa) {
foreach (@bb) { my $yy = "$xx-$_" }
}
},
'map' => sub {
map {
my $xx = $_;
map { my $yy = "$xx-$_" } @bb
} @aa;
},
});

古いバージョンだとmapは全般的に遅かったような。

**nobodyさん** · 04/05/14 10:00

それは>>691,>>692で書かれているようにmapの戻り値がいらないことを
処理系が判断できないので戻り値の配列を作ってしまっているから。

foreach版と同じことをさせてるならmapの戻り値はいらないはずなので

'map' => sub {
map {
my $xx = $_;
map { my $yy = "$xx-$_" } @bb;
1;
} @aa;
1;
},

としてみ。逆転すると思うよ。

**nobodyさん** · 04/05/14 13:52

foreachとmapはどちらが先に生まれたの？同時かな？

**nobodyさん** · 04/05/14 14:16

perl
モジュールをインストールするってどういうこと？モジュールって
use モジュール名;
って記述するcgiファイルと同じディレクトリにあればいいんじゃないの？

そういうことを勉強するならここっていうお勧めのサイトないでせうか。

**nobodyさん** · 04/05/14 14:40

perl のモジュールには、大雑把に分けて
・純粋に perl スクリプトだけで構成されたモジュール
・CやC++のコードと組み合わせて構成されたモジュール(XSモジュール)
の二種類がある。
前者の場合、*.pm を適切にコピーしさえすればたいてい動く。
しかし後者の場合は、CやC++のコードをコンパイルする作業も必要になる。
Crypt::SSLeay, DBI, HTML::Parser, Image::Magick, NKF, Unicode::Map8 などは後者。

詳しい話は Perlモジュールスレの方がいいかも。

**707** · 04/05/14 15:28

>>708
ありがと。かなりわかりやすい説明だった。

あれからぐるぐる回ってたら、どうやらactiveperlはppmとかいうの使えば知識要らないYO!
とかに気づいてbulid638入れてプロンプトから
ppm install パッケージ名;
って打ち込んだだけでできちゃった；

その後>>708をみたらより理解できた。本当にありがと。

**704** · 04/05/15 06:44

>>705
どーもです。了解しました。

**nobodyさん** · 04/05/15 10:23

で、foreachの存在意義だが、

foreach (1..$N) {～}

と

map {～} 1..$N;

あたりでどうだろうか。mapだと先に1..$Nのリストを生成
してからの処理になるらしく、$Nが大きくなると遅いし、
とても大きな値にするとOut of memory!で終わってしまう。
foreachはカッコの中が範囲だと特別扱いしてるらしく
そんなことはない。

あとmapではlastとか使えないってのもあるな。

**nobodyさん** · 04/05/15 15:03

>>711
そもそも用法・用量を守っていない悪寒。

**nobodyさん** · 04/05/15 18:10

foreach (@values) { s/a/b/g; }
@new_values = map { s/a/b/g } @values;

foreachは繰り返し。
mapはf(x)。

**nobodyさん** · 04/05/15 20:58

要するに「文意で使い分けろ」っちゅーことですな。
スピードが気になるんならアセンブラかCで書いてろと(これは漏れの感想ね)ｗ

**nobodyさん** · 04/05/15 23:20

>>714
まだちょっと違和感があるような。
返り血が必要か否かって事なんだけど。

**nobodyさん** · 04/05/16 00:07

・foreachは制御構造
・mapは関数

**nobodyさん** · 04/05/16 00:10

foreachはずんどこべろんちょだって事を考えれば自ずと必要性も見えてくるかと

**nobodyさん** · 04/05/16 00:51

しかしPerlコーディングスレの方にふさわしい話題だな

**nobodyさん** · 04/05/16 20:04

ずんどこべろんちょを誤解している悪寒。

**nobodyさん** · 04/05/16 20:05

CGIスクリプトのチャットを設置しましたが、時刻が数分ずれています。
対処方法を教えてください。

**nobodyさん** · 04/05/16 20:09

>>720
サーバの時計をあわす

**nobodyさん** · 04/05/16 20:11

>>720
117に電話してどっちが正しい時刻なのか確認しる！
話はそれからだ。

**nobodyさん** · 04/05/16 20:59

ずんどこべろんちょって何ですか?

△▲ WebProg 初心者の質問 Part8 ▼▽

△▲　WebProg 初心者の質問 Part8　▼▽