Unable to send an email from perl script.

I am trying to send an email from a perl script using MIME::Lite.  I see this error:
"5.7.0 Must issue a STARTTLS command first",

The email doesn't go out.  I am newbie in this area, please give me step-by-step instructions to resolve this.

Note that I have disabled firewall, but saw no difference.  Also, I tried ports 465 and 587.

This is the perl script I am using:
#!/usr/bin/perl -w
 
# use MIME::Lite package
use MIME::Lite;
 
# set up email
$to = "yyyy\@gmail.com";
$from = "yyyy\@gmail.com";
$subject = "Email Sent via Perl";
$message = "This email was sent using Perl.";
$file = "abc.html";
 
# send email
email($to, $from, $subject, $message, $file);
 
# email function
sub email
{
 # get incoming parameters
 local ($to, $from, $subject, $message, $file) = @_;
 
 # create a new message
 $msg = MIME::Lite->new(
  From => $from,
  To => $to,
  Subject => $subject,
  Data => $message
 );
 
 # add the attachment
 $msg->attach(
  Type => "text/plain",
  Path => $file,
  Filename => $file,
  Disposition => "attachment"
 );
 
 # send the email
 MIME::Lite->send('smtp', 'smtp.gmail.com', Timeout => 60);
 $msg->send();
}

Open in new window

FolsomiteAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Kim RyanIT ConsultantCommented:
Did you want to specify a mail host of 'smtp.gmail.com' ? The host would normally be the name of the host mail server provided by your ISP, or work organization, one which you have an account setup. It may also need a username and password specified.
0
FolsomiteAuthor Commented:
All the examples I have seen online show host is smtp.gmail.com (when using gmail account to send the email).  The gmail help page also says the same thing: http://mail.google.com/support/bin/answer.py?hl=en&answer=13287

What is the syntax for specifying the username and password?
0
Kim RyanIT ConsultantCommented:
The problem seems to be the need to use TLS or secure sockets, which MIME::Lite will not support. You could try this module http://search.cpan.org/~mincus/Mail-Webmail-Gmail-1.09/lib/Mail/Webmail/Gmail.pm and use specify your password and username
0
Determine the Perfect Price for Your IT Services

Do you wonder if your IT business is truly profitable or if you should raise your prices? Learn how to calculate your overhead burden with our free interactive tool and use it to determine the right price for your IT services. Download your free eBook now!

FolsomiteAuthor Commented:
SSL is not installed on my machine; however, installing SSL from cpan website seems almost impossible task, because SSL needs SSLeay, TLS and other perl modules.  This thread gives the various issues with getting the SSL installed: http://www.experts-exchange.com/Software/Server_Software/Web_Servers/Apache/Q_22873843.html?sfQueryTermInfo=1+perl+ssl

As for the module teraplane suggested, it in turns needs SSLeay to work---which I couldn't successfully install, look at the above thread for details on the issues.
0
Kim RyanIT ConsultantCommented:
Is gmail your only option? It would be much easier to use a POP mail account if you hace access to one.
0
FolsomiteAuthor Commented:
I have att.net email account which ,I think, is a POP mail account (http://www.wurd.com/settings.php#Accessing). I updated my script to use att email and server, but I am seeing other errors.  

If you have an example of a working script with POP mail account, could you forward it (of course, without password and user ID)?
0
Kim RyanIT ConsultantCommented:
The example you have looks fine. Just change the send command to something like this

MIME::Lite->send('smtp','some.host',
       AuthUser=>$user, AuthPass=>$pass);
$msg->send();
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Kim RyanIT ConsultantCommented:
Any luck with my last suggestion?
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Email Servers

From novice to tech pro — start learning today.