http://qs1969.pair.com?node_id=11151136

danilo90 has asked for the wisdom of the Perl Monks concerning the following question:

I am developing a little script to get web server information but with some server I got this error "SSL negotiation failed: error:0A000152:SSL routines::unsafe legacy renegotiation disabled"

Here is part of my code
my $browser = LWP::UserAgent->new( max_redirect => 1, env_proxy => 1, keep_alive => 1, timeout => 15, agent => "Mozilla/4.76 [en] (Win98; U) +", ssl_opts => { verify_hostname => 0 , SSL_verify_mode => 0});
I tried adding an SSL exception with the file sslv1.conf and environment variables:
[system_default_sect] Options = UnsafeLegacyRenegotiation

- Running the script

OPENSSL_CONF=sslv1.conf; perl webData.pl