罪罰改造掲示板/7

require './letter_noti.cgi'; &noti;      # <-- ここ
$log1.=<<EOM;
<tt class="moji1" style="width:80%;">
<b>$nm</b>　　　<span style="font-size:12px">$seibetu[$sei]</span>&nbsp;&nbsp;&nbsp;&nbsp;ID: $id<br>
レベル <b>$lv</b>　階　級 <b>$cl[$rank]</b>　称　号 [<b>$sogo_p[$sogo]</b>]
$noti_mes<br>                            # <-- ここ

require "./letter_noti.cgi"; &noti;
$log1.=<<EOM;
<tt class="moji1">
<b>$nm</b>　　　<span style="font-size:12px">$seibet[$sei] 
</span>&nbsp;&nbsp;&nbsp;&nbsp;ID: $id<br>
レベル <b>$lv</b>　階　級 <b>$cl[$rank]</b>　称　号 [<b>$sogo_p[$sogo</b>]
<br> 討伐数 [<b>$we</b>]<br>
<br>

$now_nm
</div>
</td>
</tr>
<form name="park" method="$method" action="$script">
<tr>
<td colspan="2" nowrap style="font-size:12px">
<input type=hidden name=mode value="regist">
<input type=hidden name=id value="$id">
<input type=hidden name=pw value="$pw">
相手:<input type="text" name="nm" value="" class="button1"
style="width:120px;">(半角$com_limit文字迄)&nbsp;&nbsp;&nbsp;&nbsp;
自国一括通信:<input type="checkbox" name="camp" value="1"><br>
<textarea name=comment class="button1" rows="3"style="width:400px;"></textarea>
</td>
</tr>
<tr>
<td align="left" colspan="2">
<input type=submit value="発言／更新" class="button1" style="width:80px">
<input type=reset value="クリア" class="button1" style="width:60px">
</td>
</tr>
</form>

if($mv_mode eq 'mv'){
print <<"EOM";
<b>$title</b>
<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=text name=nm value=""><br>
自国一括:<input type="checkbox" name="camp" value="1"><br>
<input type=text name=comment value ><br>   # <--これが抜けてます
<input type=submit value="発言"><input type=reset value="クリア">
</form>