Mi síntoma es que no puedo usar un proxy con solicitudes HTTPS con LWP. Esto parece ser un problema común, y las sugerencias en Google e inclusoaqu todos sugieren una solución alternativa para configurarHTTPS_PROXY variable de entorno para uso de Crypt :: SSLeay.

Mi problema específico parece ser que LWP :: Protocol :: https está cargando IO :: Socket :: SSL en lugar de Crypt :: SSLeay. @ ¿Cómo puedo forzar el uso de Crypt :: SSLeay en su lugar?

Mi código

#!/usr/bin/perl

use strict;
use warnings;
$ENV{HTTPS_PROXY} = 'http://10.0.3.1:3128';
use LWP::UserAgent;
my $ua = LWP::UserAgent->new();
my $req = HTTP::Request->new('GET','https://www.meritrustcu.org/');
my $res = $ua->request($req);
print "$_\n" for grep { $_ =~ /SSL/ } keys %INC;

Y su salida, que muestra que Crypt :: SSLeay no se está utilizando:

Net/SSLeay.pm
IO/Socket/SSL.pm
/usr/lib/perl5/auto/Net/SSLeay/autosplit.ix
/usr/lib/perl5/auto/Net/SSLeay/set_proxy.al
/usr/lib/perl5/auto/Net/SSLeay/randomize.al

Simplemente agregando un @ explíciuse Crypt::SSLeay para mi script ha demostrado ser ineficaz. Carga el módulo, pero continúa cargando IO :: Socket :: SSL, y lo usa para las solicitudes HTTPS.