罪罰改造掲示板/24

elsif(!$type && $cmd==30)
{ require './inc/ore_sub-fore.cgi'; &fore; }

print<<EOM;
<tr>
<form method="$method" action="./ore_.cgi">
<td>
<input type="hidden" name="id" value="$id">
<input type="hidden" name="pw" value="$pw">
<input type="hidden" name="cmd" value="30">
<input type="submit" value="†　外　交　†" class="button1">
</td>
</form>
</tr>
EOM