全てのメッセージを開く [ 最初の画面に戻る ]


PerlInquire Ver.3.01の集計結果についてKENTA楼2011/06/21(火) 21:08No.2861
Re: PerlInquire Ver.3.01の集計結果について
飾り職人ひで2011/06/22(水) 09:42No.2862
このメッセージに返信する ホームページ

ループを途中で抜けるには、lastを使います。
253行目を以下のように変更して下さい。

【修正前】
            foreach (sort {$total{$b} <=> $total{$a}} keys(%total)) {

【修正後】
            $count = 0;
            foreach (sort {$total{$b} <=> $total{$a}} keys(%total)) {
                if (++$count > 3) { last; }

解決しましたKENTA楼2011/06/22(水) 14:56No.2863

返信入力フォーム

お名前
E-mail
Web
件名
本文

HTMLタグを有効にする

※IPアドレスを記録しています。悪質な投稿はお止め下さい。


PerlTreeBBS Ver.2.31