Trouble Sending Mail to remote smtp server

[ed_hatt3]

Good Day,

I am trying to send email to a remote smtp relay with the following
code .. The message is sent but to the localhost and not the server I
am requesting. The code is very basic so I am not sure what is wrong ?
Any ideas ?

thanks,

Eddie


use Mail::Sendmail;

%mail = ( mail{smtp} => '10.10.10.2',
To => 'y...@there.com',
From => 'm...@here.com',
Message => "This is a very short message"
);

sendmail(%mail) or die $Mail::Sendmail::error;

print "OK. Log says:\n", $Mail::Sendmail::log;