Skip to content
Program for my "A TCP Proxy in Perl" article
Perl
Latest commit e2c2e87 Apr 2, 2011 @pkrumins added readme
Failed to load latest commit information.
readme.txt added readme Apr 2, 2011
tcp-proxy2.pl usage: tcp-proxy2.pl <local port> <host:port> Mar 30, 2011

readme.txt

This is a simple TCP proxy written in Perl that uses IO::Socket::INET and
IO::Select abstractions to create an evented (asynchronous, on select() call
based) server.

It was written by Peteris Krumins (peter@catonmat.net).
His blog is at http://www.catonmat.net  --  good coders code, great reuse.

I modified the proxy that I had written for my "Turn any Linux computer into
SOCKS5 proxy in one command" article:

    http://www.catonmat.net/blog/linux-socks5-proxy

And wrote another article:

    http://catonmat.net/blog/perl-tcp-proxy

------------------------------------------------------------------------------

Here is how it works:

    $ ./tcp-proxy2.pl <local port> <host:port>

This command proxies all tcp connections to <local port> to <host:port>.

------------------------------------------------------------------------------

Happy proxying!

Sincerely,
Peteris Krumins
http://www.catonmat.net
Something went wrong with that request. Please try again.