ブログ エントリー
-
Perl LWP Proxy https
プログラム - 2016/05/11 00:32:17my $url_target = '~'; my $proxy = '~:~'; # HTTP (proxy メソッドを使う) $ua->proxy([qw(http)], 'http://' . $proxy); # Proxy の解除 #$ua->proxy([qw/http/], ''); # HTTPS (環境変数から読み込む) #$ENV{PERL_NET_HTTPS_SSL_SOCKET_CLASS} = 'Net::SSL'; # Windows ActivePerl だとセットするとエラーになる $ENV{'HTTPS_PROXY'} = 'http://' . $proxy; # 証明書のホスト名による検証を抑制 #$ua->ssl_opts(verify_hostname => 0); # ホスト名の検証 #$ENV{HTTPS_CA_DIR} = Mozilla::CA::SSL_ca_file(); # or #$ENV{HTTPS_CA_FILE} = Mozilla::CA::SSL_ca_file(); # or #$ua->ssl_opts( SSL_ca_path => Mozilla::CA::SSL_ca_file()); # or #$ua->ssl_opts( SSL_ca_file => Mozilla::CA::SSL_ca_file()); $ua->env_proxy(); my $res = $ua->get($url_target);コメントにも書いてあるけど、PERL_NET_HTTPS_SSL_SOCKET_CLASS は設定すると Windows ActivePerl だとエラーになった。
https の proxy 解除は環境変数 HTTPS_PROXY を空にしてから
$ua->env_proxy()で大丈夫。 -
Perl LWP Proxy https
http://0pm.0am.jp/memo3/index.cgi?entry=20160511_003217

