過去ログの書き出しについて

[上に] [前に] [次に]
猪狩 1999/06/09(水) 20:15:40
ログは
日付,名前,メール,コメント,題名,レス用の日付,レス番号,
($date1,$name1,$email1,$value1,$subject1,$resp,$cnt)
と、このように↓なっています。
--------------------------------------------------
06月09日(水)19時35分49秒,trh,,1,1,06月09日(水)19時35分49秒,1
06月09日(水)19時35分54秒,trh,,2,,06月09日(水)19時35分49秒,2
06月09日(水)19時36分01秒,trh,,3,,06月09日(水)19時35分49秒,3
06月09日(水)19時36分07秒,trh,,4,,06月09日(水)19時35分49秒,4
06月09日(水)19時36分13秒,trh,,5,,06月09日(水)19時35分49秒,5
06月09日(水)19時33分01秒,trh,,sdc,sdf,06月09日(水)19時33分01秒,1
06月09日(水)19時33分08秒,trh,,aa,,06月09日(水)19時33分01秒,2
06月09日(水)19時33分16秒,trh,,dadaadad,,06月09日(水)19時33分01秒,3
--------------------------------------------------
レスが５個付いた時点でそれをkako.txtに永久保存するためにかき出す
ようにしたいと思い、一番右のレス番号を利用して、
if($cnt == 5){
としたんですが、そこからどうループさせたらいいのかからないんです。
すぐ近くに
foreach (@new) {
($date1,$name1,$email1,$value1,$subject1,$resp,$cnt) = split(/\,/,$_);
push(@testr,$resp);
        chop($resp) if $resp =~ /\n/;
#chop($FORM{'res'});
if ( $resp eq $FORM{'res'}) { push(@ue,$_);
$cnt_ue = $cnt + 1;
}
という処理があって、これはどういう動きをしてるのかいまいち
わからないのですが、これは利用できないでしょうか・・・？
B-Cus 1999/06/09(水) 21:06:40
これ、何の話ですか? wwwchatじゃないですよね。
回答者がソース全体を見られるようにちゃんと配慮してね。
猪狩 1999/06/09(水) 22:14:18
すいません質問変えさせてください。
@newにログの全部がはいっているのですが、
ここから５行だけ取り出すにはどうしたらいいのでしょうか・・？
[上に] [前に] [次に]