Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
  BIO_free_all(certbio);
  return( retmsg );
}

Select or download this

$ perl verify_certs.pl
cert1 = OK
cert2 = Error self signed certificate