罪罰改造板３/2

#-------------------------------------------------------------------------------
# 記事表示部
sub html {
       # 表示開始
       &header;

       if($mv_mode eq 'mv'){
               print <<"EOM";
$title
<form name="park" method="$method" action="$script">
<input type=hidden name=mode value="regist">
<input type=hidden name=id value="$id">
<input type=hidden name=pw value="$pw">
<input type=hidden name=time value="$time">        # <---
<input type=text name=comment size=8>
<input type=submit value="発言"><input type=reset value="クリア">
</form>