Select Code to Download

use HTTP::ProxyPAC;
my $pac = HTTP::ProxyPAC->new('c:\perl\proxypac.pac');
my $res = $pac->find_proxy('http://esto*******tt.coml');
...
my $content =$ua->get('http://esto*******tt.com');
print $content->content();
exit 0;