お前らのデスクトップを晒してくださいinFF・DQ板

##################################################
#############☆(02)メインルーチン☆###############
##################################################

#config.cgiの読み込み。
open(CONF,"./config.cgi")|| &error("config.cgiが開けません","no");
@conf=<CONF>;
close(CONF);
foreach(@conf){tr/\x0D\x0A//d;}
($sitename,$subtitle,$nanashiname,$delmessage,$resusuu,$suresuu,$menusuu,$sureseigen,
$hostrec,$wrescheck,$trescheck,$new,$lockkey,$delcheck,$mailing,$mailto,$sendmail,$ng,
$ngword,$namecolor,$capcolor,$sagecolor,$titlecolor,$body,$rogo,$table,$table2,$table3,$table4,
$table6,$readresbody,$koukoku,$readtitlebody,$itenmessage,$pass,$htmlpath,$htmlzpath,$cgizpath,
$kaigyouseigen,$shouryakuseigen,$countzpath,$rogosita,$version,$imode,$ranking,$ipath,$head,$headsuu,
$headbody,$headtable,$jst,$meta)=@conf;
# jcode.plのパス
require './jcode.pl';
&decode;

if($FORM{mode2}){
&set_cookie;
$location="$cgizpath/megabbs.cgi?board=$board&remake=off";
&pass;
}
else{&get_cookie;&header2;}
if($FORM{mode2} eq "スレッドごと飛ばす"){&suretobasi;}
elsif($FORM{mode2} eq "削除"){&ressakujo;}
elsif($FORM{mode2} eq "移転"){&sureiten;}
elsif($FORM{mode} eq "tobasu"){&surekakunin;}
elsif($FORM{mode} eq "sakujo"){&reskakunin;}
elsif($FORM{mode} eq "iten"){&itenkakunin;}
if($FORM{mode2}){&header;}else{&footer;}
exit;