$Server->Mail() and specifying mailhost

[Broc Seib]

I want to specify my mail host at the moment I call $Server->Mail();

I see I can pass in some %smtp_args to the Net::SMTP new() constructor:

  $Server->Mail({
    'To' => $to,
    'From' => $from,
      :
      :
    },
    %smtp_args,
  );

But looking at the code of Net::SMTP (version 2.19) it only accepts as
a scalar first argument the name of the mailhost. Net::SMTP::new does
this by checking to see if there are an odd number of args in @_;

Anyhow, I'd like to be able to do this like:

  $Server->Mail({
    'To' => $to,
    'From' => $from,
      :
      :
    },
    mailhost,
    %smtp_args,
  );

Comments anyone?
-broc

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]