Perlについての質問箱 30箱目

Perlについての質問箱 ..

820:デフォルトの名無しさん
07/05/27 04:22:02
@lines = <LOG>;

の部分を

my @tmplines = <LOG>;
push(@lines, @tmplines);

の２行に置き換えてください。
千奈美に最後のやつしか残らないのは、

@lines = <LOG>;

が上書きしてるからです。
だから最後の結果しか残らない。

次ページ