prborg has asked for the wisdom of the Perl Monks concerning the following question:
I'm using IO::Socket::SSL to get the ciphers supported by a web server and it's certificate information, what I have not been able to figure out yet is how to print the complete server chain. Any ideas and/or pointers will be appreciated.
Maybe you should have a look onto Net::SSLeay, particularly it has set_verify function which allows you to set callback to verify peer, callback receives certificate chain as one of arguments.