use Net::SSLGlue::SMTP;
    my $smtp_ssl = Net::SMTP->new( $host,
        SSL => 1,
        SSL_ca_path => ...
    );