▼以下のように改造(835行目あたり) # [エラー処理] # sub er_ { if (-e $lockfile) { unlink($lockfile); } &hed_("Error"); print "□<a href=\"JavaScript:history.back()\">BACK</a>\n"; print "<hr>\n"; print "<center>ERROR - $_[0]</center><br>\n"; &foot_; }