Thanks for the correction. It works prefectly now.

Mike(mickalo)Blezien
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
Thunder Rain Internet Publishing
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  ----- Original Message ----- 
  From: Lawrence Statton 
  To: beginners@perl.org 
  Sent: Friday, August 03, 2012 9:04 AM
  Subject: Re: MIME::Lite setup


  On 08/03/2012 06:17 AM, Mike Blezien wrote:
  > Hello,
  >
  > We've been using the MIME Lite module for some time now. I need to set it 
up now so one of our scripts so the when some one replies to an email sent that 
the replies to a 'Reply-To' address instead of the 'From' address. Here how I 
have it coded now:
  >
  > my($msg);
  >
  >      $msg = MIME::Lite->new(
  >                   From        =>  'f...@mydomain.com',
  >                   To            =>  't...@anotherdomain.com',
  >                   Reply-To    =>  'repl...@mydomain.com',
  >                   Subject     =>  'Simple Test Email',
  >                   Data        =>  "This is a simple test message using 
MIME::Lite.",
  >                   );
  > $msg->send() or die $!;
  >
  > when the email is sent out, and you click the reply it stills goes to the 
'From' address instead of the 'Reply-To' address? I went through the docs for 
the module and I though it support the Reply-To field ? I'm I missing something 
here ? Any suggestions would be appreciated
  >
  >
  > Mike(mickalo)Blezien
  > =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
  > Thunder Rain Internet Publishing
  > -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

  You need to quote 'Reply-To' ... "-" is not in the list of characters 
  that will be auto-quoted by => separator.

  If you had used strictures, you would have gotten an error about the 
  bareword "Reply".

  What it did was take the value of "Reply" subtract the value of "To" 
  (with the result being 0) and assigned the "repl...@mydomain.com" to the 
  "0" header - which was cheerfully ignored.

  --L

  -- 
  To unsubscribe, e-mail: beginners-unsubscr...@perl.org
  For additional commands, e-mail: beginners-h...@perl.org
  http://learn.perl.org/


Reply via email to