The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.


Net::SSLGlue::POP3 - make Net::POP3 able to use SSL


    use Net::SSLGlue::POP3;
    my $pop3s = Net::POP3->new( $host,
        SSL => 1,
        SSL_ca_path => ...

    my $pop3 = Net::POP3->new( $host );
    $pop3->starttls( SSL_ca_path => ... );


Net::SSLGlue::POP3 extends Net::POP3 so one can either start directly with SSL or switch later to SSL using the STLS command.

By default it will take care to verify the certificate according to the rules for POP3 implemented in IO::Socket::SSL.



The method new of Net::POP3 is now able to start directly with SSL when the argument <SSL = 1>> is given. In this case it will not create an IO::Socket::INET object but an IO::Socket::SSL object. One can give the usual SSL_* parameter of IO::Socket::SSL to Net::POP3::new.


If the connection is not yet SSLified it will issue the STLS command and change the object, so that SSL will now be used. The usual SSL_* parameter of IO::Socket::SSL will be given.

peer_certificate ...

Once the SSL connection is established the object is derived from IO::Socket::SSL so that you can use this method to get information about the certificate. See the IO::Socket::SSL documentation.

All of these methods can take the SSL_* parameter from IO::Socket::SSL to change the behavior of the SSL connection. The following parameters are especially useful:

SSL_ca_path, SSL_ca_file

Specifies the path or a file where the CAs used for checking the certificates are located. This is typically "etc/ssl/certs" on UNIX systems.


If set to 0, verification of the certificate will be disabled. By default it is set to 1 which means that the peer certificate is checked.


Usually the name given as the hostname in the constructor is used to verify the identity of the certificate. If you want to check the certificate against another name you can specify it with this parameter.


IO::Socket::SSL, Net::POP3


This module is copyright (c) 2013, Steffen Ullrich. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.