$EST{name_new}b
$EST{name_renew}b
# 2006/04/07 aramaki >>
#if($EST{rank_fl}){print qq|$EST{name_rank}b|;}
#if($EST{rev_fl}){print qq|$EST{name_rev}b|;}
#if($EST{keyrank}){print qq|ƒL[ƒ[ƒhƒ‰ƒ“ƒLƒ“ƒOb|;}
# 2006/06/24 aramaki 2>>
#if($EST{rank_fl}){
# print qq|$EST{name_rank}b|;
#}
#if($EST{rev_fl}){
# print qq|$EST{name_rev}b|;
#}
#if($EST{keyrank}){
# print qq|ƒL[ƒ[ƒhƒ‰ƒ“ƒLƒ“ƒOb|;
#}
if($EST{rank_fl}){
print qq|$EST{name_rank}b|;
}
if($EST{rev_fl}){
print qq|$EST{name_rev}b|;
}
if($EST{keyrank}){
print qq|ƒL[ƒ[ƒhƒ‰ƒ“ƒLƒ“ƒOb|;
}
# <<2
# <<
print<<"";
$EST{name_m1}b
$EST{name_m2}b
@
‚¨–⇂¹b ƒTƒCƒgƒ}ƒbƒvb ƒwƒ‹ƒvb V‹K“o˜^b
@
‚¨–⇂¹b ƒTƒCƒgƒ}ƒbƒvb ƒwƒ‹ƒvb V‹K“o˜^b
‘S“o˜^”$Cpre_ganeƒTƒCƒg
#
print <<"";
| $ganes{$Gno} # print <<""; |
#
print<<"";