Bug#728248: libnet-smtp-tls-butmaintained-perl: Uses wrong syntax in SSL_version argument and warning about invalid SSL version

[Salvatore Bonaccorso]

Package: libnet-smtp-tls-butmaintained-perl
Version: 0.17-1
Severity: important
Tags: upstream patch fixed-upstream
Control: forwarded -1 https://rt.cpan.org/Public/Bug/Display.html?id=77865
Control: fixed -1 0.21-1

Hi,

Net::SMTP::TLS::ButMaintained misuses the SSL_version argument on line
116:

116             $me->{sock}, SSL_version => "SSLv3 TLSv1"

which causes an error about use of invalid SSL version.

This is quite easy to reproduce by the example in the POD:

,---- [ test.pl ]
| #!/usr/bin/perl
|
| use strict;
| use warnings;
|
| use Net::SMTP::TLS::ButMaintained;
| my $mailer = Net::SMTP::TLS::ButMaintained->new(
|         'smtp.example.com',
|         Hello    =>      'some.host.name',
|         Port     =>       587,
|         User     =>      'test',
|         Password =>      's3cr3t',
| );
`----

# ./test.pl
invalid SSL_version specified at /usr/share/perl5/IO/Socket/SSL.pm line 332

(Opening this bugreport as I would like to ask for a proposed-update).

Regards,
Salvatore