use Mail::Sender;

$sender = new Mail::Sender {
        smtp => 'exchange.mycompany.com',
        from => 'me@mycompany.com',
        on_errors => 'code',
};
die "Can't create the Mail::Sender object: $Mail::Sender::Error\n"
        unless ref $sender;
ref $sender->Open({
        to => 'me@mycompany.com',
        subject => 'test'
})
        or die "Can't open the message: $sender->{'error_msg'}\n";
$sender->SendLineEnc("Starbucks in 5");
$sender->SendLineEnc("\nHi");
ref $sender->Close
        or die "Failed to send the message: $sender->{'error_msg'}\n";
[download]

C:\test>perl send.pl Can't open the message: IO::Socket::SSL->start_SSL failed: SSL connect attempt failed error:14090086:SSL routines:SSL3_GET_SERVER_CERTIFICATE:certificate verify failed

There is talk of a workaround for that but I have no idea how to apply it. Add some lines to Sender.pm??

My idea, go to IO::Socket::SSL, see what %ENV options there are, turn some on ... SSL_CERT_DIR...

Also try https://metacpan.org/pod/IO::Socket::SSL#Common-Problems-with-SSL to see what you can see

Patching modules sounds like the last thing to try :)