if (grep $_ eq $t, @DXMsg::badmsg) {
# push @out, "Sorry, $t is an unacceptable TO address";
push @out, $self->msg('m3', $t);
if (grep $_ eq $t, @DXMsg::badmsg) {
# push @out, "Sorry, $t is an unacceptable TO address";
push @out, $self->msg('m3', $t);