由于pac文件HTTP::ProxyPAC错误,perl无法连接网站



我使用HTTP::ProxyPAC模块从pac文件中获取代理。但是我得到了错误

" JavaScript模块和JS模块似乎都不可用"

请让我知道如何进行。这是我的代码

use strict;
use warnings;
use LWP::UserAgent;
use HTTP::ProxyPAC;
my $ua = LWP::UserAgent->new( keep_alive => 1);
my $pac = HTTP::ProxyPAC->new( URI->new   ("http://pacfilelocation:8080/pac_file.pac") );
my $res = $pac->find_proxy("https://www.google.com");

if ($res->direct) {
print "No Proxy Neededn";
} elsif ($res->proxy) {
print "Proxy is: " . $res->proxy . "n";
$ENV{HTTPS_PROXY} = $res->proxy;
$ENV{HTTP_PROXY} = $res->proxy;
$ua->env_proxy;
}

HTTP::ProxyPAC的文档说:

如果没有提供interp选项,HTTP::ProxyPAC将首先测试是否安装了JavaScript,如果安装了,则使用它。如果没有,它会测试是否安装了JE,如果安装了就使用它。如果两者都未安装,则新调用将终止并显示错误消息。

这很清楚。

最新更新