sub print_rank{ #$FORM{xx}→$LC_xxに変換 local( $LC_kt=$_[0], #$FORM{kt} $LC_mode=$_[1], #$FORM{mode} $LC_page=$_[2], #$FORM{page} $Stitle, #タイトル ); if($LC_mode eq "rank"){$Stitle="人気ランキング";} elsif($LC_mode eq "rank_bf"){$Stitle="前回の人気ランキング";} else{$Stitle="人気ランキング(累計)";} if($LC_kt){$Stitle.=" - " . $ganes{$LC_kt};} local($Eref=$ENV{HTTP_REFERER}); $Eref=&url_en($Eref); # (↑修正不可↑)--> print<<""; $Stitle

ホーム > # print<<"";
$Stitle
# # print<<"";
  [More] [New Window]
[他のカテゴリ] [サイトマップ] [ヘルプ] [修正・削除]
# print<<"";
##一括削除用のフォーム出力(上) &get_cookie; if($CK_data[3] && !($EST{html} && $ganes{$LC_kt})){ print<<"EOM";
EOM } {local($sec,$min,$hour,$mday,$mon,$year,$wday); if($LC_mode eq "rank"){ ($sec,$min,$hour,$mday,$mon,$year,$wday)=localtime((stat("$EST{log_path}rank_ys.cgi"))[9]); } elsif($LC_mode eq "rank_bf"){ ($sec,$min,$hour,$mday,$mon,$year,$wday)=localtime((stat("$EST{log_path}rank_ys_bf.cgi"))[9]); } else{ ($sec,$min,$hour,$mday,$mon,$year,$wday)=localtime((stat("$EST{log_path}rank_rui.cgi"))[9]); } $mon++; $year+=1900; $youbi=('Sun','Mon','Tue','Wed','Thu','Fri','Sat')[$wday]; $last_mod=sprintf("%04d/%02d/%02d($youbi) %02d:%02d", $year,$mon,$mday,$hour,$min,); } # (↑修正不可↑)--> print<<""; は$EST{name_m1}、 は$EST{name_m2}です。 この色の文は管理人のコメントです。
※リンク先が無くなっている等の問題がある場合にはタイトル横の [管理者に通知] リンクを押してください

最終更新:$last_mod

# print<<""; $PRmokuji $PRmokuji # print<<"";
# # print<<"";
#