##===================================== ## エラー表示 サブルーチン = ##===================================== sub error { print <<"END"; Content-type: text/html ERROR $_[0] $_[0]

$_[1]

You click this, and please move to a screen in front.




END exit; } 1