www.pudn.com > sangoku_26_zh_tw.rar > entry.cgi

#!/usr/bin/perl 
 
################################################################# 
#   【免責事項】                                                # 
#    這個腳本是免費軟體。使用了這個腳本的任何損失作者不承擔一切 # 
#    的責任。有關設定的問題對支援公告版提出。或直接由於郵件說明 # 
#    問題。                                                     # 
################################################################# 
 
require 'jcode.pl'; 
require './ini_file/index.ini'; 
require 'suport.pl'; 
 
if($MENTE) { &ERR2("系統維護中。請稍後再試。"); } 
&DECODE; 
 
if($mode eq "") {require 'entry/entry.pl'; &ENTRY; } 
elsif($mode eq 'NEW_CHARA') { require 'entry/new_chara.cgi';require 'entry/data_send.pl';&NEW_CHARA; } 
elsif($mode eq 'DATA_SEND') { require 'entry/data_send.pl';&DATA_SEND; } 
elsif($mode eq 'RESISDENTS') { require 'entry/resisdents.pl';&RESISDENTS; } 
elsif($mode eq 'ATTESTATION') { require 'entry/attestation.cgi';&ATTESTATION; } 
elsif($mode eq 'SET_ENTRY') { require 'entry/attestation.cgi';&SET_ENTRY; } 
else{require 'entry/entry.pl';&ENTRY;}