!Parts1
<BR>
<FONT color="#0000FF"><B>sos2.cgi # ---------- USER DIRECTORY Line:34<BR>
perl/filepath.cgi # ---------- USER DIRECTORY Line:19</B></FONT><BR>
<b>$usrdir = 'userdata/'; # ユーザデータを格納するフォルダ</b><BR>
<TEXTAREA name="textfield" cols="100" rows="4" wrap="OFF">
$usrdir = 'userdata/';	  # ユーザデータを格納するフォルダ
#-ADD
$error  = 'error.log';	# 同一ＰＣ複数キャラ警告を送るファイル
#-END of ADD-SOSWiki0020v1.00-1-1/3
</TEXTAREA><BR>
<FONT color="#FF0000">※ error.log の部分は任意のファイル名にします。<BR>
※ userdata/0000.dat とすれば、ＩＤ：0000 のマイレコードに記録されます。<BR>
※ 時々ログ整理を行わないとファイルサイズが無限に膨らみます。<BR>
新規ファイルにエラーログを記録する際は、事前にそのファイルを作成して下さい。</FONT><BR>
（空のファイルでＯＫ。）<FONT color="#FF00FF">パーミッションは（666|606）</FONT><BR>

!Parts2
<BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Make New # Line:523<BR>
perl/option.cgi # Sub Make New # Line:143<BR></FONT></B>
<b>chmod(0666,"$usrdir$id\.dat");</b><BR>
<TEXTAREA name="textarea2" cols="100" rows="5" wrap="OFF">
	chmod(0666,"$usrdir$id\.dat");
#-ADD-
	&amp;cookie_get;
	if ($c_id && $c_id ne $id &amp;&amp; $ps ne $admpas) {
		@errorline = &amp;opendat(&quot;$error&quot;);
		push (@errorline,&quot;$c_id\t$c_name\t$c_pass\t$id\t$Fm{'name'}\t$Fm{'pass'}\n&quot;);
		&amp;writedat($error,@errorline);
	}
#-END of ADD- SION0020v1.00-2-3/3
</TEXTAREA><BR><BR><BR>
<B><FONT color="#0000FF">sos2.cgi # Sub Make Continue # Line:548<BR>
perl/option.cgi # Sub Make Continue # Line:168<BR></FONT></B>
<B>$fg = ''; &userout;</b><BR>
<TEXTAREA name="textarea" cols="100" rows="5" wrap="OFF">
	$fg = ''; &userout;
#-ADD-
	&amp;cookie_get;
	if ($c_id && $c_id ne $id &amp;&amp; $ps ne $admpas) {
		@errorline = &amp;opendat(&quot;$error&quot;);
		push (@errorline,&quot;$c_id\t$c_name\t$c_pass\t$id\t$nm\t$ps\n&quot;);
		&amp;writedat($error,@errorline);
	}
#-END of ADD- SAIL0020v1.00-2-2/3
</TEXTAREA>