use IO::Socket::SSL qw(debug3);
           #Print out progress, ciphers, and errors.

       use IO::Socket::SSL qw(debug4);
           #Print out everything, including data.

##</code><code>##

SSL connect attempt failederror:14094418:SSL routines:SSL3_READ_BYTES:tlsv1 alert unknown ca
 at biz_test.pl line 6
IO::Socket::INET configuration failed
 at biz_test.pl line 6
I encountered a problem: IO::Socket::INET configuration failed at biz_test.pl line 20.
IO::Socket::SSL: Timeout	...caught at biz_test.pl line 23.