罪罰改造板３/119

# UAランキング
$top_ua         = $CP{'top_ua'};
$nm_ua         = $CP{'nm_ua'};
$top2_ua         = $CP{'top2_ua'};
$nm2_ua         = $CP{'nm2_ua'};
$top3_ua         = $CP{'top3_ua'};
$nm3_ua         = $CP{'nm3_ua'};
 if($top_ua<$ua){
   $top3_ua = $top2_ua;
   $nm3_ua = $nm2_ua;

   $top2_ua = $top_ua;
   $nm2_ua = $nm_ua;

   $top_ua = $ua;
   $nm_ua = $nm;
  }elsif($top2_ua<$ua && $nm_ua ne $nm){
	$top3_ua = $top2_ua;
	$nm3_ua = $nm2_ua;

	$top2_ua = $ua;
	$nm2_ua = $nm;
　}elsif($top3_ua<$ua && $nm2_ua ne $nm && $nm_ua ne $nm){
	$top3_ua = $ua;
	$nm3_ua = $nm;
}

•  if($top_ua<$ua){ 
        $top2_ua=$top_ua if($nm2_ua eq $nm);
        $nm2_ua=$nm_ua   if($nm2_ua eq $nm);
        $top_ua=$ua;$nm_ua=nm;     
   }elsif($top2_ua<$ua && $nm_ua ne $nm){
        $top3_ua=$top2_ua if($nm3_ua eq $nm);
        $nm3_ua=$nm2_ua   if($nm3_ua eq $nm);
        $top2_ua=$ua;$nm2_ua=nm;
   }elsif($top3_ua<$ua && $nm2_ua ne $nm && $nm_ua ne $nm){
        $top3_ua=$ua;$nm3_ua=nm;
   }