Perl/CGI issue

[Iridium]

I have a strange issue with my CGI contact forms on my newest dedicated server.
Take a look at the two attached CGIs(txts).

The only way I can get this CGI mailer to work is to make the recipient one-of-my@domains.com email addy. If I make it ANY other email addy, it doesn't mail out.(or the recipient does NOT receive the email)

Why would that be?

Thanks!

[ALL]

try using this function insted:

sub email_somone{
open(MAIL, "|/usr/sbin/sendmail -t") or return 0;
print MAIL, "Reply-to: $_[1]";
print MAIL, "Subject: $_[2]";
print MAIL, "To: $_[0]";
print MAIL, "Content-type: text/plain\n\n";
print MAIL, $_[3];
close(MAIL);
return 1;
}

use the following syntex with it, email_somone(to, replyto, subject, contents)

NOTE: this is an untested script, but in theory it should work!

-ALL