O proxy server / cliente em Perl

Dabheeruz · #1 (**permalink**) 09-29-2008

Tenho estado a brincar com o Proxy um cliente / servidor app que irá ouvir sobre o sistema cliente sobre permite dizer porta 7070. Navegador do usuário configuração de proxy está configurado para "localhost" port "7070".
Quando este proxy app recebe uma solicitação para uma URL que deve buscar o URL e exibi-lo no browser.

Já fez o ouvinte parte do script (foi fácil), mas como eu posso ligar e, em seguida, obter o URL que o usuário irá pedir em seu navegador e exibi-lo ao browser agindo como um proxy.

Aqui está o código até agora. Estou totalmente furado

.. qualquer ajuda é muito apreciada

Código:

#!/usr/bin/perl
use IO::Socket;

my $sock= new IO::Socket::INET (
                                LocalHost=> 'localhost',
                                LocalPort=> '7070',
                                Proto=> 'tcp',
                                Listen=> 1,
                                Reuse=> 1,
                                Type=> SOCK_STREAM,
                                );
die "Could not create socket:  $!\n" unless $sock;

my $new_sock = $sock->accept();
        while (<$new_sock>) {
                print $_;
        }
        close ($sock);

Mais UNIX e Linux Fórum Tópicos Você pode achar Helpfull
Fio	Thread Starter	Fórum	Respostas	Última postagem
Servidor proxy na Digital UNIX V4.0E?	alvoryx	UNIX para Dummies Perguntas & Respostas	0	10-25-2006 02:29
como obter IP para o servidor proxy	ppass	Linux	3	09-26-2005 08:46
(perl) Microsoft SQL Server Client para o Solaris. cant encontrá-lo ...	Optimus_P	Programação Shell Script e	3	10-14-2002 11:13
unix servidor atrás de um servidor proxy MS	RSlegers	UNIX para Dummies Perguntas & Respostas	2	09-16-2002 10:08
encaminhamento através de um servidor proxy	Garry	IP Networking	2	01-30-2002 05:18

Thread Tools	Pesquisar este Thread
Show Printable Version Enviar esta página	Pesquisar este Thread: Pesquisa Avançada
Display Modes	Esta taxa Thread
Mude para o Modo Linear Switch to Hybrid Mode Threaded Mode	Esta taxa Thread:


	Powered by