use POE;
use POE::Filter::Stream;
use POE::Filter::Line;
use POE::Component::Proxy::TCP;
$|++;  
POE::Component::Proxy::TCP->new
(Alias => "ProxyServerSessionAlias",
 Port               => $ARGV[1],
 OrigPort           => $ARGV[2],
 OrigAddress        => $ARGV[0],
 RemoteClientFilter => "POE::Filter::Stream",
 RemoteServerOutputFilter => "POE::Filter::Stream",
 RemoteServerInputFilter => "POE::Filter::Stream"
);
$poe_kernel->run();
exit 0;