[photoの場合]

photo.cgiの
72行の
$value=${$in_ref}{$name};
の下に
if($value=~/\0/){
	&error("不適切な投稿である可能性があります。");
}

と追加して
141行の
$imgfile=$FORM{'num'}.$ext;
を
$imgfile=time.$$.$ext;
と変更

admin.cgiの
61行の
$value=${$in_ref}{$name};
の下に
if($value=~/\0/){
	&error("不適切な投稿である可能性があります。");
}
と追加して

126行の
$imgfile=$FORM{'num'}.$ext;
を
$imgfile=time.$$.$ext;

と変更


[i-regの場合]

i-reg.cgiの
73行の
$value=${$in_ref}{$name};
の下に
if($value=~/\0/){
	&error("不適切な投稿である可能性があります。");
}

と追加して
142行の
$imgfile=$FORM{'num'}.$ext;
を
$imgfile=time.$$.$ext;
と変更

admin.cgiの
60行の
$value=${$in_ref}{$name};
の下に
if($value=~/\0/){
	&error("不適切な投稿である可能性があります。");
}
と追加して
125行の
$imgfile=$FORM{'num'}.$ext;
を
$imgfile=time.$$.$ext;
と変更

以上です。