From 18e691b8720a645fe421564c87c21d7b92e98872 Mon Sep 17 00:00:00 2001 From: dakkar Date: Tue, 1 Jan 2008 18:32:57 +0000 Subject: updates, and minimal changes to "viaProxy" use git-svn-id: svn://luxion/repos/myProxy/trunk@315 fcb26f47-9200-0410-b104-b98ab5b095f3 --- MyProxy.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'MyProxy.pl') diff --git a/MyProxy.pl b/MyProxy.pl index 800f152..cd3b170 100755 --- a/MyProxy.pl +++ b/MyProxy.pl @@ -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(); } -- cgit v1.2.3