if( $FOX->{$GB->{FORM}->{'bbs'}}->{'BBS_FORCE_NONAME'} )
{
my $BE_Coomands = '';
$BE_Coomands = $+{cmd} if $GB->{FORM}->{'FROM'} =~ s/^(?<cmd>!¥w)//;
$GB->{FORM}->{'FROM'} = $FOX->{$GB->{FORM}->{bbs}}->{'BBS_NONAME_NAME'};
$GB->{FORM}->{'mail'} = $BE_Coomands;
}
を、
if( $FOX->{$GB->{FORM}->{'bbs'}}->{'BBS_FORCE_NONAME'} )
{
my $BE_Coomands = '';
$BE_Coomands = $+{cmd} if $GB->{FORM}->{'FROM'} =~ s/^(?<cmd>!¥w+)//;
$GB->{FORM}->{'FROM'} = $BE_Coomands . $FOX->{$GB->{FORM}->{bbs}}->{'BBS_NONAME_NAME'};
$GB->{FORM}->{'mail'} = '';
}
に修正。
メール欄にコマンド引き継いでどうする状態でした。