2017-01-25 10 views
-1

Ich versuche auf eine HTTPS-Website zuzugreifen, aber es gibt mir einen Fehler. Ich habe versucht, mit dieser Skripte:Perl - So fordern Sie die HTTPS-Website an

Script 1:

use strict; 
use warnings; 
use LWP::UserAgent; 

my $B = new LWP::UserAgent (agent => 'Mozilla/5.0', cookie_jar =>{}); 

my $GET = $B->get('https://moz.com')->content; 
print $GET; 

Script 2:

use strict; 
use warnings; 
use LWP::UserAgent; 
use Mozilla::CA; 

my $B = new LWP::UserAgent (agent => 'Mozilla/5.0', cookie_jar =>{}); 
$B->ssl_opts(SSL_ca_file => Mozilla::CA::SSL_ca_file()); 
$B->ssl_opts(verify_hostname => 1); 

my $GET = $B->get('https://moz.com')->content; 
print $GET; 

ich diesen Fehler mit beiden:

Can't connect to moz.com:443 

LWP::Protocol::https::Socket: SSL connect attempt failed with unknown error error:00000000:lib(0):func(0):reason(0) at C:/Perl/site/lib/LWP/Protocol/http.pm line 47. 

Ich verwende ActivePerl 5.16.1 Build 1601 unter Windows 7 Ultimate.

Haben Sie eine Idee, wie Sie mit Perl auf eine HTTPS-Website zugreifen?

+1

Ein schlecht installiertes Modul? Dein Code funktioniert wie ein Zauber für mich. Es hängt also mit Ihren eigenen Einstellungen zusammen. Ich würde zuerst versuchen, indem ich das Modul neu installiere und dann überprüfe, ob die Abfrage von https von dem Rechner erlaubt ist, auf dem das Skript läuft. –

+0

Welcher Code? Skript 1 oder Skript 2? – tr0in

+0

@DavidVerdin ich ActivePerl neu installiert und jetzt das Skript funktioniert gut. Vielen Dank für Ihre Antwort. – tr0in

Antwort

0

Ein schlecht installiertes Modul?

Ihr Code (beide Skripte) funktioniert wie ein Zauber für mich. Es hängt also mit Ihren eigenen Einstellungen zusammen.

Ich würde zuerst versuchen, indem Sie das Modul neu installieren und dann prüfen, ob die Abfrage von https von der Maschine erlaubt ist, auf der das Skript ausgeführt wird.

Verwandte Themen