くだすれPerl（超初心者用）3

**nobodyさん** · 2009/03/31(火) 22:20:27

このスレッドは、他のスレッドでは書き込めない超低レベル、
もしくは質問者自身何が何だが分からない質問を勇気を持って書き込むスレッドです。
Perl使いが優しくコメントを返しますが、
お礼はPerlの布教と初心者の救済をお願いします。

前スレ
くだすれPerl（超初心者用）2
http://pc11.2ch.net/test/read.cgi/php/1204488452/

関連スレ
Perlについての質問箱 39箱目
http://pc12.2ch.net/test/read.cgi/tech/1234181856/
Perlコーディング初心者質問スレ Part 59
http://pc11.2ch.net/test/read.cgi/php/1234752149/
【Perl上級者コーナーPart01】
http://pc11.2ch.net/test/read.cgi/php/1024741312/

**nobodyさん** · 2009/03/31(火) 22:23:20

ＰＥＲＬ（笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑笑）

時代はPHPですよ
化石ども必死だな

**nobodyさん** · 2009/04/02(木) 16:40:02

>>1乙

と言っておこう

**nobodyさん** · 2009/04/02(木) 16:46:23

ブログではなく、自身のホームページにコメント欄を設置したいのですが、
コメントを送信したら自動的にhtmlに上書きされてページがリロードされるような
プログラムはどのように書けば良いですか？

考え方を教えていただければ自分で勉強しながら作ってみようと思いますので
どうかよろしくお願いします。

**nobodyさん** · 2009/04/02(木) 18:30:57

表示したいHTMLがindex.htmlだとして、例えばindex_source.htmlを別に用意して
中に「#####REPLACE_HERE#####」みたくユニークな文字列を生めておく。
そこをコメントで置換してindex.htmlに上書きする。

**nobodyさん** · 2009/04/02(木) 22:09:04

大昔のCGIのようなperlしか知らなかったので
最近オブジェクト指向を勉強しているのですが、なかなか理解できません。

たとえばタブ区切りテキストの外部ファイルを読み込んで
それぞれのデータを車というオブジェクトにして処理をしたい場合、

use Car;

sub new {
my $class = shift;
....
}

とコンストラクタを作って、テキストから読み込んだデータを引数とした
オブジェクトを作っていくことになると思うのですが、
すべてのデータに対してオブジェクトを作成するには

my @cars;
while (@lines) {
my ($name, $price, ....) = split /¥t/;
my $obj = new Car $name, $price, ...;
push @cars, $obj;
}

といった処理を行うことになるのでしょうか。
解説サイトなどを読むと、なんだか違うような気もするのですが
こういう具体的な使い方に関する記載のあるサイトが見つかりません。

この理解で正しいかどうか、正しくないならどういった用法が正しいのか
ご教示いただければ有り難いです。よろしくお願いします。

**nobodyさん** · 2009/04/02(木) 23:03:49

例が所々気になるのは横に置くとして…。

そりゃ「オブジェクト指向側（モジュールね）」のコーディング次第だろ。
呼び出し側は、オブジェクト指向側の説明を読んでその指示通りに
コーディングするしかない。
あなたが使いたいモジュールがあるならその説明を読めば良いし、
オブジェクト指向側のコーディングをしたいなら、どうするか明確に決めて
作成すれば良い。

具体的には、その例で、package Car （だよね）がセル単位で処理する
（=行毎）なら、呼び出し元でも、行単位でオブジェクトを作成して、
行単位で処理せざるを得ない。

**nobodyさん** · 2009/04/02(木) 23:05:00

ああ、上げちまったorz...

**nobodyさん** · 2009/04/03(金) 02:33:22

俺もオブジェクト指向は初心者ですが…

まずコンストラクタにはハッシュにして渡すのが一般的だと思う
ブレスするときどーせハッシュにするんだから、渡すときもハッシュのがメモリ的にも都合がいいんじゃないかな

6 · 2009/04/03(金) 03:50:19

>>7
何をやりたいのか書いてませんでしたね、ごめんなさい。

やりたいのは車のデータを各パラメータごとに比較したり
条件に合うものを抽出したりしつつ、
データに変更を加えて保存し直したりといった作業なんです。
なので、読み込んだデータを元に
その分だけのオブジェクトを生成する必要があるのかなと考えました。
既存モジュールの使用は今のところ考えていません。

>>9
確かに、ハッシュにして受け渡すのが一般的ですね。失念していました。
サンプルのコードもぐだぐだです…申し訳ないorz

**nobodyさん** · 2009/04/03(金) 11:27:31

>>5
遅くなりましたが、どうもありがとうございます。
試してみます

**nobodyさん** · 2009/04/04(土) 05:04:43

>>10
sqlとの連携は考えてないと

じゃあインスタンス変数には車一台一台よりも車のデータ全部と条件を入れるようにした方がいいかも

{
　cars => [{一台目のデータ色々}, {二台のデータ色々},…],
　condition => {limit => 120, offset => 60…},
}
こんな感じのハッシュ作ってbless
空のハッシュをblessしてから色々付け足してもいい
条件は変更可能なようにセッターを作っておく
読み出し先が決まってるならnew内でハッシュの形に変換してやるだけでいいから引数には条件以外渡す必要はない
こうしてやると比較メソッドも抽出メソッドも車オブジェクトを２つ作って～ってやるより簡単に実装できると思う
ここではカタログを作る方が絶対に正しい

知らんけどな

**nobodyさん** · 2009/04/04(土) 12:46:52

全くの初心者です。
とりあえず本に書いてあるとおりに打ち込んでるんですが、

require 'cgi-lib.pl';

と言う文に関してですが、「cgi-lib.pl」というファイルは普通パールをインストールしたときに入っているものなのでしょうか？
どこを探しても見つからないのですが。
パールは5.8.8を使ってます。

**nobodyさん** · 2009/04/04(土) 13:07:00

cgi-lib.plでぐぐれば鬼のようにヒットする

**nobodyさん** · 2009/04/04(土) 13:08:15

>>14
そうなんですか；
すみませんでした。
検索してきます。

**nobodyさん** · 2009/04/13(月) 12:18:35

すいません。初心者です。

$hoge = ($hoge1, $hoge2)[$hoge3];

という記述が出てきたのですが、よく意味がわかりません。
$hogeにはどういう値が入るのでしょうか。
よろしくお願いします。

**nobodyさん** · 2009/04/13(月) 12:26:48

print $hoge;すればわかるよ

**nobodyさん** · 2009/04/13(月) 19:01:36

my @list = ('hoge', 'huga');
print $list[0];

これは分かるよな？

my ($foo, $bar) = ('hoge', 'huga');
print $foo;

これも分かるよな？

my $baz = ('hoge', 'huga')[0];
print $baz;

じゃぁ、これも分かるよな？

**nobodyさん** · 2009/04/13(月) 22:37:57

質問です。txt形式の100個以上のデータが一つのフォルダに入っていて、
これを全部開いてその内容を一つのデータにまとめたいです。
yahoo知恵袋を参考にしたところ、コマンドプロンプト上で表記する場合は
while(<*.data>)
{
## $_には、*.DATAなファイル名が格納されている。
open(F,"$_"); ##openする。
while(<F>)
{
##読み出された内容が$_に格納されている。
print $_; ##出力してみる。
}
}

でよい、とされていました。なのでmatome.txtというファイルに展開するとして
open(F1,">matome.txt")
while(<*.txt>)
{
open(F2,"$_");
while(<F2>)
{
print F1 $_;
}
}

としたところ延々と一部を除いたデータだけの書き込みを行ってしまいました。
まず、なぜこの書式では無限ループになるのかがわかりません。
また、なぜファイル内のデータで*.txt形式に当てはまっているものの一部が
省かれてしまったかがわかりません。
長くなってしまい申し訳ありませんがどなたか教えてください。
よろしくお願いします。

**nobodyさん** · 2009/04/13(月) 23:59:17

matome.txtから読んでmatome.txtに書いているのか

**nobodyさん** · 2009/04/14(火) 02:04:04

>20
19ですが
ありがとうございました
やっとわかりました

この場合はmatome.txtは別のファイルに入れるべきなのでしょうか
別のファイルに入れて、ディレクトリが異なる場合でもpath指定したら
問題なく作動するのでしょうか？
何度か別ファイルにあるtxtデータに書き込むと失敗するのですが、
pathに日本語があるとだめなのでしょうか？
ちなみにwindows XPを使用しています。