Skip Menu |

This queue is for tickets about the Email-Send-SMTP-Gmail CPAN distribution.

Report information
The Basics
Id: 115822
Status: resolved
Priority: 0/
Queue: Email-Send-SMTP-Gmail

People
Owner: Nobody in particular
Requestors: alexandrea514 [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Sending a simple email generate compilation errors but works
Date: Sat, 2 Jul 2016 20:26:35 -0400
To: bug-Email-Send-SMTP-Gmail [...] rt.cpan.org
From: Alex Planete <alexandrea514 [...] gmail.com>
Hi Peco, After a year of not using my Perl program and changing my laptop and Windows OS, I updated the module files as Email::Send::SMTP::Gmail. Now, I'm having errors with this module: Email::Send::SMTP::Gmail Below are the errors and the simple Perl code lines. May you help or provide me instructions? Thanks by advance. Alex Module: http://search.cpan.org/dist/Email-Send-SMTP-Gmail-1.01/ Perl : v5.16.2 OS : Windows 10 The last version of IO::Socket::SSL is installed : http://search.cpan.org/~sullr/IO-Socket-SSL-2.029/ <http://search.cpan.org/dist/IO-Socket-SSL-2.027/> ========================== errors ======================= Show quoted text
>perl -w Email_SMTP_Gmail-2016.pl
Argument "" isn't numeric in bitwise and (&) at C:/Perl/site/lib/IO/Socket/SSL.pm line 2309, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 2724, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 1467, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 659, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 695, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 747, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 772, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 782, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 802, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 772, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 782, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 802, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 817, <GEN0> line 10. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 2756. Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at C:/Perl/site/lib/IO/Socket/SSL.pm line 2768. Show quoted text
>Exit code: 0
========================== end of errors ========================== ========================== code ======================= use strict; use warnings; use Email::Send::SMTP::Gmail; my ($email,$error)=Email::Send::SMTP::Gmail->new( -smtp=>'smtp.gmail.com ',-login=>'alexandrea514@gmail.com',-pass=>'XXXXXXXX.'); print "session error: $error" unless ($email!=-1); $email->send(-to=>'alexandrea514@gmail.com', -subject=>'Hello ! ', -body=>'Just testing it'); $email->bye; ========================== end of code ==========================
Hello Alex, It seems to be an issue with the lib SSL (C:/Perl/site/lib/IO/Socket/SSL.pm) and your version of Perl in Windows. I'm using Linux with SSL 2.029 and Perl 5.18 and I'm unable to reproduce the issue :-/ Check Net::SMTPS is also updated (0.04) Thanks On Sat Jul 02 20:27:15 2016, alexandrea514@gmail.com wrote: Show quoted text
> Hi Peco, > > After a year of not using my Perl program and changing my laptop and > Windows OS, I updated the module files as Email::Send::SMTP::Gmail. > Now, I'm having errors with this module: Email::Send::SMTP::Gmail > Below are the errors and the simple Perl code lines. > May you help or provide me instructions? > Thanks by advance. > Alex > > Module: http://search.cpan.org/dist/Email-Send-SMTP-Gmail-1.01/ > Perl : v5.16.2 > OS : Windows 10 > > The last version of IO::Socket::SSL is installed : > http://search.cpan.org/~sullr/IO-Socket-SSL-2.029/ > <http://search.cpan.org/dist/IO-Socket-SSL-2.027/> > > > ========================== errors =======================
> >perl -w Email_SMTP_Gmail-2016.pl
> Argument "" isn't numeric in bitwise and (&) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 2309, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 2724, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 1467, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 659, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 695, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 747, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 772, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 782, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 802, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 772, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 782, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 802, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 759, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 762, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 817, <GEN0> line 10. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 2756. > Use of uninitialized value $IO::Socket::SSL::DEBUG in numeric ge (>=) at > C:/Perl/site/lib/IO/Socket/SSL.pm line 2768.
> >Exit code: 0
> ========================== end of errors ========================== > > > > ========================== code ======================= > use strict; > use warnings; > use Email::Send::SMTP::Gmail; > my ($email,$error)=Email::Send::SMTP::Gmail->new( -smtp=>'smtp.gmail.com > ',-login=>'alexandrea514@gmail.com',-pass=>'XXXXXXXX.'); > print "session error: $error" unless ($email!=-1); > $email->send(-to=>'alexandrea514@gmail.com', -subject=>'Hello ! ', > -body=>'Just testing it'); > $email->bye; > ========================== end of code ==========================
No more info. Assume fixed