in reply to Sending Mail on a Windows Machine
Thanks again everyone! w00t!#!/usr/bin/perl use lib 'path\to\lib'; use Mail::Mailer; $sender = 'sender@email.com'; $recipient = 'recipient@email.com'; $subject = 'test'; $message = 'test'; $smtp = new Mail::Mailer 'smtp', Server => localhost; $smtp->open({ From => $sender, To => $recipient, Subject => $subject}) + or die "Can't open: $!\n"; print $smtp $message; $smtp->close(); print "Content-type: text/html\n\n"; print "hello world<br/>\n";
|
|---|