トップページ⇒php
1001コメント371KB

Perlコーディング初心者質問スレ Part 49

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん2006/05/31(水) 04:32:28ID:???
Perlのコーディングで困ってる人のスレです。

【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。

1： 自分はこういう事がしたい。
2： それでこんな風にやってみたが･･･
3： こんなエラーが出て上手く行かなかった。

最低でも1と3が無いと誰も答えられないよ。
ソース貼る時は、全角スペースでインデント忘れずに。
良い回答は良い質問から。一緒に勉強しましょう。

過去ログやお勧めサイトは >>2-10
06416292006/06/19(月) 17:50:36ID:???
>>631

おおthx。
文面が記憶と違うけど載ってるのは
まちがってなかったか。

あ、俺の記憶が怪しかったってことね。
06426162006/06/19(月) 18:06:04ID:???
>>640
なぁんとなく解ってきたようなきてないような。

$hoge = '質問スレ';
print "初心者$hoge";
と書くのは正しいけど、
$hoge = '初心者質問スレ';
print "$hoge";
と書くのは厳密には正しくない、みたいなことかな。

上の例で言えば、どうしてもダブルクォートで揃えたいなら
open(FILE, "$file");
とは書かず
open(FILE, "< $file");
と書いた方が文法的（？）にはオケってことか。

ちょっとスッキリした。サンキューです！
0643nobodyさん2006/06/19(月) 18:18:13ID:???
>>642
いや、正しい正しくないの話じゃなくて。例えば、0から9まで処理するときに
for my $i (0..9) { }
と書いても、
{ my $i = 0;
while ($i <= 9) { }
continue { $i++ }
}
と書いても文法的には正しいし、同じように動くけれど、
前者のほうが無駄が無いし、間違い起こしにくいでしょ？みたいな話かと。
0644nobodyさん2006/06/19(月) 18:24:02ID:???
>>642
> print "初心者$hoge";

これも

print '初心者', $hoge;
こうか
print '初心者' . $hoge;
こう書かない？
06456162006/06/19(月) 18:43:23ID:???
>>643
そっちの解釈か！
ロクに入門書も読まず他人様の書いたコードを切ったり貼ったりしながら
適当に「学んだつもり」になってた人種にとっては耳の痛いお話ですわ。
システム面でのエラーが起こりにくい無駄のない書き方に拘泥して
稚拙なヒューマンエラー続発とか…自分には有り得そうで怖いなぁ。
とは言っても、そんなんでは進歩はないので心掛けて書き直すかな！

>>644
例が悪かったかもかも。
print "<SPAN STYLE=\"color:$hoge\">２ちゃんねる</SPAN>";
みたいなのを想定で。
0646nobodyさん2006/06/19(月) 18:46:17ID:???
ラクダ本の24章Perlの常識を読むといいよ。
0647nobodyさん2006/06/19(月) 18:53:57ID:???
>>644
>print '初心者' . $hoge;
これは無いなぁ。連結コストかかるから
06486162006/06/19(月) 18:54:13ID:???
>>646
刮目します。
0649nobodyさん2006/06/19(月) 19:10:40ID:???
>>642
んー。他の人も言ってるけどちと違う。
別にどっちで書いても文法的には正しいし動作もする。

"$file" みたいにダブルクォートで括ると(無名の)「文字列の生成」が起こる。
内容は$fileと全く同じ。

だったら新しく生成しなくても良いんじゃないの？って話。
同じもの２個作ってどうするよ。無駄だよね。
しかも、 open(FH, "$file"); じゃ、生成した所ですぐに使い捨て。
だったら open(FH, $file); の方が無駄な変数作らなくて良い。
まぁそんだけだけど。
06506162006/06/19(月) 19:41:40ID:???
>>649
>"$file" みたいにダブルクォートで括ると(無名の)「文字列の生成」が起こる。
！！
先生『週刊そーなんだ』にも掲載すべきだと思います。
懇切丁寧な説明により、ようやく合点がいきました。

しかし、ラクダ本読むのには時間もだけど体力要るな…。
0651nobodyさん2006/06/19(月) 22:55:15ID:Fr5nT8/W
久しぶりにperlCGIで遊んでいます。
ちょっと知り合いのサイトを作ってあげよかなと思いまして、
いろいろ遊びたいのでとりあえず全部のページをCGIにしようと今メモ帳を眺めてるのですが。

プログラム本体にHTMLを書いていくとなんか物凄く長くなってしまいますよね。
でも10ページくらいでも1000行くらいは簡単に超えますね。

なんかそのやり方がすきになれないのですが、かといって.txtにhtml本文を書いておいて
読み込み手法も納得いかない。

出力内容を作成するルーチンだけ.plで別にしても結局はイマイチ。

読みやすく拡張しやすくスッキリとした手法をかなり神経質なレベルで考えていますが、
アドバイスもらえたらとおもって投稿しました。

少しコーディングから離れるというか、前段階の話になるので気が向いた方だけで
かまいませんので宜しくお願いします。
0652nobodyさん2006/06/19(月) 23:06:33ID:???
何を言ってるのか意味が分からないけど
とりあえず HTML::Template でも使っとけ
0653nobodyさん2006/06/19(月) 23:08:51ID:???
Template Toolkitを勧めたいところだがCGIじゃ重いかねぇ。
最近Catalystばかりなのでわかんね。
06546512006/06/19(月) 23:12:39ID:Fr5nT8/W
>>652
HTML::Templateは知っていますが、そういうことではないんです。
うまく説明できませんのでスルーしてもらってもm(__)mごめんなさい。


例えば普通にhtmlファイルのまま全部のページを公開してるとしますよね。
１０ページだろうが１００ページだろうが、拡張していくときに面倒はありませんし、
把握もとても単純なんですよね。

それをCGIにするとイマイチなんです。
スマートじゃなくなるというか。ゴミゴミするというか。
もちろん同じフォーマットの文章だけ違うような場合はいいのですが。

それぞれのページで違いますので。
0655nobodyさんNGNG
なぜ全部のページをCGIにしようと思ったの？
0656nobodyさん2006/06/20(火) 00:18:19ID:???
>>653
TTは重すぎてCGIじゃ無理。
06576172006/06/20(火) 00:38:01ID:???
>>621
> 安全措置が施されていて、use re 'eval';しないとデフォルトでは動かないんだこれが。

ウホッ! ありがと。
0658nobodyさん2006/06/20(火) 01:00:18ID:???
>>645
他を選択する合理的な理由がない場合、ファイルオープンには常に 3引数の open を使うのが良い習慣だと思います。
正しくは、「どんな場合でも、その必要がなければ 2引数の open を使わない」なんだけれど。
0659nobodyさん2006/06/20(火) 01:21:04ID:???
>>654
・共通する部品と各ページに固有の部品をそれぞれ抽出
・各部品をファイルに保存 # この時、プログラムから利用しやすい形で保存しておく
・CGI が叩かれた時に必要な部品を読込み、それらを組み合わせて返す

全リソースが静的なら、こーゆーのは SSI の仕事で CGI でやるメリットはないと思う。
抽出の粒度と保存スタイルさえ適切ならディスクの節約にはなるかもね。
0660nobodyさん2006/06/20(火) 01:29:57ID:???
>>651
ヒアドキュメント使えば、表示したいHTML＋５行ぐらいでcgiに出来ますよね？
”拡張性がある”というのをどういう状況を指して言ってるのか分からないですが、・・・
0661nobodyさん2006/06/20(火) 03:32:08ID:???
すいませんちょっと質問させていただきます。
Perlの練習の意味を込めて、今現在CGIでホームページを作成しています。
（ただ単に、HTMLを出力するだけのCGIです）

そこで質問なのですが、
「http://yomi.pekori.to/s/yomi.cgi?mode=kt&kt=02」の用な感じにページを分けたいのですが、考え方が分かりません。
自力で「http://yomi.pekori.to/s/yomi.cgi?mode=kt」まで分けることはできるのですが、
その後にさらに「&kt=02」を足して
「http://yomi.pekori.to/s/yomi.cgi?mode=kt&kt=02」というページを作成する方法が分かりません・・・　orz

正直、自分でやってもうまくいかないし、何て検索していいのかも分からず途方に暮れています・・・

よろしくお願いします。
0662nobodyさん2006/06/20(火) 03:59:35ID:???
$ENV{'QUERY_STRING'}をいろいろ条件にかければOK
CGI.pmを使ってるならparam('mode')、param('kt')で欲しい値が取れる
ので、それを条件にかければOK
0663nobodyさん2006/06/20(火) 04:48:28ID:???
>651
自分のスクリプトではこんな感じにしてます。


$template{'##TITLE##'} = "TEST";
$template{'##CONTENTS##'} = "本文";

&templateprint("template.html", %template);

sub templateprint{
　　my($inputfile, %data) = @_;
　　my($templatetext);
　　if(open(FHTEMPLATE, $inputfile)){
　　　　read(FHTEMPLATE, $templatetext, (-s FHTEMPLATE));
　　　　close(FHTEMPLATE);
　　　　while (my($pos, $val) = each %data){
　　　　　　$templatetext =~ s/$pos/$val/gi;
　　　　}
　　}
　　print $templatetext;
}
※ ここに貼り付けるにあたってエラー処理とかはばっさり削除してます
0664nobodyさん2006/06/20(火) 07:13:05ID:???
なんで全部のページを CGI でやろうと思うんだろ。
テンプレート使うとかブラウザからページ作成する、とかでない限り無駄でしかないんだけどｗ
0665nobodyさん2006/06/20(火) 07:27:32ID:???
デザインの統一＆デザイン変更時を考えると管理しやすいと思うが・・・
あと HTML 編集時のミスも極力防げるし。
サーバーの負担以外はプラス面ばかりだとは思う。個人的にはだけどね
06666512006/06/20(火) 08:03:26ID:5983Ww81
>>660
例えば１０ページ分を一つのファイルにまとめると物凄いうざくなりますよね。
HTML自体が長くても所詮は.htmlで保存公開してるならスッキリ感があるんですが、
それをひとつのファイルにまとめると最悪な感じなんです。
html的に最悪ということです。

見渡しにくいコード・ソースというのが嫌いなのです。

逆に外部ファイルが１０個も２０個もあるのもイヤなんです。

というジレンマなんです。
0667nobodyさん2006/06/20(火) 08:27:29ID:???
>>665
デザインなんてCSSファイル変えるだけじゃん。
テーブルレイアウトやってるならあれだけどね。

>>666
CGI でやること自体見渡しにくいし、何kbのCGIファイル作る気だよ・・・
テンプレートは嫌だって言うし・・・
もう、あれだ、perl より php でやったらｗ
0668nobodyさん2006/06/20(火) 09:59:21ID:???
>>666
普通に１つのページに対して、１個のCGIにすれば？
というかperlはヒア演算子があるから、既にHTMLが出来てるなら、
#!/dir/perl
print <<HTML;
content-type:xxxx

HTML
で、とりあえずすぐにcgiになる。で、なんか動的要素追加したかったら
前の部分にちゃちゃっと書けば、ある程度拡張できるし・・・
というか何を目指してるのかがいまいち分からない・・・
0669nobodyさん2006/06/20(火) 10:21:31ID:???
質問：
10ページ分のHTMLを一つのCGIファイルにまとめてたい。
でも、大きくなって見通しも悪いのでどうにかしたい。
複数ファイルは死んでも嫌。

回答：
HTML::Templateは変数にテンプレート入れて動かせるよ。
0670nobodyさん2006/06/20(火) 11:14:51ID:???
sub >>669 {
　return >>654
}

これ多分無限ループ
0671nobodyさん2006/06/20(火) 11:57:30ID:???
CGI.pmでさえ、ちょっとしたHTMLを吐けるのに
0672nobodyさん2006/06/20(火) 11:57:50ID:???
HTMLでいいじゃん
0673nobodyさんNGNG
うちはhtmlにjavascript(cgi)入れて
動的なページっぽく見せてるお＾＾
0674nobodyさん2006/06/20(火) 12:20:28ID:5Ut+7oeu
あるPerlプログラムを実行したら
セグメンテーションエラーになってperl.coreというファイルを吐いて死んでしまいます。
perl.coreというファイルは何に使うのでしょうか？
0675nobodyさん2006/06/20(火) 12:26:38ID:???
651について考証。

[ケース1]
Perlを熟知しているが無意識に「Perl（CGI） ＞ HTML」というイメージにとらわれている。

[ケース2]
Perlはそこそこできるが、HTML::Templateについて実はよく理解していない。

[ケース3]
Perl習いたてで、Perlを万能低級言語であるかのような錯覚に陥っている。

[ケース4]
HTML、CSS、JavaScriptについて実はよく理解していない。

[ケース5]
そもそも、対象としているHTMLソース自体が汚いから誰がやってもまとまらない。
0676nobodyさんNGNG
普通にコアダンプじゃねーの
アセンブラの知識があれば読めます
0677nobodyさん2006/06/20(火) 12:31:44ID:???
[ケース6]
>>675 は、「ケース」「考証」という単語を並べてみたかった。
0678nobodyさん2006/06/20(火) 12:39:34ID:???
651はdbで解決だな
06796742006/06/20(火) 12:49:03ID:5Ut+7oeu
Segmentation fault (core dumped)
とでています。
perl -dでデバッグを行ってみたのですが、ある部分でずっとCPUを100%使い切ったまま止まっているように見えます。

このperl.coreはどのように役立てればよいのでしょう？
ググっても参考になる情報が載っていないので‥
0680nobodyさんNGNG
バグとして報告するか
デバッガ使って読んで下さい
0681nobodyさん2006/06/20(火) 14:11:30ID:T0oahEq/
whileについて質問。

ファイル（$log）の中身を１行ずつチェックしながら処理する場合、
open ( FH, $log );
と開いたとして、

@array = <FH>;
$limiti = @array;
while ( $limiti > 0 ) {
　処理;
　$limiti --;
}
とするのと
while(<FH>){
　処理;
}
とするのは同じこと？
どっちでもできるなら後者の方が無駄な変数無い分よろしい？
0682nobodyさんNGNG
前者は一気に読み込んでるのでメモリを多く使用する
0683nobodyさん2006/06/20(火) 14:18:25ID:???
>>681
明らかに前者は分かりにくい。ありえない。メリットも少ないし。
それでもメモリに展開するなら foreach (@array) {} にでもしなよ。
06846812006/06/20(火) 14:32:11ID:???
>>682>>683
後者の方法最近知ったんだけど、それまでずっと前者の方法でやってた・・・orz.

>明らかに前者は分かりにくい。ありえない。メリットも少ないし。
だよね！だよね！ハッキリ答えてもらえてかなりスッキリ。
しかも代替案まで出してもらって恐縮です。

どうもでした！
0685nobodyさん2006/06/20(火) 14:44:49ID:???
コアは食べろ。体にいいぞ。
06866512006/06/20(火) 18:41:22ID:5983Ww81
>>667
CSSレイアウトは正確に書いても正確にレンダリングされるわけではありませんので、
バグ対応を考えるとテーブルレイアウトの方がよほどデザインの変更は私にとっては簡単です。
06876512006/06/20(火) 18:54:06ID:5983Ww81
>>675
ケース６

ある一つのファイルを開けた時の見渡しやすさを確保するには一ページずつhoge.cgiにすれば
.htmlほどではないが準じたレベルで解決。
でもそれだとperlとしてボツ。

要は見渡しやすさと効率と利便性と拡張的と省エネと論理的という理想がそれぞれで
ぶつかりあって毎度動きはするけど納得いかないレベルのものになってしまうのです。

ここらでこのジレンマを解決したいのですが。

strictHTMLと作る側の利便性と効率的且つ拡張的なHTMLは反発しますよね。
そんな感じかもしれません。

m(__)m
0688nobodyさんNGNG
完全CGIのサイトを作ってあげる
↓
高負荷でレスポンス激重or鯖缶から垢デリ
↓
水の泡
06896512006/06/20(火) 19:19:53ID:5983Ww81
>>688
いや。まあかまわないのですがそれも。
作る自体遊びなので。
0690nobodyさん2006/06/20(火) 19:37:08ID:???
a;a1;10
b;b1;10
c;c1;10

と記述したファイルがあるのですが、
例えばb;b1;10の10を11に書き換えたい場合はどうすればいいのでしょうか？
0691nobodyさん2006/06/20(火) 19:40:22ID:???
HTMLのソースが見難いものである以上無理じゃね？
0692nobodyさん2006/06/20(火) 19:45:22ID:???

ファイルじゃなくてどうゆうふうに変数に入れてるのか家




まぁ、データ整理がうまく言ってないだけだと思うけど、たぶん想像だけど無難なトコでは

@file = (
  ['a', 'a1', 10],
  ['b', 'b1', 10],
  ['c', 'c1', 10],
);

って感じでいいのか？
だとしたら

$file[1][2]++;
となる
0693nobodyさん2006/06/20(火) 20:02:06ID:???
>>651のやろうとしている事をやるなら、まずページごとに異なる部分だけを
データファイルなりなんなりで保存しておいて、Apacheのmod_rewrite使って
自動的にCGIにパスを渡すようにするかなー

ってこれブログじゃねえか！
0694nobodyさんNGNG
アロー演算子って省略できたのか、、
0695nobodyさん2006/06/20(火) 20:09:48ID:???
普通にMovaleTypeとどう違うんだろう。
Perlは初心者レベルの俺から見ても、
外部にhtmlの共通部分をテンプレートとして用意しておいて、
コンテンツをそこに流し込むだけでいい気がするんだけど。

>>686
それはCSSを知らないだけじゃない？
よっぽど変なレイアウトをしない限り、CSSハックとかちょっと組み合わせれば
主要ブラウザの表示の差異ぐらい普通に取り除けるぞ。
IE7でちょっと混乱しそうだが、IE7でCSSハックもできるようだから問題ないだろうし。
0696nobodyさん2006/06/20(火) 20:12:07ID:???
>>692
ファイルを読み込んで該当の一行を返し、それを;でsplitしています
ですので、変数としては@datに配列として入っています。
その@datの値を変更したのですが、ファイルに書き戻す方法がわかりません
0697nobodyさんNGNG
joinでおｋ
0698nobodyさん2006/06/20(火) 20:23:24ID:???
grepとsedを組み合わせることは出来ないですか？
マッチした行をsedしたいのですが
06996982006/06/20(火) 20:25:48ID:???
すいませんsedというか
s///です。
07006922006/06/20(火) 20:32:32ID:???
最初の質問と全然違うじゃねーかよ
>>697でおｋ
0701nobodyさん2006/06/20(火) 20:42:57ID:???
>>698
そのgrepはどっちのgrep?
コマンドか関数か
0702nobodyさん2006/06/20(火) 21:04:47ID:???
>>694
2個目以降は省略できるぉ
07036512006/06/20(火) 21:04:52ID:5983Ww81
>>691
いえ、htmlのソースは十分見やすいのです。
ただ、それを一つにまとめると長くなって見渡しやすさがなくなるのです。

>>693
昔携帯用サイトをそんな感じで作りました。

>>695
それはCSSに適したレイアウトをしてるからじゃないですか？
デザインレベルの段階で「これはCSSだと云々」と考えたりするのは
個人的には邪道なのです。

例えば写真がページごとに入る枚数が違って、写真と文字の位置の関係や
回り込みの仕方。文字のサイズを変えたときのかわり方、全体の長さによる背景の可変。

そして久しぶりにソース、コードを見た時のわかりやすさ。論理的でありながら効率的で。

長くお邪魔してしまいましたが、スレ汚しになってしまいますのでここらへんで消えます。
ありがとうございました。
0704nobodyさん2006/06/20(火) 21:08:51ID:???
>>696
そこまで分かってて自分で考えられないようじゃ（ｒｙ
07056512006/06/20(火) 21:17:35ID:5983Ww81
最後にすみません。

例えば
my $print_value;
if ($form{page} eq "index"){ $print_value = &tag_index}
と本文でやってインデックス用のページを作るサブルーチンから完成したソースを
返してくるとしますよね。

これでページがindexとblogとgalleryと3種類だけでもソースを返してくるルーチンを
3つ同じファイル内に書くと見渡しにくくなりますよね。

最高の解決としては。これはメモ帳レベルの問題なのですが、
同じファイルに書いておきながら

#このルーチンはどういう処理をして何を返すのかを軽く説明
sub tag_index{}　　###　このルーチンの中身を見るにはココをクリック！


こんな感じになれば最高なんです。これで10個のルーチンがあっても30行ほどでよくなります。
つまり10個のルーチンが画面内に収まるのですから処理の全体の流れがとてもわかりやすいのです。
これが私のいう見渡しやすさです。

外部にライブラリにすればいい。モジュールにすればいい。
いや。違うんです。ファイルをいくつも作るのはゴミゴミして嫌いなんです。
そして毎度引数を色々渡すのも嫌いなんです。

って、こんなメモ帳を自分で作ればいいのか・・・・・・・
terapadを使ってるのですが、このインターフェースに慣れてるので
サブルーチンはデフォルトでは表示されないとかになればいいのに。行数はもちろんトビトビになる仕様で。
0706nobodyさんNGNG
VisualStudioのエディタはそんな風になってるね
0707nobodyさん2006/06/20(火) 21:19:55ID:???
IDE使えや
0708nobodyさん2006/06/20(火) 21:20:03ID:???
CSSは邪道
ファイル複数にするのも邪道
HTML::Templateは使いたくない

これじゃどうしようもない…。
>>651 は何がしたかったんだろう。
0709nobodyさん2006/06/20(火) 21:22:25ID:???
なんだ、、サブルーチンが折り畳めるエディタはないですか？
っていう質問だったのか。。。
0710nobodyさんNGNG
むしろ適当なCMS使え
0711nobodyさん2006/06/20(火) 21:27:06ID:???
>>703
その辺も普通にCSSで実現できるな。
tableデザインにはそれなりのメリットがあるのはわかるが、
貴方は多分CSSデザインを過小評価しすぎてるよ。
否定するならちゃんと勉強してからがお勧め。
0712nobodyさん2006/06/20(火) 21:27:45ID:???
>>705
>こんな感じになれば最高なんです。
そういう風にコードを書けばいいんじゃね？ｗ
0713nobodyさん2006/06/20(火) 21:33:58ID:???
>>707
あまりの遅さにスーパーライセンスを剥奪されたっぽいから使えん。
07146512006/06/20(火) 21:34:10ID:5983Ww81
>>706-710
そういうエディタもあったのですか。
しょぼい結末になってすみませんです。

>>711
そうでしたか。CSSスレで回答者をしていたころはよく回答者同士で
実装について嘆いたものですが。
1年ほどCSSから離れていたあいだにブラウザに革命でもおきて全て解消されたのでしょうか。
失礼いたしました。
0715nobodyさん2006/06/20(火) 21:35:11ID:???
最後までちゃんと説明出来ない子だったな
07166512006/06/20(火) 21:40:19ID:5983Ww81
ごめんなさいm(__)m
優しくしてくれてありがとうございました。
0717nobodyさん2006/06/20(火) 21:59:49ID:???
651のIDが神がかりな件
0718nobodyさん2006/06/20(火) 22:01:41ID:???
なにがどう神がかりなのか、それを表す正規表現を書いてみてください。
0719nobodyさん2006/06/20(火) 22:14:59ID:???
皆様ありがとうございます。

ファイルを直接書き換えたいので、
open( FILE, ">>./dat/img_data.dat");
while(<FILE>){
s/$FORM{'tmp'}.*/$dat/;
print;
}
close( FILE);
このようにしているのですが、うまく動きません
原因がわかるかたいますでしょうか？
0720nobodyさん2006/06/20(火) 22:19:50ID:???
>>714
奇遇だな。
俺もそのスレの回答者をしていたりする。
0721nobodyさん2006/06/20(火) 22:20:56ID:???
>>714
amazon参考にしたら？ｗ
0722nobodyさん2006/06/20(火) 22:22:13ID:???
お、気づかない間に終わってる。
最後まで言ってることチンプンカンプンだったな。
どうでもいいけど、strict-HTMLとかCSSとかを心底使いこなせるほど覚えたのに、でもテーブルレイアウトのがいい、って言う人はじめて見た。
0723nobodyさん2006/06/20(火) 22:24:28ID:???
>>719
はちゃめちゃ過ぎる
0724nobodyさん2006/06/20(火) 22:27:29ID:???
かじった程度でやってたんじゃね？
CSSハック駆使してその程度のデザインが出来ないっておかしい
amazonがまさにやりたいデザインを実践してるように見えるし
0725nobodyさん2006/06/20(火) 22:31:51ID:???
>>723
すいません、
どこか教えてもらえませんか？
0726nobodyさん2006/06/20(火) 22:32:50ID:???
「ファイルを直接書き換えたい」ってのが既におかしいという話。

>>719
解決法そのいち：（メモリ喰うけど簡単だよ！）
配列に一回読み込んでから好きに書き換え、同じファイルに書き出す

解決法そのに：（メモリ喰わないけどちょっと面倒だよ！）
INとOUT、二つのファイルハンドルを作り、INで一行読んで好きに書き換え、OUTに書き出す
全部終わったら元ファイルを削除し、新ファイルを元ファイルと同じ名前にリネーム
0727nobodyさん2006/06/20(火) 22:36:01ID:???
どこがと言われてもなぁ。

>>719
> open( FILE, ">>./dat/img_data.dat");
追加書き込みで open してるのに
> while(<FILE>){
読もうとしてる。

しかも出力してるのはファイルじゃなくて
> print;
標準出力

そりゃうまく動かない。
というかこれが通るperlって凄いな。ある意味。

0728nobodyさん2006/06/20(火) 22:36:16ID:???
>>726
フォームから受け取ってるんだからそれは出来んでしょ
0729nobodyさん2006/06/20(火) 22:37:42ID:???
>>725
ここを直しても動かないけど、明らかにおかしいところ。

そのいち：
open( FILE, ">>./dat/img_data.dat");　は、追記オープンでしょ。

そのに：
print;　は標準出力でしょ。少なくとも print FILE $_; にしないとFILEの意味がない！

と書いてたら>>727に先を越された。

>>728
意味が分からない。
0730nobodyさん2006/06/20(火) 22:39:45ID:???
>>724
なんで amazon？ テーブルレイアウトバリバリじゃね？
0731nobodyさん2006/06/20(火) 22:51:15ID:???
レイアウトはリキッドデザインのCSSだよ。
0732nobodyさん2006/06/20(火) 22:54:19ID:???
ｺﾞﾒ、思いっきり記憶違いだったｗ
0733nobodyさん2006/06/20(火) 22:56:30ID:???
CSSとかスレ違いどころか板違いなんだから、あまりひっぱりすぎちゃダメだぞ☆

とW3C信者の俺が言ってみる
0734nobodyさん2006/06/20(火) 22:58:09ID:???
商品紹介のとこはリキッドデザインでCSSでfloat指定してるな。
この部分のことかね？
0735nobodyさん2006/06/20(火) 23:21:15ID:???
>>725
File::Inplace 使っとけ。
0736nobodyさん2006/06/21(水) 01:11:43ID:???
話がずれてるので、そろそろ終わりにしようや
0737nobodyさん2006/06/21(水) 12:25:23ID:Jpc8QU0a
・name.txtの中には「名前<>年齢<>性別<>電話番号<>住所」
　という情報が入っている。
・これを「住所」でソートして結果を出力（都道府県別という程度のソート）。
・その際、ブラウザにはフォームで選択した項目の情報だけを吐き出す。

ということをやりたいんですが、

1.openしてwhileで1行ずつ配列（@temp）に入れて処理。
　1-1.フォームで選択されていないものを@tempからspliceして除去。
　1-2.全ての都道府県にあらかじめ番号を付けておき、
　　　$temp[4]に当たる値とマッチングさせて、unshiftで@tempの頭にその番号を付ける。
　1-3.@newdataに@tempをpushで追加していく。
2.@newdataをソートして出力。

という方法しか思いつきませんでした。
でも、これだと不要な項目をループ処理の中で1回1回チェックしていて
ものすごく無駄なことをしている感じがします。
ファイルを開く前に必要な項目をチェックしておいて、
ファイルを開くときにはそれだけを取り出して処理する、
ということはできないでしょうか？
0738nobodyさん2006/06/21(水) 12:42:09ID:???
「自分で決めた順番でソートする」でググってそこをブックマークしとけ
あと>>681とそれに対するレス見て
07397372006/06/21(水) 12:56:08ID:Jpc8QU0a
>>738
ありがとうございます。
それにしても「自分で決めた順番でソートする」という
ピンポイントな文章で結果が出るとは・・・。
しっかりブックマークして読んできます。
0740nobodyさん2006/06/21(水) 13:10:47ID:QAUqj+Eu
1： 自分はこういう事がしたい。
cvs？といいますか、特定の文字で区切られた(12個)ファイルを読み込んで
二次元配列に入れて、処理をしたい。
2： それでこんな風にやってみたが･･･
for文(i++)で行を読み込んでから、それをさらにfor文(j++)で区切りずつに
わけ、その都度＄list[$i][$j]に入れていくようにしました。
3： こんなエラーが出て上手く行かなかった。
12行目に来たところで突然ちゃんと配列に入らなくなってしまいました・・・。
読み込むファイルに原因があるのかと思い、1行から20行まで同じ内容のファイルを作ったのですが
同じように読み込めませんでした・・・。どのようなことが原因と考えられるでしょうか・・・？
■ このスレッドは過去ログ倉庫に格納されています