2006-02-17 メモ Perl $line == 0 $line >= 1 $current_page == 0 ○ ○ $current_page >= 1 × ○ 条件が分からなくなったらとりあえずはカルノー図を描いてみる。とりあえず、$line || !$current_pageかな? あと、よほど簡単な場合はともかく、ループカウンタに$iとか$jとか、安易な名前はやめなきゃ。何を示すか分かりやすい名前を付けないと、後からコードを見直したときに、すごく読みにくいです。