Jeg har fått leke med en proxy klient / server-app som vil lytte på klienten systemet på kan si port 7070. Brukerens nettleser proxy innstillingen er konfigurert for "localhost" port "7070".
Når denne proxy app får en forespørsel om en URL det skal hente URL og vise det på leseren.

Jeg har allerede gjort lytteren delen av skriptet (det var lett), men hvordan kan jeg da ringe og få nettadressen som brukeren vil be om nettleseren og vise det til leseren opptre som en proxy.

Her er koden så langt. Jeg er helt stuck .. noen hjelpe er høyt verdsatt

#!/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);