<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><br><div apple-content-edited="true"> <span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Arial; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Arial; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Arial; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Arial; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><div><font class="Apple-style-span" face="Arial">I tried it and I can connect just fine:</font></div><div><font class="Apple-style-span" face="Arial"><br></font></div><div><font class="Apple-style-span" face="Arial"><div>$ ./gm.pl</div><div>MIME::Lite::SMTP>>> MIME::Lite::SMTP</div><div>MIME::Lite::SMTP>>> &nbsp; Net::SMTP(2.31)</div><div>MIME::Lite::SMTP>>> &nbsp; &nbsp; Net::Cmd(2.29)</div><div>MIME::Lite::SMTP>>> &nbsp; &nbsp; &nbsp; Exporter(5.58)</div><div>MIME::Lite::SMTP>>> &nbsp; &nbsp; IO::Socket::INET(1.29)</div><div>MIME::Lite::SMTP>>> &nbsp; &nbsp; &nbsp; IO::Socket(1.29)</div><div>MIME::Lite::SMTP>>> &nbsp; &nbsp; &nbsp; &nbsp; IO::Handle(1.25)</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 220 mx.google.com ESMTP k29sm1647585qba.7</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)>>> EHLO domain.com</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 250-mx.google.com at your service, [24.13.161.70]</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 250-SIZE 35651584</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 250-8BITMIME</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 250-STARTTLS</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 250 ENHANCEDSTATUSCODES</div><div>MIME::Lite::SMTP=GLOB(0x8afc84)>>> MAIL FROM:&lt;<a href="mailto:jay@duetloans.com">jay@duetloans.com</a>></div><div>MIME::Lite::SMTP=GLOB(0x8afc84)&lt;&lt;&lt; 530 5.7.0 Must issue a STARTTLS command first. k29sm1647585qba.7</div><div>SMTP mail() command failed:&nbsp;</div><div>5.7.0 Must issue a STARTTLS command first. k29sm1647585qba.7</div><div><br></div><div>Make sure you don't have a firewall blocking your connection (try telnet to debug [telnet smtp.gmail.com 465]). &nbsp;Or you might be on a RBL and they aren't accepting connections from your location.</div><div><br></div><div>-Don</div><br></font></div><div><font class="Apple-style-span" face="Arial">--</font></div><div><font class="Apple-style-span" face="Arial">Don Drake</font></div><div><font class="Apple-style-span" face="Arial"><a href="http://www.drakeconsulting.com">www.drakeconsulting.com</a></font></div><div><font class="Apple-style-span" face="Arial"><a href="http://www.maillaunder.com">www.maillaunder.com</a></font></div><div><font class="Apple-style-span" face="Arial">312-560-1574</font></div><div><font class="Apple-style-span" face="Arial">800-733-2143</font></div></div></div></span></div></span></span><br class="Apple-interchange-newline"></span><br class="Apple-interchange-newline"></div></span> </div><br><div><div>On Dec 13, 2008, at 7:30 AM, Jay Strauss wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div>Hi, I would have thought this would be well worn territory on google,<br>but I could not find out how to do this. &nbsp;Maybe its so elementary no<br>one posted an example.<br><br>I can seem to send an email via MIME::Lite using gmail's smtp. &nbsp;Here<br>is what I have and get:<br><br>#!/usr/bin/perl<br><br>use strict;<br>use MIME::Lite;<br><br>my $smtp_server = "smtp.gmail.com";<br>my $smtp_port &nbsp;&nbsp;= 465;<br>my $debug &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;= 1;<br>my $user &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;= "user";<br>my $passwd &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;= "password";<br><br>MIME::Lite->send('smtp', $smtp_server ,<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Port =>$smtp_port ,<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Timeout=>60 ,<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Debug => $debug ,<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Hello => 'domain.com',<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;User &nbsp;=> $user,<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Password &nbsp;=> $passwd);<br><br>my $msg = MIME::Lite->new(<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;From &nbsp;&nbsp;&nbsp;=><a href="mailto:'jay@duetloans.com">'jay@duetloans.com</a>',<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;To &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=><a href="mailto:'me@heyjay.com">'me@heyjay.com</a>',<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Subject =>'This is a test',<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Data &nbsp;&nbsp;&nbsp;=>"this is the body"<br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;);<br><br>$msg->send();<br><br>When I run it:<br>jstrauss@neon:~/bin$ email.pl<br>MIME::Lite::SMTP>>> MIME::Lite::SMTP<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;Net::SMTP(2.29)<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;&nbsp;&nbsp;Net::Cmd(2.26)<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Exporter(5.58)<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;&nbsp;&nbsp;IO::Socket::INET(1.29)<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;IO::Socket(1.29)<br>MIME::Lite::SMTP>>> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;IO::Handle(1.25)<br>MIME::Lite::SMTP=GLOB(0x83c9fd4): Timeout at<br>/usr/share/perl5/MIME/Lite.pm line 2634<br>Failed to connect to mail server: Bad file descriptor<br> at /home/jstrauss/bin/email.pl line 27<br><br>I feel its probably not connecting properly, but I don't see what to do.<br>Thanks<br>Jay<br>_______________________________________________<br>Chicago-talk mailing list<br><a href="mailto:Chicago-talk@pm.org">Chicago-talk@pm.org</a><br>http://mail.pm.org/mailman/listinfo/chicago-talk<br></div></blockquote></div><br></body></html>