Proxy in perl

[secSwami]

Thanks Tim and Martein for your reponses on this. Here is what I am
doing to setup a simple proxy on my box localy using HTTP:roxy module.


#!/usr/bin/perl
use HTTP:roxy;


my $proxy=HTTP:roxy->new (port => 3128);

$proxy->start;


Just these 4 lines starts up the proxy server on my local machine
listening on port 3128 and then I point my browser's proxy setting to
"localhost" and port "3128". This all works great. No issues there.

However, I would like to see the URL that the user just typed in the
broswer and then take the URL and see if another upstream server app
thinks its blocked or not (a central server) and if the central server
returns a block then spit that out to the users browser. How can I
intercept the user request? and see what that request was in the code above.

Thanks a bunch guys. Really appreciate it.

 

[Ben Morrow]

Thanks Tim and Martein for your reponses on this. Here is what I am
doing to setup a simple proxy on my box localy using HTTP:roxy module.

#!/usr/bin/perl
use HTTP:roxy;


my $proxy=HTTP:roxy->new (port => 3128);

$proxy->start;


Just these 4 lines starts up the proxy server on my local machine
listening on port 3128 and then I point my browser's proxy setting to
"localhost" and port "3128". This all works great. No issues there.

However, I would like to see the URL that the user just typed in the
broswer and then take the URL and see if another upstream server app
thinks its blocked or not (a central server) and if the central server
returns a block then spit that out to the users browser. How can I
intercept the user request? and see what that request was in the code above.

You need to use the ->push_filter method on the proxy object before you
call ->start. See the documentation for HTTP:roxy.

Ben

 

[secSwami]

You need to use the ->push_filter method on the proxy object before you
call ->start. See the documentation for HTTP:roxy.

Ben

Thanks Ben. I will give it a shot.