Skip Menu |
 

This queue is for tickets about the Net-SMTP-TLS CPAN distribution.

Report information
The Basics
Id: 78699
Status: new
Priority: 0/
Queue: Net-SMTP-TLS

People
Owner: Nobody in particular
Requestors: jwing [...] us.ibm.com
Cc:
AdminCc:

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



Subject: Incorrect sprintf format
Date: Tue, 31 Jul 2012 18:39:51 -0400
To: bug-Net-SMTP-TLS [...] rt.cpan.org
From: John Wingenbach <jwing [...] us.ibm.com>
Download (untitled) / with headers
text/plain 960b
Net::SMTP::TLS Version 0.12 sprintf format results in the following error: Invalid conversion in sprintf: "%S" at /usr/local/share/perl5/Net/SMTP/TLS.pm line 254, <GEN0> line 10. Missing argument in sprintf at /usr/share/perl5/vendor_perl/IO/Socket/SSL.pm line 711, <GEN0> line 10. Invalid conversion in sprintf: "%S" at /usr/share/perl5/vendor_perl/IO/Socket/SSL.pm line 711, <GEN0> line 10. The sprintf format needs to be a lowercase s. Not uppercase. The following patch resolves the issue. --- TLS.pm 2012-07-31 18:34:30.999412218 -0400 +++ TLS.pm.new 2012-07-31 18:35:04.742337009 -0400 @@ -251,7 +251,7 @@ my $me = shift; my $user= $me->{User}; my $pass= $me->{Password}; - $me->_command(sprintf("AUTH PLAIN %S", + $me->_command(sprintf("AUTH PLAIN %s", encode_base64("$user\0$user\0$pass",""))); my ($num,$txt) = $me->_response(); if(not $num == 235){ -- John Wingenbach


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.