diff options
Diffstat (limited to 'MyProxy.pl')
-rwxr-xr-x | MyProxy.pl | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -224,13 +224,13 @@ sub jumpFilter { keep_alive=>2, parse_head=>0, ); - $ua->proxy('http','http://exelion:3128/'); + $ua->proxy('http','http://dechirico:3128/'); $ua->requests_redirectable([]); sub viaProxy { my ($self,$headers,$request)=@_; my $uri=$request->uri; $viaLogger->debug("Forwarding $uri"); - return if $uri !~ m|^http://(.*?)bloglines.com/|; + return if $uri !~ m|^http://(.*?)teoma.com/|; my $response=$ua->request($request); $self->proxy->response($response); } @@ -260,7 +260,7 @@ sub viaProxy { my $proxy=HTTP::Proxy->new(port=>$PORT,engine=>'ScoreBoard'); $proxy->push_filter(request => HTTP::Proxy::HeaderFilter::simple->new(\&doFilter)); $proxy->push_filter(request => HTTP::Proxy::HeaderFilter::simple->new(\&jumpFilter)); - #$proxy->push_filter(request => HTTP::Proxy::HeaderFilter::simple->new(\&viaProxy)); + $proxy->push_filter(request => HTTP::Proxy::HeaderFilter::simple->new(\&viaProxy)); $logger->info("Running on port ".$proxy->port()); $proxy->start(); } |