I am trying to modify an existing script that uses MIME::Lite->send
I am trying to take any debug output and send it through a Debug
function which goes to a log file so I can see if there is an error.
Am I doing this correctly?:
I'm not using die because I think that sends it to stdout. The
documentation for "Debug=>1" also says it sends it to stdout. How do
I redirect it into a string variable or something that allows me to
output it to a file?
MIME::Lite->send( "smtp", ZM_EMAIL_HOST, Port=>'465', Debug=>1,
AuthUser=>'[EMAIL PROTECTED]', AuthPass=>'somepassword' Timeout=>60 )
or Debug("Failed to mailSend: $!\n");
mail->send() or Debug("Failed to mailSend: $!\n");
Thanks.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
