- 団員がいないギルドの自動削除 -

※このプログラムを追加したことによって発生した損失は補償いたしかねます


・手順１（inc-period.cgiの編集）
１０行目付近のif文が始まる直前に次を追加


#ギルド自動削除処理
	undef %guildcount;
	foreach(@DT)
	{
		$guildcount{$_->{guild}}++;
	}
	foreach(keys(%GUILD))
	{
		if($guildcount{$_} <= 0){
		#各ファイルを削除する
		unlink($COMMON_DIR."/".$_.".pl");
		unlink($COMMON_DIR."/".$_.".gif");
		unlink($COMMON_DIR."/bbslog-".$_.".cgi");
		unlink($COMMON_DIR."/gstock-".$_.".cgi");
		unlink($COMMON_DIR."/gstocklog-".$_.".cgi");
		}
	}



星おしまい星



P.S.
各ファイルを削除のところは設定お願いします。


（例１）
次の場合は、commonディレクトリ内の ギルドコード.pl というファイルが削除されます。
		unlink($COMMON_DIR."/".$_.".pl");

（例２）
次の場合は、commonディレクトリ内の bbslog-ギルドコード.cgi というファイルが削除されます。
		unlink($COMMON_DIR."/bbslog-".$_.".cgi");


製作者(http://www.bizinesu.com)