私のPerlスクリプトはPCで動作します。ただし、Windows Server 2003サーバーで実行すると、次のようになります。
https 443エラー(500は「Webサイト」に接続できません:443)。
私のスクリプトはLWP:UserAgent
、HTTPSアドレスからファイルをダウンロードするために使用します。ここで私がこれまでにしたこと:
- そのサーバーで他のHTTPSアドレスを接続することをテストしましたが、それらは機能しました。
- 設定
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0
してみましたが、うまくいきませんでした。 - 試し
Mozilla::CA
てみCACertOrg::CA
ましたが、機能しませんでした。設定もしてみ$ENV{HTTPS_CA_FILE}= "path to the downloaded CA file"
ましたが、うまくいきませんでした。
これが私の部分的な元のスクリプトです:
sub retrieveHTTPS {
my ($url, $encrypted_file) = @_;
use LWP::UserAgent;
my $browser = LWP::UserAgent->new;
my $response =
$browser->get($url, ':content_file' => $encrypted_file);
die "Error at $url\n ", $response->status_line, "\n Aborting"
unless $response->is_success;}
この問題を解決するにはどうすればよいですか?