File: proxy.pl

package info (click to toggle)
libhttp-proxy-perl 0.24-1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 532 kB
  • ctags: 122
  • sloc: perl: 2,350; makefile: 2
file content (7 lines) | stat: -rwxr-xr-x 134 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
 
#!/usr/bin/perl -w
use HTTP::Proxy qw( :log );
use strict;

# a very simple proxy
my $proxy = HTTP::Proxy->new(@ARGV);
$proxy->start;