罪罰改造板２/75

               }
               # 二重表示対策 04.02.06
               print qq|<li>$y1[43]<hr>\n| if($y1[43] ne $buff);
               $buff=$y1[43];
       }

       # 著作権表示（削除禁止）
       print "<hr>\n";
       &copyright;
       exit;
}