次の Perl コードがあります。
use Email::Sender::Simple;
use IO::Socket::SSL;
IO::Socket::SSL::set_defaults(SSL_verify_mode => SSL_VERIFY_NONE);
Email::Sender::Simple::sendmail($email, { transport => $transport });
実行すると、次のエラーが表示されます。
Undefined subroutine &Email::Sender::Simple::sendmail called at script.pl line 73.
コードを次のように変更すると、機能します。
use Email::Sender::Simple qw(sendmail);
sendmail($email, { transport => $transport });
set_defaults のコードを次のように変更する必要はなかったのに、sendmail のコードを変更しなければならなかった理由を誰かが説明できますか。
use IO::Socket::SSL qw(set_defaults);
set_defaults(SSL_verify_mode => SSL_VERIFY_NONE);