>>430
とりあえず、この

($value ="") if($msg eq'' && $FORM{'md'} eq 'new');
if($FORM{'small_res'} ne "") {&small_res;$value='';}
if($FORM{'good'} ne "") {&judg;$value='';}
if(crypt($FORM{'postname'},'am') eq $delname){&del1;$value='';}
($value) && (&posttext);
&alllist;
&index;

気が狂ったようなメインルーチンを整理統合すべし。