#------------------------------------------------------------------------------- # 記事表示部 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>