Subject: | starttls_ok should pass arguments to IO::Socket::SSL |
It should be possible to overwrite IO::Socket::SSL connection parameters with starttls_ok:
$smtp->starttls_ok( 'enstablish TLS connection',
'SSL_verify_mode' => SSL_VERIFY_NONE,
);
Additional the default starttls inherited from Net::SMTP_auth will not work, because it modifies @ISA:
my $status = $smtp->starttls(
'SSL_verify_mode' => SSL_VERIFY_NONE,
);
ok( $status, 'enstablish SSL connection');
$smtp->supports_ok( 'AUTH', 'server must support AUTH after STARTTLS');
Will end up with:
...
ok 4 - enstablish SSL connection
Can't locate object method "supports_ok" via package "Net::SMTP::_SSL" at test-smtp-bug.pl line 23.
# Tests were run but no plan was declared and done_testing() was not seen.
# Looks like your test exited with 255 just after 4.